[R/create_beast2_input_data.R:26:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_data.R#L26) *style:* **Variable and function names should not be longer than 30 characters.**
```r
create_beast2_input_data_sequences <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_distribution.R:10:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_distribution.R#L10) *style:* **Variable and function names should not be longer than 30 characters.**
```r
create_beast2_input_distribution <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_distribution.R:214:3:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_distribution.R#L214) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  {
  ^
```
[R/create_beast2_input_distribution.R:215:23:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_distribution.R#L215) *warning:* **no visible global function definition for ‘get_prop_invariant’**
```r
    prop_invariant <- get_prop_invariant(site_models)
                      ^~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_loggers.R:49:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_loggers.R#L49) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <log idref=\"BayesianSkyline.t:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_loggers.R:56:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_loggers.R#L56) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <log idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_loggers.R:60:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_loggers.R#L60) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <log idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_loggers.R:67:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_loggers.R#L67) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <log idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_loggers.R:74:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_loggers.R#L74) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <log id=\"rate.c:", ids, "\" spec=\"beast.evolution.branchratemodel.RateStatistic\" branchratemodel=\"@RelaxedClock.c:", ids, "\" tree=\"@Tree.t:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_loggers.R:87:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_loggers.R#L87) *style:* **Lines should not be more than 80 characters.**
```r
  text <- c(text, paste0("    <logger id=\"treelog.t:", ids, "\" fileName=\"$(tree).trees\" logEvery=\"1000\" mode=\"tree\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_loggers.R:91:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_loggers.R#L91) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <log id=\"TreeWithMetaDataLogger.t:", ids, "\" spec=\"beast.evolution.tree.TreeWithMetaDataLogger\" ", "tree=\"@Tree.t:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_loggers.R:93:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_loggers.R#L93) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <log id=\"TreeWithMetaDataLogger.t:", ids, "\" spec=\"beast.evolution.tree.TreeWithMetaDataLogger\" branchratemodel=\"@RelaxedClock.c:", ids, "\" tree=\"@Tree.t:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:38:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L38) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"YuleBirthRateScaler.t:", ids, "\" spec=\"ScaleOperator\" parameter=\"@birthRate.t:", ids, "\" scaleFactor=\"0.75\" weight=\"3.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:43:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L43) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"", operator_id_pre, "TreeScaler.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:49:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L49) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"", operator_id_pre, "TreeRootScaler.t:",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:55:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L55) *style:* **Lines should not be more than 80 characters.**
```r
  text <- c(text, paste0("    <operator id=\"", operator_id_pre, "UniformOperator.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:60:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L60) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"", operator_id_pre, "SubtreeSlide.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:66:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L66) *style:* **Lines should not be more than 80 characters.**
```r
  text <- c(text, paste0("    <operator id=\"", operator_id_pre, "Narrow.t:", ids, "\" spec=\"Exchange\" tree=\"@Tree.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:73:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L73) *style:* **Lines should not be more than 80 characters.**
```r
  text <- c(text, paste0("    <operator id=\"", operator_id_pre, "WilsonBalding.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:79:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L79) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"KappaScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@kappa.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:81:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L81) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"FrequenciesExchanger.s:", ids, "\" spec=\"DeltaExchangeOperator\" delta=\"0.01\" weight=\"0.1\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:82:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L82) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:86:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L86) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"kappa1Scaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@kappa1.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:88:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L88) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"kappa2Scaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@kappa2.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:90:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L90) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"FrequenciesExchanger.s:", ids, "\" spec=\"DeltaExchangeOperator\" delta=\"0.01\" weight=\"0.1\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:91:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L91) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:95:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L95) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateACScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateAC.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:97:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L97) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateAGScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateAG.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:99:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L99) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateATScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateAT.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:101:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L101) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateCGScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateCG.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:103:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L103) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateGTScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateGT.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:105:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L105) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"FrequenciesExchanger.s:", ids, "\" spec=\"DeltaExchangeOperator\" delta=\"0.01\" weight=\"0.1\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:106:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L106) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:127:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L127) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"popSizesScaler.t:", ids, "\" spec=\"ScaleOperator\" parameter=\"@bPopSizes.t:", ids, "\" scaleFactor=\"0.75\" weight=\"15.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:129:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L129) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"groupSizesDelta.t:", ids, "\" spec=\"DeltaExchangeOperator\" integer=\"true\" weight=\"6.0\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:130:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L130) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <intparameter idref=\"bGroupSizes.t:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:137:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L137) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"ucldStdevScaler.c:", ids, "\" spec=\"ScaleOperator\" parameter=\"@ucldStdev.c:", ids, "\" scaleFactor=\"0.5\" weight=\"3.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:139:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L139) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"CategoriesRandomWalk.c:", ids, "\" spec=\"IntRandomWalkOperator\" parameter=\"@rateCategories.c:", ids, "\" weight=\"10.0\" windowSize=\"1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:141:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L141) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"CategoriesSwapOperator.c:", ids, "\" spec=\"SwapOperator\" intparameter=\"@rateCategories.c:", ids, "\" weight=\"10.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:143:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_operators.R#L143) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"CategoriesUniform.c:", ids, "\" spec=\"UniformOperator\" parameter=\"@rateCategories.c:", ids, "\" weight=\"10.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:41:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L41) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"birthRate.t:", ids, "\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:43:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L43) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"BDBirthRate.t:", ids, "\" lower=\"0.0\" name=\"stateNode\" upper=\"10000.0\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:44:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L44) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"BDDeathRate.t:", ids, "\" lower=\"0.0\" name=\"stateNode\" upper=\"1.0\">0.5</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:46:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L46) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"popSize.t:", ids, "\" name=\"stateNode\">0.3</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:48:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L48) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"bPopSizes.t:", ids, "\" dimension=\"5\" lower=\"0.0\" name=\"stateNode\" upper=\"380000.0\">380.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:49:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L49) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <stateNode id=\"bGroupSizes.t:", ids, "\" spec=\"parameter.IntegerParameter\" dimension=\"5\">1</stateNode>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:54:14:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L54) *warning:* **no visible global function definition for ‘get_kappa’**
```r
    kappa <- get_kappa(site_models)
             ^~~~~~~~~
```
[R/create_beast2_input_state.R:55:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L55) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"kappa.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">", kappa, "</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:56:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L56) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"freqParameter.s:", ids, "\" dimension=\"4\" lower=\"0.0\" name=\"stateNode\" upper=\"1.0\">0.25</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:58:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L58) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"kappa1.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">2.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:59:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L59) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"kappa2.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">2.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:60:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L60) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"freqParameter.s:", ids, "\" dimension=\"4\" lower=\"0.0\" name=\"stateNode\" upper=\"1.0\">0.25</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:62:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L62) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateAC.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:63:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L63) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateAG.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:64:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L64) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateAT.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:65:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L65) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateCG.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:66:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L66) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateGT.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:67:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L67) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"freqParameter.s:", ids, "\" dimension=\"4\" lower=\"0.0\" name=\"stateNode\" upper=\"1.0\">0.25</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:72:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L72) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"ucldStdev.c:", ids, "\" lower=\"0.0\" name=\"stateNode\">0.1</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:73:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_beast2_input_state.R#L73) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <stateNode id=\"rateCategories.c:", ids, "\" spec=\"parameter.IntegerParameter\" dimension=\"8\">1</stateNode>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_clock_model.R:33:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_clock_model.R#L33) *warning:* **no visible global function definition for ‘create_clock_model’**
```r
  return(create_clock_model(name = "relaxed_log_normal"))
         ^~~~~~~~~~~~~~~~~~
```
[R/create_site_model.R:34:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_site_model.R#L34) *warning:* **no visible global function definition for ‘create_site_model’**
```r
  return(create_site_model(name = "JC69"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_site_model.R:63:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_site_model.R#L63) *warning:* **no visible global function definition for ‘create_site_model’**
```r
  return(create_site_model(name = "TN93"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_site_model.R:70:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_site_model.R#L70) *warning:* **no visible global function definition for ‘create_site_model’**
```r
  return(create_site_model(name = "GTR"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_tree_prior.R:34:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_tree_prior.R#L34) *warning:* **no visible global function definition for ‘create_tree_prior’**
```r
  return(create_tree_prior(name = "yule"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_tree_prior.R:41:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_tree_prior.R#L41) *warning:* **no visible global function definition for ‘create_tree_prior’**
```r
  return(create_tree_prior(name = "birth_death"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_tree_prior.R:48:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_tree_prior.R#L48) *warning:* **no visible global function definition for ‘create_tree_prior’**
```r
  return(create_tree_prior(name = "coalescent_bayesian_skyline"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_tree_prior.R:55:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/create_tree_prior.R#L55) *warning:* **no visible global function definition for ‘create_tree_prior’**
```r
  return(create_tree_prior(name = "coalescent_constant_population"))
         ^~~~~~~~~~~~~~~~~
```
[R/get_clock_model_rate.R:15:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/get_clock_model_rate.R#L15) *warning:* **no visible global function definition for ‘get_default_clock_model_rate’**
```r
  return(get_default_clock_model_rate())
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/get_gamma_cat_count.R:14:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/get_gamma_cat_count.R#L14) *warning:* **no visible global function definition for ‘get_default_gamma_cat_count’**
```r
  return(get_default_gamma_cat_count())
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/get_kappa.R:14:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/get_kappa.R#L14) *warning:* **no visible global function definition for ‘get_default_kappa’**
```r
  return(get_default_kappa())
         ^~~~~~~~~~~~~~~~~
```
[R/get_prop_invariant.R:14:10:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/get_prop_invariant.R#L14) *warning:* **no visible global function definition for ‘get_default_prop_invariant’**
```r
  return(get_default_prop_invariant())
         ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/get_prop_invariant.R:25:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/get_prop_invariant.R#L25) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/is_cbs_tree_prior.R:2:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/is_cbs_tree_prior.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @param x an object, to be determined if it is a valid constant coalescent Bayesian skyline prior
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_cbs_tree_prior.R:3:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/is_cbs_tree_prior.R#L3) *style:* **Lines should not be more than 80 characters.**
```r
#' @return TRUE if x is a valid constant coalescent Bayesian skyline prior, FALSE otherwise
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_ccp_tree_prior.R:2:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/is_ccp_tree_prior.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @param x an object, to be determined if it is a valid constant coalescence population tree prior
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_ccp_tree_prior.R:3:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/is_ccp_tree_prior.R#L3) *style:* **Lines should not be more than 80 characters.**
```r
#' @return TRUE if x is a valid constant coalescence population tree prior, FALSE otherwise
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_relaxed_log_normal_clock_model.R:2:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/is_relaxed_log_normal_clock_model.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @param x an object, to be determined if it is a valid relaxed log normal clock model
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_relaxed_log_normal_clock_model.R:6:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/R/is_relaxed_log_normal_clock_model.R#L6) *style:* **Variable and function names should not be longer than 30 characters.**
```r
is_relaxed_log_normal_clock_model <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_data.R:8:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input_data.R#L8) *style:* **Lines should not be more than 80 characters.**
```r
  expected <- "                    <sequence id=\"seq_t1\" taxon=\"t1\" totalcount=\"4\" value=\"acttgttgcgactgcgcctg\"/>"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_data.R:19:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input_data.R#L19) *style:* **Lines should not be more than 80 characters.**
```r
  expected <- "                    <sequence id=\"seq_t1\" taxon=\"t1\" totalcount=\"4\" value=\"acttgttgcgactgcgcctg\"/>"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_file.R:150:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input_file.R#L150) *style:* **Lines should not be more than 80 characters.**
```r
test_that("All site models produce a valid BEAST2 input file, fixed crown age", {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_file.R:190:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input_file.R#L190) *style:* **Lines should not be more than 80 characters.**
```r
test_that("All clock models produce a valid BEAST2 input file, fixed crown age", {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_file.R:232:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input_file.R#L232) *style:* **Lines should not be more than 80 characters.**
```r
test_that("All tree priors produce a valid BEAST2 input file, fixed crown age", {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:45:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L45) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:57:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L57) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "birth_death_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:67:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L67) *style:* **Lines should not be more than 80 characters.**
```r
    tree_priors = beastscriptr::create_tree_prior(name = "coalescent_constant_population")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:70:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L70) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "coalescent_constant_population_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:82:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L82) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "yule_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:91:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L91) *style:* **Lines should not be more than 80 characters.**
```r
    tree_priors = beastscriptr::create_tree_prior(name = "coalescent_bayesian_skyline")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:94:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L94) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "coalescent_bayesian_skyline_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:102:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L102) *style:* **Lines should not be more than 80 characters.**
```r
  filename <- system.file("extdata", "coalescent_bayesian_skyline_2_4.xml", package = "beastscriptr")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:113:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L113) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "jc69_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:124:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L124) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "hky_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:135:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L135) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "tn93_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:146:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L146) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "gtr_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:158:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L158) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "strict_clock_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:168:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L168) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "relaxed_clock_log_normal_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:179:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L179) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "hky_kappa_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:192:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L192) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "hky_prop_invariant_0_5_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:206:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L206) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "hky_gcc_4_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:220:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_beast2_input.R#L220) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "strict_clock_rate_0_5_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_clock_model.R:18:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_clock_model.R#L18) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test-create_clock_model.R:19:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_clock_model.R#L19) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test-create_tree_prior.R:8:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_tree_prior.R#L8) *style:* **Lines should not be more than 80 characters.**
```r
  tree_prior <- beastscriptr::create_tree_prior(name = "coalescent_bayesian_skyline")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_tree_prior.R:11:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_tree_prior.R#L11) *style:* **Lines should not be more than 80 characters.**
```r
  tree_prior <- beastscriptr::create_tree_prior(name = "coalescent_constant_population")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_tree_priors.R:12:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-create_tree_priors.R#L12) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test-is_yule_tree_prior.R:6:1:](https://github.com/richelbilderbeek/beastscriptr/blob/bb5d0a683fc8a0454e23b7e4627556c8f3fe1924/tests/testthat/test-is_yule_tree_prior.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
  testthat::expect_false(is_yule_tree_prior(create_tree_prior(name = "birth_death")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


haha. I revoked this access and no longer working.


I stayed with LevelBag so far, but that may change.

Hm currently there is the input thread and the reasoner thread, but later there will be multiple reasoner threads. Whether TeaVM can map the threads to web workers to allow for performance-gain rather than just equal behavior is another topic, it's not the job of OpenNARS to work around weaknesses in the details of how threading is implemented in specific target VM's.


Рекомендуется в конце файла с исходным кодом ставить перенос строки (некоторые средства для работы с кодом чувствительны нему).


`stringt`?


@seanhandley when should we update the VERSION ?


Bluemix [toolchain](https://console.bluemix.net/devops/toolchains/e0a5e767-f82f-47ec-a224-2fb3ae78f297 "simple-conversation-66185"): [Delivery Pipeline](https://console.bluemix.net/devops/pipelines/d4cedbcf-440b-4e7a-a284-2468f250b8ce "simple-conversation-66185") deployed [simple-conversation-66185](https://github.com/JiaLu/simple-conversation-66185/releases/tag/deploy-ibm-yp-us-south-Moxin-dev-20171024-094602 "deploy-ibm-yp-us-south-Moxin-dev-20171024-094602") to [dev](https://console.bluemix.net/apps/e9c71c16-00f0-44e0-8b35-8b51c4b1a522?env_id=ibm:yp:us-south "ibm:yp:us-south:Moxin:dev"), including this commit


If you dont extend it, nothing will happen


я так хотел сначала сделать, но подумал что строка будет сильно длинная и не читаяемая. Плюс этот обьект не типа стринг :  new StringBuilder(args[i]).reverse()). То есть его конвертить надо?


It's impossible to implement Java threads over web workers. Web workers don't allow to share objects between each other. They are more like unix process, not threads.


Must be reworked to satisfy BetterCodeHub 😕 (This doesn't follow the _Write Simple Units Of Code_ guideline)


Hi,

I found this to resolve the same issue on iOs, but I don't know where to put this code: https://github.com/robbiehanson/CocoaHTTPServer/issues/106

Can you please take a look ?


Ok sorry, this is fixed in next commit 😄


ay zzveli stex mi gri


Preview of the example with custom `style`

![mixblendmode](https://user-images.githubusercontent.com/784056/31936227-43a0a780-b8b1-11e7-8413-03cf8adf35e9.gif)


Service ADA


classi anuny poxi


New Project


一坨屎，这个macro迟早会在新的iPhone或者iPad上break build


Why not like this:
```java
registry.timer("some.timer").record(() -> {
    // do your thing requiring timing
})
```
though it will not allow checked exceptions, but who still uses them?


不須 setter，是 read only 的
規格有說


And If you do, then its on your own. You must be carefull to keep the functionality


New Project Calculator


Could you please explain Why you are using these scales instead of the original implementation scales?


[R/create_beast2_input_operators.R:38:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L38) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"YuleBirthRateScaler.t:", ids, "\" spec=\"ScaleOperator\" parameter=\"@birthRate.t:", ids, "\" scaleFactor=\"0.75\" weight=\"3.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:43:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L43) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"", operator_id_pre, "TreeScaler.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:49:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L49) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"", operator_id_pre, "TreeRootScaler.t:",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:55:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L55) *style:* **Lines should not be more than 80 characters.**
```r
  text <- c(text, paste0("    <operator id=\"", operator_id_pre, "UniformOperator.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:60:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L60) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"", operator_id_pre, "SubtreeSlide.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:66:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L66) *style:* **Lines should not be more than 80 characters.**
```r
  text <- c(text, paste0("    <operator id=\"", operator_id_pre, "Narrow.t:", ids, "\" spec=\"Exchange\" tree=\"@Tree.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:73:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L73) *style:* **Lines should not be more than 80 characters.**
```r
  text <- c(text, paste0("    <operator id=\"", operator_id_pre, "WilsonBalding.t:", ids,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:79:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L79) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"KappaScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@kappa.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:81:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L81) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"FrequenciesExchanger.s:", ids, "\" spec=\"DeltaExchangeOperator\" delta=\"0.01\" weight=\"0.1\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:82:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L82) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:86:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L86) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"kappa1Scaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@kappa1.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:88:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L88) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"kappa2Scaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@kappa2.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:90:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L90) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"FrequenciesExchanger.s:", ids, "\" spec=\"DeltaExchangeOperator\" delta=\"0.01\" weight=\"0.1\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:91:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L91) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:95:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L95) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateACScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateAC.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:97:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L97) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateAGScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateAG.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:99:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L99) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateATScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateAT.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:101:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L101) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateCGScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateCG.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:103:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L103) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"RateGTScaler.s:", ids, "\" spec=\"ScaleOperator\" parameter=\"@rateGT.s:", ids, "\" scaleFactor=\"0.5\" weight=\"0.1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:105:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L105) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"FrequenciesExchanger.s:", ids, "\" spec=\"DeltaExchangeOperator\" delta=\"0.01\" weight=\"0.1\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:106:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L106) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter idref=\"freqParameter.s:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:127:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L127) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"popSizesScaler.t:", ids, "\" spec=\"ScaleOperator\" parameter=\"@bPopSizes.t:", ids, "\" scaleFactor=\"0.75\" weight=\"15.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:129:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L129) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"groupSizesDelta.t:", ids, "\" spec=\"DeltaExchangeOperator\" integer=\"true\" weight=\"6.0\">"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:130:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L130) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <intparameter idref=\"bGroupSizes.t:", ids, "\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:137:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L137) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"ucldStdevScaler.c:", ids, "\" spec=\"ScaleOperator\" parameter=\"@ucldStdev.c:", ids, "\" scaleFactor=\"0.5\" weight=\"3.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:139:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L139) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"CategoriesRandomWalk.c:", ids, "\" spec=\"IntRandomWalkOperator\" parameter=\"@rateCategories.c:", ids, "\" weight=\"10.0\" windowSize=\"1\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:141:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L141) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"CategoriesSwapOperator.c:", ids, "\" spec=\"SwapOperator\" intparameter=\"@rateCategories.c:", ids, "\" weight=\"10.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_operators.R:143:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_operators.R#L143) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("    <operator id=\"CategoriesUniform.c:", ids, "\" spec=\"UniformOperator\" parameter=\"@rateCategories.c:", ids, "\" weight=\"10.0\"/>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:41:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L41) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"birthRate.t:", ids, "\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:43:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L43) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"BDBirthRate.t:", ids, "\" lower=\"0.0\" name=\"stateNode\" upper=\"10000.0\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:44:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L44) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"BDDeathRate.t:", ids, "\" lower=\"0.0\" name=\"stateNode\" upper=\"1.0\">0.5</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:46:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L46) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"popSize.t:", ids, "\" name=\"stateNode\">0.3</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:48:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L48) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"bPopSizes.t:", ids, "\" dimension=\"5\" lower=\"0.0\" name=\"stateNode\" upper=\"380000.0\">380.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:49:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L49) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <stateNode id=\"bGroupSizes.t:", ids, "\" spec=\"parameter.IntegerParameter\" dimension=\"5\">1</stateNode>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:54:14:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L54) *warning:* **no visible global function definition for ‘get_kappa’**
```r
    kappa <- get_kappa(site_models)
             ^~~~~~~~~
```
[R/create_beast2_input_state.R:55:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L55) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"kappa.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">", kappa, "</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:56:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L56) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"freqParameter.s:", ids, "\" dimension=\"4\" lower=\"0.0\" name=\"stateNode\" upper=\"1.0\">0.25</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:58:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L58) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"kappa1.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">2.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:59:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L59) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"kappa2.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">2.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:60:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L60) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"freqParameter.s:", ids, "\" dimension=\"4\" lower=\"0.0\" name=\"stateNode\" upper=\"1.0\">0.25</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:62:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L62) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateAC.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:63:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L63) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateAG.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:64:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L64) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateAT.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:65:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L65) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateCG.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:66:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L66) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"rateGT.s:", ids, "\" lower=\"0.0\" name=\"stateNode\">1.0</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:67:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L67) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"freqParameter.s:", ids, "\" dimension=\"4\" lower=\"0.0\" name=\"stateNode\" upper=\"1.0\">0.25</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:72:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L72) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <parameter id=\"ucldStdev.c:", ids, "\" lower=\"0.0\" name=\"stateNode\">0.1</parameter>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_beast2_input_state.R:73:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_beast2_input_state.R#L73) *style:* **Lines should not be more than 80 characters.**
```r
    text <- c(text, paste0("        <stateNode id=\"rateCategories.c:", ids, "\" spec=\"parameter.IntegerParameter\" dimension=\"8\">1</stateNode>"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_clock_model.R:33:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_clock_model.R#L33) *warning:* **no visible global function definition for ‘create_clock_model’**
```r
  return(create_clock_model(name = "relaxed_log_normal"))
         ^~~~~~~~~~~~~~~~~~
```
[R/create_site_model.R:34:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_site_model.R#L34) *warning:* **no visible global function definition for ‘create_site_model’**
```r
  return(create_site_model(name = "JC69"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_site_model.R:63:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_site_model.R#L63) *warning:* **no visible global function definition for ‘create_site_model’**
```r
  return(create_site_model(name = "TN93"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_site_model.R:70:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_site_model.R#L70) *warning:* **no visible global function definition for ‘create_site_model’**
```r
  return(create_site_model(name = "GTR"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_tree_prior.R:34:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_tree_prior.R#L34) *warning:* **no visible global function definition for ‘create_tree_prior’**
```r
  return(create_tree_prior(name = "yule"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_tree_prior.R:41:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_tree_prior.R#L41) *warning:* **no visible global function definition for ‘create_tree_prior’**
```r
  return(create_tree_prior(name = "birth_death"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_tree_prior.R:48:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_tree_prior.R#L48) *warning:* **no visible global function definition for ‘create_tree_prior’**
```r
  return(create_tree_prior(name = "coalescent_bayesian_skyline"))
         ^~~~~~~~~~~~~~~~~
```
[R/create_tree_prior.R:55:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/create_tree_prior.R#L55) *warning:* **no visible global function definition for ‘create_tree_prior’**
```r
  return(create_tree_prior(name = "coalescent_constant_population"))
         ^~~~~~~~~~~~~~~~~
```
[R/get_clock_model_rate.R:15:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/get_clock_model_rate.R#L15) *warning:* **no visible global function definition for ‘get_default_clock_model_rate’**
```r
  return(get_default_clock_model_rate())
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/get_gamma_cat_count.R:14:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/get_gamma_cat_count.R#L14) *warning:* **no visible global function definition for ‘get_default_gamma_cat_count’**
```r
  return(get_default_gamma_cat_count())
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/get_kappa.R:14:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/get_kappa.R#L14) *warning:* **no visible global function definition for ‘get_default_kappa’**
```r
  return(get_default_kappa())
         ^~~~~~~~~~~~~~~~~
```
[R/get_prop_invariant.R:14:10:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/get_prop_invariant.R#L14) *warning:* **no visible global function definition for ‘get_default_prop_invariant’**
```r
  return(get_default_prop_invariant())
         ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/get_prop_invariant.R:25:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/get_prop_invariant.R#L25) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/is_cbs_tree_prior.R:2:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/is_cbs_tree_prior.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @param x an object, to be determined if it is a valid constant coalescent Bayesian skyline prior
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_cbs_tree_prior.R:3:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/is_cbs_tree_prior.R#L3) *style:* **Lines should not be more than 80 characters.**
```r
#' @return TRUE if x is a valid constant coalescent Bayesian skyline prior, FALSE otherwise
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_ccp_tree_prior.R:2:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/is_ccp_tree_prior.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @param x an object, to be determined if it is a valid constant coalescence population tree prior
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_ccp_tree_prior.R:3:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/is_ccp_tree_prior.R#L3) *style:* **Lines should not be more than 80 characters.**
```r
#' @return TRUE if x is a valid constant coalescence population tree prior, FALSE otherwise
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_relaxed_log_normal_clock_model.R:2:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/is_relaxed_log_normal_clock_model.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @param x an object, to be determined if it is a valid relaxed log normal clock model
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/is_relaxed_log_normal_clock_model.R:6:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/R/is_relaxed_log_normal_clock_model.R#L6) *style:* **Variable and function names should not be longer than 30 characters.**
```r
is_relaxed_log_normal_clock_model <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_data.R:8:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input_data.R#L8) *style:* **Lines should not be more than 80 characters.**
```r
  expected <- "                    <sequence id=\"seq_t1\" taxon=\"t1\" totalcount=\"4\" value=\"acttgttgcgactgcgcctg\"/>"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_data.R:19:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input_data.R#L19) *style:* **Lines should not be more than 80 characters.**
```r
  expected <- "                    <sequence id=\"seq_t1\" taxon=\"t1\" totalcount=\"4\" value=\"acttgttgcgactgcgcctg\"/>"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_file.R:150:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input_file.R#L150) *style:* **Lines should not be more than 80 characters.**
```r
test_that("All site models produce a valid BEAST2 input file, fixed crown age", {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_file.R:190:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input_file.R#L190) *style:* **Lines should not be more than 80 characters.**
```r
test_that("All clock models produce a valid BEAST2 input file, fixed crown age", {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input_file.R:232:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input_file.R#L232) *style:* **Lines should not be more than 80 characters.**
```r
test_that("All tree priors produce a valid BEAST2 input file, fixed crown age", {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:45:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L45) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:57:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L57) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "birth_death_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:67:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L67) *style:* **Lines should not be more than 80 characters.**
```r
    tree_priors = beastscriptr::create_tree_prior(name = "coalescent_constant_population")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:70:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L70) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "coalescent_constant_population_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:82:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L82) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "yule_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:91:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L91) *style:* **Lines should not be more than 80 characters.**
```r
    tree_priors = beastscriptr::create_tree_prior(name = "coalescent_bayesian_skyline")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:94:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L94) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "coalescent_bayesian_skyline_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:102:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L102) *style:* **Lines should not be more than 80 characters.**
```r
  filename <- system.file("extdata", "coalescent_bayesian_skyline_2_4.xml", package = "beastscriptr")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:113:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L113) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "jc69_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:124:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L124) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "hky_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:135:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L135) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "tn93_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:146:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L146) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "gtr_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:158:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L158) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "strict_clock_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:168:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L168) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "relaxed_clock_log_normal_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:179:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L179) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "hky_kappa_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:192:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L192) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "hky_prop_invariant_0_5_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:206:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L206) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "hky_gcc_4_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_beast2_input.R:220:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_beast2_input.R#L220) *style:* **Lines should not be more than 80 characters.**
```r
  expected_lines <- readLines(system.file("extdata", "strict_clock_rate_0_5_2_4.xml", package = "beastscriptr"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_clock_model.R:18:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_clock_model.R#L18) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test-create_clock_model.R:19:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_clock_model.R#L19) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test-create_tree_prior.R:8:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_tree_prior.R#L8) *style:* **Lines should not be more than 80 characters.**
```r
  tree_prior <- beastscriptr::create_tree_prior(name = "coalescent_bayesian_skyline")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_tree_prior.R:11:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_tree_prior.R#L11) *style:* **Lines should not be more than 80 characters.**
```r
  tree_prior <- beastscriptr::create_tree_prior(name = "coalescent_constant_population")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-create_tree_priors.R:12:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-create_tree_priors.R#L12) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[tests/testthat/test-is_yule_tree_prior.R:6:1:](https://github.com/richelbilderbeek/beastscriptr/blob/e33f2ac9281bc3306072910fb8b905022ff6075a/tests/testthat/test-is_yule_tree_prior.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
  testthat::expect_false(is_yule_tree_prior(create_tree_prior(name = "birth_death")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


Add trnslt & Fix


If you're using /sys/kernel/config/target/iscsi/$iqn/tpgt_#/lun/lun_#/statistics/scsi_tgt_port/in_cmds to populate the iops metric, then I think a name like "iSCSI iops", "transport iops" or similar would be more suitable. Also, where is the logic to convert the monotonic in_cmds value to a per-second rate?