[R/are_rates.R:4:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/are_rates.R#L4) *style:* **functions should have cyclomatic complexity of less than 15, this has 81.**
```r
are_rates <- function(x) {
^
```
[R/are_rates.R:16:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/are_rates.R#L16) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(length(x) == 7){
    ^
```
[R/are_rates.R:16:20:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/are_rates.R#L16) *style:* **There should be a space between right parenthesis and an opening curly brace.**
```r
  if(length(x) == 7){
                   ^~
```
[R/are_rates.R:33:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/are_rates.R#L33) *style:* **Lines should not be more than 80 characters.**
```r
    if (x$ext_rate_max < 0.0 || x$ext_rate_max < x$ext_rate || x$ext_rate_max < x$ext_rate2 ) return(FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/are_rates.R:33:92:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/are_rates.R#L33) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if (x$ext_rate_max < 0.0 || x$ext_rate_max < x$ext_rate || x$ext_rate_max < x$ext_rate2 ) return(FALSE)
                                                                                ^
```
[R/are_rates.R:34:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/are_rates.R#L34) *style:* **Lines should not be more than 80 characters.**
```r
    if (x$immig_rate_max < 0.0 || x$immig_rate_max < x$immig_rate || x$immig_rate_max < x$immig_rate2) return(FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/are_rates.R:35:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/are_rates.R#L35) *style:* **Lines should not be more than 80 characters.**
```r
    if (x$clado_rate_max < 0.0 || x$clado_rate_max < x$clado_rate || x$clado_rate_max < x$clado_rate2) return(FALSE)}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/are_rates.R:35:117:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/are_rates.R#L35) *style:* **Closing curly-braces should always be on their own line, unless it's followed by an else.**
```r
    if (x$clado_rate_max < 0.0 || x$clado_rate_max < x$clado_rate || x$clado_rate_max < x$clado_rate2) return(FALSE)}
                                                                                ^
```
[R/create_rates.R:10:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_rates.R#L10) *style:* **Lines should not be more than 80 characters.**
```r
#' @param Tpars A named list containing diversification rates considering two trait states:
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_rates.R:17:74:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_rates.R#L17) *style:* **Trailing whitespace is superfluous.**
```r
#'   \item{[6]:A numeric with the per capita transition rate with state2}
                                                                         ^
```
[R/create_rates.R:18:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_rates.R#L18) *style:* **Lines should not be more than 80 characters.**
```r
#'   \item{[7]:A numeric with the number of species with trait state 2 on mainland}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_rates.R:18:84:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_rates.R#L18) *style:* **Trailing whitespace is superfluous.**
```r
#'   \item{[7]:A numeric with the number of species with trait state 2 on mainland}
                                                                                ^
```
[R/create_rates.R:46:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_rates.R#L46) *style:* **Variable and function name style should be snake_case.**
```r
  Tpars = NULL) {
  ^~~~~
```
[R/create_rates.R:47:21:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_rates.R#L47) *style:* **There should be a space between right parenthesis and an opening curly brace.**
```r
  if (is.null(Tpars)){
                    ^~
```
[R/create_test_simulation_output.R:8:31:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_test_simulation_output.R#L8) *style:* **Commas should always have a space after.**
```r
  pars_equal <- c(2.550687345,2.683454548,Inf,0.00933207,1.010073119)
                              ^
```
[R/create_test_simulation_output.R:8:43:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_test_simulation_output.R#L8) *style:* **Commas should always have a space after.**
```r
  pars_equal <- c(2.550687345,2.683454548,Inf,0.00933207,1.010073119)
                                          ^
```
[R/create_test_simulation_output.R:8:47:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_test_simulation_output.R#L8) *style:* **Commas should always have a space after.**
```r
  pars_equal <- c(2.550687345,2.683454548,Inf,0.00933207,1.010073119)
                                              ^
```
[R/create_test_simulation_output.R:8:58:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_test_simulation_output.R#L8) *style:* **Commas should always have a space after.**
```r
  pars_equal <- c(2.550687345,2.683454548,Inf,0.00933207,1.010073119)
                                                         ^
```
[R/create_test_trait_state_params.R:1:44:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_test_trait_state_params.R#L1) *style:* **There should be a space between right parenthesis and an opening curly brace.**
```r
create_test_trait_state_params <- function(){
                                           ^~
```
[R/create_trait_state_params.R:7:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_trait_state_params.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
#' @param clado_rate2 A numeric with the per capita cladogenesis rate with state2
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_trait_state_params.R:11:70:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_trait_state_params.R#L11) *style:* **Trailing whitespace is superfluous.**
```r
#' @return list of numerical values containing trait state parameters
                                                                     ^
```
[R/create_trait_state_params.R:14:13:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_trait_state_params.R#L14) *style:* **Trailing whitespace is superfluous.**
```r
#' @examples
            ^
```
[R/create_trait_state_params.R:30:39:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_trait_state_params.R#L30) *style:* **Variable and function name style should be snake_case.**
```r
                                      M2) {
                                      ^~
```
[R/create_trait_state_params.R:43:30:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_trait_state_params.R#L43) *style:* **Put spaces around all infix operators.**
```r
  testit::assert(trans_rate2 >=0.0)
                             ^~~
```
[R/create_trait_state_params.R:44:21:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_trait_state_params.R#L44) *style:* **Put spaces around all infix operators.**
```r
  testit::assert(M2 >=0)
                    ^~~
```
[R/create_trait_state_params.R:56:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_trait_state_params.R#L56) *style:* **Lines should not be more than 80 characters.**
```r
#' @param trait_state_params object to be tested if conforms to trait state parameters
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_trait_state_params.R:71:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/create_trait_state_params.R#L71) *style:* **functions should have cyclomatic complexity of less than 15, this has 33.**
```r
are_trait_state_params <- function(trait_state_params) {
^
```
[R/DAISIE_area_params.R:16:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_area_params.R#L16) *style:* **functions should have cyclomatic complexity of less than 15, this has 23.**
```r
are_area_params <- function(area_params) {
^
```
[R/DAISIE_area_params.R:34:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_area_params.R#L34) *style:* **Lines should not be more than 80 characters.**
```r
#' @param proportional_peak_t value from 0 to 1 indicating where in the island's history the
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_area_params.R:34:93:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_area_params.R#L34) *style:* **Trailing whitespace is superfluous.**
```r
#' @param proportional_peak_t value from 0 to 1 indicating where in the island's history the
                                                                                ^
```
[R/DAISIE_area_params.R:39:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_area_params.R#L39) *style:* **Lines should not be more than 80 characters.**
```r
#' @return list of numerical values containing area parameters for island ontogeny
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_area_params.R:39:83:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_area_params.R#L39) *style:* **Trailing whitespace is superfluous.**
```r
#' @return list of numerical values containing area parameters for island ontogeny
                                                                                ^
```
[R/DAISIE_check_format.R:7:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L7) *style:* **functions should have cyclomatic complexity of less than 15, this has 81.**
```r
are_rates <- function(x) {
^
```
[R/DAISIE_check_format.R:19:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L19) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(length(x) == 7){
    ^
```
[R/DAISIE_check_format.R:19:20:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L19) *style:* **There should be a space between right parenthesis and an opening curly brace.**
```r
  if(length(x) == 7){
                   ^~
```
[R/DAISIE_check_format.R:36:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L36) *style:* **Lines should not be more than 80 characters.**
```r
    if (x$ext_rate_max < 0.0 || x$ext_rate_max < x$ext_rate || x$ext_rate_max < x$ext_rate2 ) return(FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:36:92:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L36) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if (x$ext_rate_max < 0.0 || x$ext_rate_max < x$ext_rate || x$ext_rate_max < x$ext_rate2 ) return(FALSE)
                                                                                ^
```
[R/DAISIE_check_format.R:37:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L37) *style:* **Lines should not be more than 80 characters.**
```r
    if (x$immig_rate_max < 0.0 || x$immig_rate_max < x$immig_rate || x$immig_rate_max < x$immig_rate2) return(FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:38:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L38) *style:* **Lines should not be more than 80 characters.**
```r
    if (x$clado_rate_max < 0.0 || x$clado_rate_max < x$clado_rate || x$clado_rate_max < x$clado_rate2) return(FALSE)}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:38:117:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L38) *style:* **Closing curly-braces should always be on their own line, unless it's followed by an else.**
```r
    if (x$clado_rate_max < 0.0 || x$clado_rate_max < x$clado_rate || x$clado_rate_max < x$clado_rate2) return(FALSE)}
                                                                                ^
```
[R/DAISIE_check_format.R:52:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L52) *style:* **Lines should not be more than 80 characters.**
```r
  if (island_ontogeny != "const" && island_ontogeny != "linear" && island_ontogeny != "beta") return(FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:65:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L65) *style:* **Lines should not be more than 80 characters.**
```r
  if (island_ontogeny != 0 && island_ontogeny != 1 && island_ontogeny != 2) return(FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:87:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L87) *style:* **Lines should not be more than 80 characters.**
```r
    if (!"island_age" %in% names(simulation_outputs[[n_replicate]][[1]])) return(FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:89:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L89) *style:* **Lines should not be more than 80 characters.**
```r
        !"not_present_type1" %in% names(simulation_outputs[[n_replicate]][[1]]))) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:92:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L92) *style:* **Lines should not be more than 80 characters.**
```r
    if (!"stt_all" %in% names(simulation_outputs[[n_replicate]][[1]])) return(FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:94:7:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L94) *style:* **Commented code should be removed.**
```r
    # if (!"branching_times" %in% names(simulation_outputs)) return(FALSE)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:95:7:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L95) *style:* **Commented code should be removed.**
```r
    # if (!"stac" %in% names(simulation_outputs)) return(FALSE)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_check_format.R:96:7:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_check_format.R#L96) *style:* **Commented code should be removed.**
```r
    # if (!"missing_species" %in% names(simulation_outputs)) return(FALSE)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:10:17:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L10) *warning:* **no visible global function definition for ‘DAISIE_convert_to_classic_plot’**
```r
  DAISIE_list = DAISIE_convert_to_classic_plot(DAISIE_output,Tpars = NULL)
                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:11:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L11) *style:* **Lines should not be more than 80 characters.**
```r
#' @param Tpars1 A named list containing diversification rates considering two trait states:
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:11:18:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L11) *warning:* **no visible global function definition for ‘DAISIE_convert_to_classic_plot’**
```r
  TRASIE_list1 = DAISIE_convert_to_classic_plot(TRASIE_output1,Tpars = Tpars1)
                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:12:18:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L12) *warning:* **no visible global function definition for ‘DAISIE_convert_to_classic_plot’**
```r
  TRASIE_list2 = DAISIE_convert_to_classic_plot(TRASIE_output2,Tpars = Tpars2)
                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:13:18:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L13) *warning:* **no visible global function definition for ‘DAISIE_convert_to_classic_plot’**
```r
  TRASIE_list3 = DAISIE_convert_to_classic_plot(TRASIE_output3,Tpars = Tpars3)
                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:19:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L19) *style:* **Lines should not be more than 80 characters.**
```r
#'   \item{[7]:A numeric with the number of species with trait state 2 on mainland}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:21:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L21) *style:* **Lines should not be more than 80 characters.**
```r
#' @param Tpars2 A named list containing diversification rates considering two trait states:
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:22:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L22) *style:* **Lines should not be more than 80 characters.**
```r
#' @param Tpars3 A named list containing diversification rates considering two trait states:
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:29:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L29) *style:* **Variable and function name style should be snake_case.**
```r
  DAISIE_output,
  ^~~~~~~~~~~~~
```
[R/DAISIE_compare.R:30:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L30) *style:* **Variable and function name style should be snake_case.**
```r
  TRASIE_output1,
  ^~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:31:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L31) *style:* **Variable and function name style should be snake_case.**
```r
  TRASIE_output2,
  ^~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:32:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L32) *style:* **Variable and function name style should be snake_case.**
```r
  TRASIE_output3,
  ^~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:33:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L33) *style:* **Variable and function name style should be snake_case.**
```r
  Tpars1,
  ^~~~~~
```
[R/DAISIE_compare.R:34:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L34) *style:* **Variable and function name style should be snake_case.**
```r
  Tpars2,
  ^~~~~~
```
[R/DAISIE_compare.R:35:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L35) *style:* **Variable and function name style should be snake_case.**
```r
  Tpars3){
  ^~~~~~
```
[R/DAISIE_compare.R:35:9:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L35) *style:* **There should be a space between right parenthesis and an opening curly brace.**
```r
  Tpars3){
        ^~
```
[R/DAISIE_compare.R:37:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L37) *style:* **Variable and function name style should be snake_case.**
```r
  DAISIE_list = DAISIE_convert_to_classic_plot(DAISIE_output,Tpars = NULL)
  ^~~~~~~~~~~
```
[R/DAISIE_compare.R:37:15:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L37) *style:* **Use <-, not =, for assignment.**
```r
  DAISIE_list = DAISIE_convert_to_classic_plot(DAISIE_output,Tpars = NULL)
              ^
```
[R/DAISIE_compare.R:37:62:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L37) *style:* **Commas should always have a space after.**
```r
  DAISIE_list = DAISIE_convert_to_classic_plot(DAISIE_output,Tpars = NULL)
                                                             ^
```
[R/DAISIE_compare.R:38:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L38) *style:* **Variable and function name style should be snake_case.**
```r
  TRASIE_list1 = DAISIE_convert_to_classic_plot(TRASIE_output1,Tpars = Tpars1)
  ^~~~~~~~~~~~
```
[R/DAISIE_compare.R:38:16:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L38) *style:* **Use <-, not =, for assignment.**
```r
  TRASIE_list1 = DAISIE_convert_to_classic_plot(TRASIE_output1,Tpars = Tpars1)
               ^
```
[R/DAISIE_compare.R:38:64:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L38) *style:* **Commas should always have a space after.**
```r
  TRASIE_list1 = DAISIE_convert_to_classic_plot(TRASIE_output1,Tpars = Tpars1)
                                                               ^
```
[R/DAISIE_compare.R:39:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L39) *style:* **Variable and function name style should be snake_case.**
```r
  TRASIE_list2 = DAISIE_convert_to_classic_plot(TRASIE_output2,Tpars = Tpars2)
  ^~~~~~~~~~~~
```
[R/DAISIE_compare.R:39:16:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L39) *style:* **Use <-, not =, for assignment.**
```r
  TRASIE_list2 = DAISIE_convert_to_classic_plot(TRASIE_output2,Tpars = Tpars2)
               ^
```
[R/DAISIE_compare.R:39:64:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L39) *style:* **Commas should always have a space after.**
```r
  TRASIE_list2 = DAISIE_convert_to_classic_plot(TRASIE_output2,Tpars = Tpars2)
                                                               ^
```
[R/DAISIE_compare.R:40:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L40) *style:* **Variable and function name style should be snake_case.**
```r
  TRASIE_list3 = DAISIE_convert_to_classic_plot(TRASIE_output3,Tpars = Tpars3)
  ^~~~~~~~~~~~
```
[R/DAISIE_compare.R:40:16:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L40) *style:* **Use <-, not =, for assignment.**
```r
  TRASIE_list3 = DAISIE_convert_to_classic_plot(TRASIE_output3,Tpars = Tpars3)
               ^
```
[R/DAISIE_compare.R:40:64:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L40) *style:* **Commas should always have a space after.**
```r
  TRASIE_list3 = DAISIE_convert_to_classic_plot(TRASIE_output3,Tpars = Tpars3)
                                                               ^
```
[R/DAISIE_compare.R:41:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L41) *style:* **Commented code should be removed.**
```r
  # TRASIE_list4 = DAISIE_convert_to_classic_plot(TRASIE_output4,Tpars = Tpars4)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:43:8:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L43) *style:* **Use <-, not =, for assignment.**
```r
  stt1 = DAISIE_list[["all_species"]]
       ^
```
[R/DAISIE_compare.R:44:8:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L44) *style:* **Use <-, not =, for assignment.**
```r
  stt2 = TRASIE_list1[["all_species"]]
       ^
```
[R/DAISIE_compare.R:45:8:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L45) *style:* **Use <-, not =, for assignment.**
```r
  stt3 = TRASIE_list2[["all_species"]]
       ^
```
[R/DAISIE_compare.R:46:8:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L46) *style:* **Use <-, not =, for assignment.**
```r
  stt4 = TRASIE_list3[["all_species"]]
       ^
```
[R/DAISIE_compare.R:47:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L47) *style:* **Commented code should be removed.**
```r
  # stt5 = TRASIE_list4[["all_species"]]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:50:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L50) *style:* **Commented code should be removed.**
```r
  # DAISIE_stt = stt1$stt_average[, "Total"]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:51:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L51) *style:* **Commented code should be removed.**
```r
  # TRASIE_notrans_stt = stt2$stt_average[, "Total"]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:52:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L52) *style:* **Commented code should be removed.**
```r
  # TRASIE_trans1_stt = stt3$stt_average[, "Total"]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:53:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L53) *style:* **Commented code should be removed.**
```r
  # TRASIE_trans2_stt = stt4$stt_average[, "Total"]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:54:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L54) *style:* **Commented code should be removed.**
```r
  # TRASIE_trans3_stt = stt5$stt_average[, "Total"]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:56:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L56) *style:* **Variable and function name style should be snake_case.**
```r
  Data_total<- data.frame(stt1 = stt1$stt_average[, "Total"],
  ^~~~~~~~~~
```
[R/DAISIE_compare.R:56:13:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L56) *style:* **Put spaces around all infix operators.**
```r
  Data_total<- data.frame(stt1 = stt1$stt_average[, "Total"],
           ~^
```
[R/DAISIE_compare.R:60:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L60) *style:* **Variable and function name style should be snake_case.**
```r
  Data_nonendemic <- data.frame(stt1 = stt1$stt_average[, "nI"],
  ^~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:64:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L64) *style:* **Variable and function name style should be snake_case.**
```r
  Data_Endemic <- data.frame(stt1 = stt1$stt_average[, "Endemic"],
  ^~~~~~~~~~~~
```
[R/DAISIE_compare.R:68:3:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L68) *style:* **Variable and function name style should be snake_case.**
```r
  Data <- list(Data_total, Data_Endemic, Data_nonendemic)
  ^~~~
```
[R/DAISIE_compare.R:70:6:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L70) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  for(i in 1:length(Data)){
     ^
```
[R/DAISIE_compare.R:70:12:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L70) *warning:* **Avoid 1:length(...) expressions, use seq_len.**
```r
  for(i in 1:length(Data)){
           ^
```
[R/DAISIE_compare.R:70:26:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L70) *style:* **There should be a space between right parenthesis and an opening curly brace.**
```r
  for(i in 1:length(Data)){
                         ^~
```
[R/DAISIE_compare.R:74:7:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L74) *style:* **Commented code should be removed.**
```r
    # Data[[i]]$diff1_5 <- Data[[i]]$stt5 - Data[[i]]$stt1
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:76:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Lines should not be more than 80 characters.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:76:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Variable and function name style should be snake_case.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
    ^~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:76:46:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Commas should always have a space after.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
                                             ^
```
[R/DAISIE_compare.R:76:51:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Commas should always have a space after.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
                                                  ^
```
[R/DAISIE_compare.R:76:53:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Commas should always have a space after.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
                                                    ^
```
[R/DAISIE_compare.R:76:89:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Commas should always have a space after.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
                                                                                ^
```
[R/DAISIE_compare.R:76:96:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Commas should always have a space after.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
                                                                                ^
```
[R/DAISIE_compare.R:76:100:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Commas should always have a space after.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
                                                                                ^
```
[R/DAISIE_compare.R:76:107:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Commas should always have a space after.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
                                                                                ^
```
[R/DAISIE_compare.R:76:113:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L76) *style:* **Put spaces around all infix operators.**
```r
    Data_differ_quantile <- apply(Data[[i]][,5:7],2,function(x) round(stats::quantile(x,c(0.25,0.5,0.75)),digits=2))
                                                                                ~^~
```
[R/DAISIE_compare.R:77:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L77) *style:* **Lines should not be more than 80 characters.**
```r
    rownames(Data_differ_quantile)[1:3] <-c("differ_down","differ_median","differ_up")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:77:41:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L77) *style:* **Put spaces around all infix operators.**
```r
    rownames(Data_differ_quantile)[1:3] <-c("differ_down","differ_median","differ_up")
                                        ^~~
```
[R/DAISIE_compare.R:77:59:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L77) *style:* **Commas should always have a space after.**
```r
    rownames(Data_differ_quantile)[1:3] <-c("differ_down","differ_median","differ_up")
                                                          ^
```
[R/DAISIE_compare.R:77:75:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L77) *style:* **Commas should always have a space after.**
```r
    rownames(Data_differ_quantile)[1:3] <-c("differ_down","differ_median","differ_up")
                                                                          ^
```
[R/DAISIE_compare.R:78:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L78) *style:* **Variable and function name style should be snake_case.**
```r
    Data_t <- data.frame(t(Data_differ_quantile))
    ^~~~~~
```
[R/DAISIE_compare.R:80:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L80) *style:* **Lines should not be more than 80 characters.**
```r
    pairs_name <- c("DAISIE vs. TRASIE1","DAISIE vs. TRASIE2","DAISIE vs. TRASIE3")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:80:42:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L80) *style:* **Commas should always have a space after.**
```r
    pairs_name <- c("DAISIE vs. TRASIE1","DAISIE vs. TRASIE2","DAISIE vs. TRASIE3")
                                         ^
```
[R/DAISIE_compare.R:80:63:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L80) *style:* **Commas should always have a space after.**
```r
    pairs_name <- c("DAISIE vs. TRASIE1","DAISIE vs. TRASIE2","DAISIE vs. TRASIE3")
                                                              ^
```
[R/DAISIE_compare.R:82:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L82) *style:* **Lines should not be more than 80 characters.**
```r
    pairs_CI <- paste("(", Data_t$differ_down, " ~ ", Data_t$differ_up, ")", sep = "")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:82:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L82) *style:* **Variable and function name style should be snake_case.**
```r
    pairs_CI <- paste("(", Data_t$differ_down, " ~ ", Data_t$differ_up, ")", sep = "")
    ^~~~~~~~
```
[R/DAISIE_compare.R:83:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L83) *style:* **Lines should not be more than 80 characters.**
```r
    Data_str <- data.frame(pairs_na=pairs_name,pairs_median=pairs_median,pairs_CI=pairs_CI)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:83:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L83) *style:* **Variable and function name style should be snake_case.**
```r
    Data_str <- data.frame(pairs_na=pairs_name,pairs_median=pairs_median,pairs_CI=pairs_CI)
    ^~~~~~~~
```
[R/DAISIE_compare.R:83:36:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L83) *style:* **Put spaces around all infix operators.**
```r
    Data_str <- data.frame(pairs_na=pairs_name,pairs_median=pairs_median,pairs_CI=pairs_CI)
                                  ~^~
```
[R/DAISIE_compare.R:83:48:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L83) *style:* **Commas should always have a space after.**
```r
    Data_str <- data.frame(pairs_na=pairs_name,pairs_median=pairs_median,pairs_CI=pairs_CI)
                                               ^
```
[R/DAISIE_compare.R:83:60:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L83) *style:* **Put spaces around all infix operators.**
```r
    Data_str <- data.frame(pairs_na=pairs_name,pairs_median=pairs_median,pairs_CI=pairs_CI)
                                                          ~^~
```
[R/DAISIE_compare.R:83:74:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L83) *style:* **Commas should always have a space after.**
```r
    Data_str <- data.frame(pairs_na=pairs_name,pairs_median=pairs_median,pairs_CI=pairs_CI)
                                                                         ^
```
[R/DAISIE_compare.R:83:82:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L83) *style:* **Put spaces around all infix operators.**
```r
    Data_str <- data.frame(pairs_na=pairs_name,pairs_median=pairs_median,pairs_CI=pairs_CI)
                                                                                ~^~
```
[R/DAISIE_compare.R:84:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L84) *style:* **Variable and function name style should be snake_case.**
```r
    Data_str <- as.matrix(Data_str)
    ^~~~~~~~
```
[R/DAISIE_compare.R:85:5:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L85) *style:* **Variable and function name style should be snake_case.**
```r
    Data_str <- rbind(c(NA,"Median","Interquartile ranges"),Data_str)
    ^~~~~~~~
```
[R/DAISIE_compare.R:85:28:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L85) *style:* **Commas should always have a space after.**
```r
    Data_str <- rbind(c(NA,"Median","Interquartile ranges"),Data_str)
                           ^
```
[R/DAISIE_compare.R:85:37:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L85) *style:* **Commas should always have a space after.**
```r
    Data_str <- rbind(c(NA,"Median","Interquartile ranges"),Data_str)
                                    ^
```
[R/DAISIE_compare.R:85:61:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L85) *style:* **Commas should always have a space after.**
```r
    Data_str <- rbind(c(NA,"Median","Interquartile ranges"),Data_str)
                                                            ^
```
[R/DAISIE_compare.R:86:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L86) *style:* **Lines should not be more than 80 characters.**
```r
    # jpeg(file = "results_Value_1.jpg",width =2000,height = 1800,units = "px",res =300)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:86:7:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L86) *style:* **Commented code should be removed.**
```r
    # jpeg(file = "results_Value_1.jpg",width =2000,height = 1800,units = "px",res =300)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:88:21:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L88) *style:* **Commas should always have a space after.**
```r
               c(NA,Data_t$differ_median),
                    ^
```
[R/DAISIE_compare.R:89:21:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L89) *style:* **Commas should always have a space after.**
```r
               c(NA,Data_t$differ_down),
                    ^
```
[R/DAISIE_compare.R:90:21:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L90) *style:* **Commas should always have a space after.**
```r
               c(NA,Data_t$differ_up),
                    ^
```
[R/DAISIE_compare.R:92:20:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L92) *style:* **Put spaces around all infix operators.**
```r
               xlog=FALSE,
                  ~^~
```
[R/DAISIE_compare.R:96:32:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L96) *style:* **Put spaces around all infix operators.**
```r
                            box="#D55E00"),
                              ~^~
```
[R/DAISIE_compare.R:100:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L100) *style:* **Lines should not be more than 80 characters.**
```r
               txt_gp = forestplot::fpTxtGp(ticks = grid::gpar(cex = 0.5), xlab = grid::gpar(cex = 0.7), cex = 0.7),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:102:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L102) *style:* **Lines should not be more than 80 characters.**
```r
               xlab="Differences in assessment indicators between relevant pairs"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_compare.R:102:20:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L102) *style:* **Put spaces around all infix operators.**
```r
               xlab="Differences in assessment indicators between relevant pairs"
                  ~^~
```
[R/DAISIE_compare.R:104:7:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_compare.R#L104) *style:* **Commented code should be removed.**
```r
    # dev.off()
      ^~~~~~~~~
```
[R/DAISIE_create_island.R:5:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L5) *style:* **Lines should not be more than 80 characters.**
```r
#' @param island_spec matrix with species on island (state of system at each time point)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:7:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
#' @param Tpars A named list containing diversification rates considering two trait states:
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:15:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L15) *style:* **Lines should not be more than 80 characters.**
```r
#'   \item{[7]:A numeric with the number of species with trait state 2 on mainland}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:20:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L20) *style:* **Lines should not be more than 80 characters.**
```r
#' @return list with the island information, composed stt table, branching times of extant
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:22:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L22) *style:* **Variable and function name style should be snake_case.**
```r
DAISIE_create_island <- function(stt_table,
^~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:22:44:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L22) *style:* **Trailing whitespace is superfluous.**
```r
DAISIE_create_island <- function(stt_table,
                                           ^
```
[R/DAISIE_create_island.R:23:44:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L23) *style:* **Trailing whitespace is superfluous.**
```r
                                 totaltime,
                                           ^
```
[R/DAISIE_create_island.R:24:46:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L24) *style:* **Trailing whitespace is superfluous.**
```r
                                 island_spec,
                                             ^
```
[R/DAISIE_create_island.R:26:34:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L26) *style:* **Variable and function name style should be snake_case.**
```r
                                 Tpars,
                                 ^~~~~
```
[R/DAISIE_create_island.R:28:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L28) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/DAISIE_create_island.R:41:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L41) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/DAISIE_create_island.R:43:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L43) *style:* **Lines should not be more than 80 characters.**
```r
  ### if there are no species on the island branching_times = island_age, stac = 0, missing_species = 0
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:44:27:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L44) *style:* **Commas should always have a space after.**
```r
  if (length(island_spec[,1]) == 0) {
                          ^
```
[R/DAISIE_create_island.R:45:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L45) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/DAISIE_create_island.R:46:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L46) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:59:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L59) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:67:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L67) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:69:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L69) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:71:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L71) *style:* **Lines should not be more than 80 characters.**
```r
    island_spec[, "branching time (BP)"] <- totaltime - as.numeric(island_spec[, "branching time (BP)"])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:72:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L72) *style:* **Lines should not be more than 80 characters.**
```r
    island_spec[, "Colonisation time (BP)"] <- totaltime - as.numeric(island_spec[, "Colonisation time (BP)"])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:73:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L73) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:82:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L82) *style:* **Lines should not be more than 80 characters.**
```r
      colonists_present <- sort(as.numeric(unique(island_spec[, 'Mainland Ancestor'])))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:82:65:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L82) *style:* **Only use double-quotes.**
```r
      colonists_present <- sort(as.numeric(unique(island_spec[, 'Mainland Ancestor'])))
                                                                ^~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:87:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L87) *style:* **Lines should not be more than 80 characters.**
```r
        subset_island <- island_spec[which(island_spec[, 'Mainland Ancestor'] == colonists_present[i]),]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:87:58:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L87) *style:* **Only use double-quotes.**
```r
        subset_island <- island_spec[which(island_spec[, 'Mainland Ancestor'] == colonists_present[i]),]
                                                         ^~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:87:104:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L87) *style:* **Commas should always have a space after.**
```r
        subset_island <- island_spec[which(island_spec[, 'Mainland Ancestor'] == colonists_present[i]),]
                                                                                ^
```
[R/DAISIE_create_island.R:89:37:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L89) *style:* **Only use double-quotes.**
```r
        if (class(subset_island) != 'matrix') {
                                    ^~~~~~~~
```
[R/DAISIE_create_island.R:95:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L95) *style:* **Lines should not be more than 80 characters.**
```r
                                                      island_spec = subset_island,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:97:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L97) *style:* **Lines should not be more than 80 characters.**
```r
                                                      keep_final_state = keep_final_state)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:106:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L106) *style:* **Lines should not be more than 80 characters.**
```r
                       taxon_list = island_clades_info, island_spec = island_spec)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:114:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L114) *style:* **Variable and function name style should be snake_case.**
```r
DAISIE_create_island_trait <- function(stt_table,
^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:118:34:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L118) *style:* **Variable and function name style should be snake_case.**
```r
                                 Tpars,
                                 ^~~~~
```
[R/DAISIE_create_island.R:119:58:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L119) *style:* **There should be a space between right parenthesis and an opening curly brace.**
```r
                                 keep_final_state = FALSE){
                                                         ^~
```
[R/DAISIE_create_island.R:121:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L121) *style:* **Lines should not be more than 80 characters.**
```r
  ### if there are no species on the island branching_times = island_age, stac = 0, missing_species = 0
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:122:27:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L122) *style:* **Commas should always have a space after.**
```r
  if (length(island_spec[,1]) == 0) {
                          ^
```
[R/DAISIE_create_island.R:123:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L123) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:124:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L124) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:145:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L145) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:147:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L147) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:149:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L149) *style:* **Lines should not be more than 80 characters.**
```r
    island_spec[, "branching time (BP)"] <- totaltime - as.numeric(island_spec[, "branching time (BP)"])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:150:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L150) *style:* **Lines should not be more than 80 characters.**
```r
    island_spec[, "Colonisation time (BP)"] <- totaltime - as.numeric(island_spec[, "Colonisation time (BP)"])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:151:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L151) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:152:21:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L152) *style:* **Use <-, not =, for assignment.**
```r
    mainland_ntotal = mainland_n + Tpars$M2
                    ^
```
[R/DAISIE_create_island.R:153:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L153) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/DAISIE_create_island.R:159:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L159) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~
```
[R/DAISIE_create_island.R:160:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L160) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~
```
[R/DAISIE_create_island.R:162:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L162) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~
```
[R/DAISIE_create_island.R:164:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L164) *style:* **Lines should not be more than 80 characters.**
```r
      colonists_present <- sort(as.numeric(unique(island_spec[, 'Mainland Ancestor'])))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:164:65:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L164) *style:* **Only use double-quotes.**
```r
      colonists_present <- sort(as.numeric(unique(island_spec[, 'Mainland Ancestor'])))
                                                                ^~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:165:60:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L165) *style:* **Trailing whitespace is superfluous.**
```r
      number_colonists_present <- length(colonists_present)
                                                           ^
```
[R/DAISIE_create_island.R:166:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L166) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~
```
[R/DAISIE_create_island.R:167:35:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L167) *style:* **Trailing whitespace is superfluous.**
```r
      island_clades_info <- list()
                                  ^~
```
[R/DAISIE_create_island.R:169:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L169) *style:* **Lines should not be more than 80 characters.**
```r
        subset_island <- island_spec[which(island_spec[, 'Mainland Ancestor'] == colonists_present[i]),]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:169:58:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L169) *style:* **Only use double-quotes.**
```r
        subset_island <- island_spec[which(island_spec[, 'Mainland Ancestor'] == colonists_present[i]),]
                                                         ^~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:169:104:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L169) *style:* **Commas should always have a space after.**
```r
        subset_island <- island_spec[which(island_spec[, 'Mainland Ancestor'] == colonists_present[i]),]
                                                                                ^
```
[R/DAISIE_create_island.R:169:105:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L169) *style:* **Trailing whitespace is superfluous.**
```r
        subset_island <- island_spec[which(island_spec[, 'Mainland Ancestor'] == colonists_present[i]),]
                                                                                ^
```
[R/DAISIE_create_island.R:170:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L170) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~~~
```
[R/DAISIE_create_island.R:171:37:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L171) *style:* **Only use double-quotes.**
```r
        if (class(subset_island) != 'matrix') {
                                    ^~~~~~~~
```
[R/DAISIE_create_island.R:175:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L175) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~~~
```
[R/DAISIE_create_island.R:177:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L177) *style:* **Lines should not be more than 80 characters.**
```r
                                                      island_spec = subset_island,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:179:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L179) *style:* **Lines should not be more than 80 characters.**
```r
                                                      keep_final_state = keep_final_state)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/DAISIE_create_island.R:185:1:](https://github.com/rsetienne/DAISIE/blob/604fd8c300113c176e786c87149c82e631369fc5/R/DAISIE_create_island.R#L185) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~~~
```


Можно просто `puts s`


Nice


您好，我对您的CCL文章的代码说明看的不是很明白，能再说清楚一点吗


first build


@chelmuth you are right, a examplary vfs config is missing. I'll preprare a fixup commit. Thanks for noticing.


`k, m, t = [a, b, c].sort` - и следующие строки не нужны
И я бы не стал давать имена вроде k, m, t - они ни о чем не говорят. Лучше хотя бы a, b, h(гипотенуза)


Отступы тут посему-то табами, а не двумя пробелами :(


这么搞是不是不太对……（（（


(or shorter version with `method: config.device.isMobile ? 'channel_get' : 'channel_get_and_minimize'`)


I wonder whether installing those example files in `/usr/share/doc/systemd/examples` makes more sense


Si quieres mostrar la competencia, no la tienes que meter en un field para poder sacarla en el XML?


Successfully deployed to following URLs:

* https://service-centre-i5d9ymss6.now.sh
* https://service-centre.now.sh
* https://service-centre.andrewmcoupe.now.sh
* https://service-centre-git-master.andrewmcoupe.now.sh


I am working on fixing it


> Is the change of _RET_VAL_INT assembly also applicable to 3.8? (without using ecx)

Yes, the script pointer will be taken from the ebx register which does not change.

defaultOpcodeHandler() - here I did not understand your thought.


okay, i use `routes ` here from the very start.


Si quieres mostrar la competencia por XML, no es necesario que esté en una variable?


Lo mismo.


Fixed. import obj `styles` from module.css


Good job!


well done, adding it below the charset and all


Well done, all good to go, feel free to send me a pull request and i'll pull it into my original repo.


Okay, found it. I need to add the following kernel config:
```
    extraConfig = ''
      CRYPTO_AEGIS128_SIMD n
    '';
```


@niksedk
```c#
    if (line.EndsWith(Text, StringComparison.Ordinal))
    {
        var index = line.Length - Text.Length - 1;
        return index < 0 || line[index] == ' ';
    }
    return false;
}
```
Less elegant, but more efficient?


used className='dropList'


Probably need to add --init flag to git submodule update, if the submodule hasn't been initialized...


@JuliaRegistrator register


@nfeske please add 6079a46 (contains CBE-VFS config example).


Registration pull request created: [JuliaRegistries/General/5968](https://github.com/JuliaRegistries/General/pull/5968)

After the above pull request is merged, it is recommended that a tag is created on this repository for the registered package version.

This will be done automatically if [Julia TagBot](https://github.com/apps/julia-tagbot) is installed, or can be done manually through the github interface, or via:
```
git tag -a v0.0.3 -m "<description of version>" dd054a0f24ccb144dab64b4a0ad0c5b4f2f6c597
git push origin v0.0.3
```


***'/demo'*** rather than ***'/demos'***
sorry for being such a nudnik..


Правильно будет: Выставлять промахи вокруг потопленных судов
Есть наработки по переводу yii2 на узбекский. Нужен коллега.
Напишите мне в телеграм https://t.me/Collibri


@rijkvanzanten This change make install broken, api[].ERROR: Error: Undefined class constant 'TYPE_STRIN' in /var/www/migrations/install/20180220023208_create_files_table.php


обнаружение 500й ошибки


Successfully deployed to following URLs:

* https://mcs-new-version-53015cne6.now.sh
* https://mcs-new-version.m-c-s.now.sh
* https://mcs-new-version-git-master.m-c-s.now.sh


Successfully deployed to following URLs:

* https://next-js-project-nmdtgzx4n.now.sh
* https://next-js-project.now.sh
* https://next-js-project.roman40a.now.sh
* https://next-js-project-git-master.roman40a.now.sh


Successfully deployed to following URLs:

* https://surname-site-l02agb5q5.now.sh
* https://stickajones.org
* https://surname-site.keplersj.now.sh
* https://surname-site-git-master.keplersj.now.sh


Давай без этого хэша сделаем? Можно total считать динамически


Deployment failed with the following error:

~~~
Couldn't parse JSON file /tmp/f7gAivQYoD0VxRy47z3DE8iN/repo/package.json.
~~~


El objeto hace referencia a la competencia, no a la competencia padre, por tanto ha habido una confusión con el nombre. El related lo he modificado de la siguiente forma: exam_id.n_line_id.competence_id.evaluation_check


I've already untie AllowUnsafeScripting from sfall debugging mode `Enable` in 4.2.1.
I just think printing the error message `Error: file not found: (some frm)` in message windows in the game like how the game treats missing message line would be better than the hard interruption.


Lo mismo.


Ssoso2747 @davidxiasc


@nfeske please also merge 24dc6df (contains minor tpyo fix).


Deployment failed with the following error:

~~~
Your `package.json` file is missing a `build` property inside the `script` property.
~~~


Successfully deployed to following URLs:

* https://website-m192m81xe.now.sh
* https://keplersj.com
* https://website.keplersj.now.sh
* https://website-git-master.keplersj.now.sh


Successfully deployed to following URLs:

* https://next-js-project-n3yn3rffo.now.sh
* https://next-js-project.now.sh
* https://next-js-project.roman40a.now.sh
* https://next-js-project-git-master.roman40a.now.sh


@martong When will we move to the monorepo? 😉


Successfully deployed to following URLs:

* https://macrae-m2agb9sbf.now.sh
* https://new.macr.ae
* https://macrae.callumacrae.now.sh
* https://macrae-git-new-site.callumacrae.now.sh


This also

`||weefy.me^`


zmq


>
>
> > Is the change of _RET_VAL_INT assembly also applicable to 3.8? (without using ecx)
>
> Yes, the script pointer will be taken from the ebx register which does not change.
>
> defaultOpcodeHandler() - here I did not understand your thought.

OK. I'll update ASM code later.
I'm just not sure about if ebx (containing the script pointer) is the same for 3.8.


@cybersamx snap

- @srisc @ssoso 2747 سين

-

1.

- [ ]


@amercader
Is it `ckan2.8` thing?


Deployment failed with the following error:

~~~
The domain used as an alias roman40a.com is not verified yet. Please verify it.
~~~


can show 6 tasks one time


#2019011268liuchang
x1 <- c(25,20,6,1001,525,825,120,28,7,532,75,40,187,122,74)
x2 <- c(3547.79,896.34,750.32,2087.05,1639.31,3357.70,808.47,520.27,671.13,2863.32,1160.00,862.75,672.99,901.76,3546.18)
y <- c(553.96,208.55,3.10,2815.40,1052.12,3427.00,442.82,70.12,122.24,1400.00,464.00,7.50,224.18,538.94,2442.79)
economicdata <- data.frame(x1,x2,y)
economicdata
economic <-lm(y~x1+x2,data=economicdata)
economic
summary(economic)
y1 <- fitted(economic)
y1
options(digits=1)
y1
ei <- y-y1
ei
a <- rep(1,15)
a
X <- cbind(a,x1,x2);X
H <- X%*%solve(t(X)%*%X)%*%t(X)
H
C <- diag(H)
C
options(digits=2)
SRE <- (ei/(475.8*sqrt(1-C)))
SRE
options(digits = 1)
EI <- ei/(1-C)
EI
options(digits=3)
SREi <- SRE*sqrt((15-2-2)/(15-2-1-SRE^2))
SREi
options(digits=2)
chii <- C-1/15
chii
Di <- C*(ei^2)/((2+1)*(475.8^2)*(1-H)^2)
Di
table48 <- data.frame(x1,x2,y,ei = ei,SRE = SRE,e_i =EI ,SREi =SREi ,chii = chii,Di = Di)
table48


test


I like my approach because those files are easy to discover, if anyone looks in the directory where the other ones are. It is also self-documenting in the sense that it is obvious what type of file it is and where it should go. Having a parallel hierarchy under /usr/share/doc/ would requires a lot of empty directories.


 ## 2019011209 ## ZHENG TIAN CI ##
 rm(list = ls(all = TRUE))
  x1 <- rep(1,15)
  x2<- c(25,20,6,1001,525,825,120,28,7,532,75,40,187,122,74)
  x3<- c(3547.79,896.34,750.32,2087.05,1639.31,3357.70,808.47,520.27,671.13,2863.32,1160.00,862.75,672.99,901.76,3546.18)
  y<- c(553.96,208.55,3.10,2815.40,1052.12,3427.00,442.82,70.12,122.24,1400.00,464.00,7.50,224.18,538.94,2442.79)
  x <- cbind(x1,x2,x3)
  #fix(x)
  ttx <- t(x)
  f <- ttx %*% x
  g <- solve(f) #逆
  b <- g %*% ttx %*% y
  e <- x %*% b
  e1 <- y - e
  h <- x %*% g %*% ttx
  hi <- diag(h)
  n <- length(hi)
  chii<- hi -1/n
  c <- 1 -hi
  cm <- matrix(c,nrow =1)
  s <-apply(cm,2,sqrt)

  sum1 <- t(e1) %*% e1
  len <- length(e1)
  sigma <- sqrt(sum1/(len-2))
  sigma <- as.numeric(sigma)
  h2 <- sigma * s  # 分母
  sre <- e1/h2
  eii<- e1/(1-hi)
  srei<- sre * sqrt((n-2-2)/(n-2-1-sre^2))

  di<- (e1^2 / ((2+1)* sigma^2))*(hi/(1-hi)^2)

  res<- cbind(x2,x3,y,e1,sre,eii,srei,chii,di)

   options(digits=3)
   a <- matrix(c(1,2,3,4,5,6,7,8,9),nrow = 3)
   v <- diag(a)

  # ctrl + z
  square <- function(x) {
  n <- length(x)
  for (i in 1:n) {
  x[i] = x[i]^2
  }
  }

h <- c(1,2,4)
n <- length(h)

square <- function(h) {
n <- length(h)
for (i in 1:n) h[i] = h[i]^2
}

h


使ってもいいですか？


The same thing is in the branches `openwrt-18.06` and `openwrt-19.07`. Would you mind to backport it there?


###

> snapios/.gitignore****


게임이 종료되면 Time, Username, Date(당일 날짜) 기록됨.
 * 기록은 Time 순서대로 배치됨.


아바타 자동생성, 패스워드 암호화를 models/users 에서 작업 되도록 하는 과정


Successfully deployed to following URLs:

* https://service-centre-angyobirx.now.sh
* https://service-centre.now.sh
* https://service-centre.andrewmcoupe.now.sh
* https://service-centre-git-master.andrewmcoupe.now.sh


 ## 2019011209 ## ZHENG TIAN CI ##
 rm(list = ls(all = TRUE))
  x1 <- rep(1,15)
  x2<- c(25,20,6,1001,525,825,120,28,7,532,75,40,187,122,74)
  x3<- c(3547.79,896.34,750.32,2087.05,1639.31,3357.70,808.47,520.27,671.13,2863.32,1160.00,862.75,672.99,901.76,3546.18)
  y<- c(553.96,208.55,3.10,2815.40,1052.12,3427.00,442.82,70.12,122.24,1400.00,464.00,7.50,224.18,538.94,2442.79)
  x <- cbind(x1,x2,x3)
  #fix(x)
  ttx <- t(x)
  f <- ttx %*% x
  g <- solve(f) #逆
  b <- g %*% ttx %*% y
  e <- x %*% b
  e1 <- y - e
  h <- x %*% g %*% ttx
  hi <- diag(h)
  n <- length(hi)
  chii<- hi -1/n
  c <- 1 -hi
  cm <- matrix(c,nrow =1)
  s <-apply(cm,2,sqrt)
  sum1 <- t(e1) %*% e1
  len <- length(e1)
  sigma <- sqrt(sum1/(len-2))
  sigma <- as.numeric(sigma)
  h2 <- sigma * s  # 分母
  sre <- e1/h2
  eii<- e1/(1-hi)
  srei<- sre * sqrt((n-2-2)/(n-2-1-sre^2))
  di<- (e1^2 / ((2+1)* sigma^2))*(hi/(1-hi)^2)
  res<- cbind(x2,x3,y,e1,sre,eii,srei,chii,di)
   options(digits=3)
   a <- matrix(c(1,2,3,4,5,6,7,8,9),nrow = 3)
   v <- diag(a)
  square <- function(x) {
  n <- length(x)
  for (i in 1:n) {
  x[i] = x[i]^2
  }
  }
h <- c(1,2,4)
n <- length(h)
square <- function(h) {
n <- length(h)
for (i in 1:n) h[i] = h[i]^2
}


@nachakra What does it mean when the version is in future? Is it a preview or it's going to be released exactly on this date?


Successfully deployed to following URLs:

* https://597w9uun3-n2hwmif2o.now.sh
* https://johno.com
* https://www.johno.com
* https://git-master.johno1.now.sh


 #2019011209郑天赐
 rm(list = ls(all = TRUE))
  x1 <- rep(1,15)
  x2<- c(25,20,6,1001,525,825,120,28,7,532,75,40,187,122,74)
  x3<- c(3547.79,896.34,750.32,2087.05,1639.31,3357.70,808.47,520.27,671.13,2863.32,1160.00,862.75,672.99,901.76,3546.18)
  y<- c(553.96,208.55,3.10,2815.40,1052.12,3427.00,442.82,70.12,122.24,1400.00,464.00,7.50,224.18,538.94,2442.79)
  x <- cbind(x1,x2,x3)
  #fix(x)
  ttx <- t(x)
  f <- ttx %*% x
  g <- solve(f) #逆
  b <- g %*% ttx %*% y
  e <- x %*% b
  e1 <- y - e
  h <- x %*% g %*% ttx
  hi <- diag(h)
  n <- length(hi)
  chii<- hi -1/n
  c <- 1 -hi
  cm <- matrix(c,nrow =1)
  s <-apply(cm,2,sqrt)
  sum1 <- t(e1) %*% e1
  len <- length(e1)
  sigma <- sqrt(sum1/(len-2))
  sigma <- as.numeric(sigma)
  h2 <- sigma * s  # 分母
  sre <- e1/h2
  eii<- e1/(1-hi)
  srei<- sre * sqrt((n-2-2)/(n-2-1-sre^2))
  di<- (e1^2 / ((2+1)* sigma^2))*(hi/(1-hi)^2)
  res<- cbind(x2,x3,y,e1,sre,eii,srei,chii,di)
   options(digits=3)
   a <- matrix(c(1,2,3,4,5,6,7,8,9),nrow = 3)
   v <- diag(a)
  square <- function(x) {
  n <- length(x)
  for (i in 1:n) {
  x[i] = x[i]^2
  }
  }
h <- c(1,2,4)
n <- length(h)
square <- function(h) {
n <- length(h)
for (i in 1:n) h[i] = h[i]^2
}


Deployment failed with the following error:

~~~
Your `package.json` file is missing a `build` property inside the `script` property.
~~~


余分な改行


Successfully deployed to following URLs:

* https://fengqijunblog-g7oveygju.now.sh
* https://fengqijun-blog.now.sh
* https://fengqijun.me
* https://blog.fengqijun.me
* https://fengqijun-blog.fengqijun.now.sh
* https://fengqijun-blog-git-master.fengqijun.now.sh


I didn't managed to get GPG reading a stream instead of a file.
Although, I just added a line to delete the file once imported: https://github.com/qcastel/github-actions-maven-release/blob/master/release.sh#L37

That should do the job


I use swaywm that starts urxvtd. When I use wl-clipboard with urxvt clipboard extensions, sometimes everything freezes and sway… just restarts. It's my config file, I needed that to work so I did not spend time on the problem when I discovered it, just rolled back to the urxvt defaults.
But you're right, I should open an issue. I will test this configuration again to see what is wrong in more details.


Snap ssoso 2747

>


Successfully deployed to following URLs:

* https://picker-hnbmqgabw.now.sh
* https://picker-omega-five.now.sh
* https://picker.react-component.now.sh
* https://picker-git-master.react-component.now.sh


Successfully deployed to following URLs:

* https://deltahorse-efgbsxix9.now.sh
* https://deltahorse.now.sh
* https://deltahorse.charlestc.now.sh
* https://deltahorse-git-master.charlestc.now.sh


lgtm


hello prathyusha


Snap


On UNIX systems this will be a problem, the comma at the end breaks the compilation.


Successfully deployed to following URLs:

* https://website-6sv7zf0ar.now.sh
* https://keplersj.com
* https://website.keplersj.now.sh
* https://website-git-master.keplersj.now.sh


Successfully deployed to following URLs:

* https://picker-5p9yw5823.now.sh
* https://picker-omega-five.now.sh
* https://picker.react-component.now.sh
* https://picker-git-master.react-component.now.sh


> DBQuery 수정
import java.sql.*;
import java.sql.Time;
import java.time.LocalTime;
import java.util.ArrayList;
import java.util.Date;

public class DBQuery {
    ClassRoom[] rooms; //현 층수에 대한 강의실 정보
    Reservation[] res;//예약 등록
    ReservationList[] rselist; //예약 조회
    Member myinfo; //로그인 정보 다른 곳에서 사용하고 싶으면 DBQuery.myinfo로 할 것!
    Search search;

    int roomnumber; //강의실 호수
    int rsenumber;
    int nop; //예약 인원 수
    int cnt = 0;
    int schedulecnt=0;
    String d = null; //date
    String t = null; //time or temp

    ConnectDB db = new ConnectDB();
    Connection conn = null;
    Statement stmt = null;
    ResultSet rset = null;
    PreparedStatement pstmt = null;

    String query = null;

    public void setRegister(String name, int id) //회원가입 -> 최지훈
    {
        try {
            conn = db.getMySQLConnection();
            query = "INSERT INTO mydb.member (S_ID,S_NAME) VALUES (? , ?);";
            pstmt = conn.prepareStatement(query);

            pstmt.setInt(1,id);
            pstmt.setString(2,name);

            pstmt.executeUpdate();

        } catch (SQLException e) {
            e.printStackTrace();
        } finally {
            db.close(stmt);
            db.close(rset);
            db.close(conn);
        }
    }

    public int setMemInfo(int id) //로그인 -> 최지훈
    {
        int myid;
        String myname;
        int result = 0;

        try {
            conn = db.getMySQLConnection();
            stmt = conn.createStatement();
            query = "select * from mydb.member where S_ID = "+id+";";
            rset = stmt.executeQuery(query);

            if (rset != null) {
                while (rset.next()) { //현재 시간에 대한 강의실 호수 -> 호수 정보를 알고 싶으면 DBQuery.rooms[i]를 통해서 가져오기
                    myid = rset.getInt(1);
                    myname = rset.getString(2);
                    myinfo = new Member(myid,myname);
                    result=1;
                }
            }

        } catch (SQLException e) {
            e.printStackTrace();
        } finally {
            db.close(stmt);
            db.close(rset);
            db.close(conn);
        }

        return result;
    }

    public void setSearch(int day, Time time, int floor) { //검색 강의실 정보 -> 박재용
        int i = 0;
        try {

            rooms = new ClassRoom[10];
            schedulecnt=0;

            System.out.println("day :: "+ day + "time ::: "+ time + "floor :: "+ floor);
            conn = db.getMySQLConnection();
            stmt = conn.createStatement();

            query = "select * from mydb.schedule where L_DAY = "+day+" and "+"L_S_TIME = \'"+time + "\' and " + "L_FLOOR = " + floor +";";

            rset = stmt.executeQuery(query);

            if (rset != null) {
                while (rset.next()) { //현재 시간에 대한 강의실 호수 -> 호수 정보를 알고 싶으면 DBQuery.rooms[i]를 통해서 가져오기
                    roomnumber = rset.getInt(2);
                    rooms[i] = new ClassRoom(roomnumber);
                    schedulecnt++;
                    i++;
                }
            }
        } catch (SQLException e) {
            e.printStackTrace();
        } finally {
            db.close(stmt);
            db.close(rset);
            db.close(conn);
        }

        i=0;
    }

    public void setReservation(int room) //현 강의실 예약 현황 -> 박소연
    {
        int i = 0;
        try {
            res = new Reservation[10];
            conn = db.getMySQLConnection();
            stmt = conn.createStatement();

            query = "select * from mydb.reservation where  ROOMNUM = "+ room;
            rset = stmt.executeQuery(query);

            if (rset != null) {
                while (rset.next()) {
                    roomnumber = rset.getInt(2); //강의실 호수
                    t = rset.getString(3); //시간
                    nop = rset.getInt(5); //예약 인원
                    res[i] = new Reservation(roomnumber, t, nop);
                    i++;
                    cnt++;
                }
            }
            i = 0;

        } catch (SQLException e) {
            e.printStackTrace();
        } finally {
            db.close(stmt);
            db.close(rset);
            db.close(conn);
        }
    }

    public void insertReservation(int n, int r, String t, String d, int id) //예약 확정 -> 박소연
    {
        try {
            conn = db.getMySQLConnection();

            query = "INSERT INTO mydb.reservation (ROOMNUM, R_TIME, R_DATE, NOP, MEMBER_S_ID) VALUES (?,?,?,?,?);";
            pstmt = conn.prepareStatement(query);

            pstmt.setInt(1,r);
            pstmt.setTime(2,java.sql.Time.valueOf(t));
            pstmt.setDate(3,java.sql.Date.valueOf(d));
            pstmt.setInt(4,n);
            pstmt.setInt(5,id);

            pstmt.executeUpdate();

        } catch (SQLException e) {
            e.printStackTrace();
        } finally {
            db.close(stmt);
            db.close(rset);
            db.close(conn);
        }
    }

    public void setRselist(int id) //나의 예약 조회 -> 오현경
    {
        int i = 0;
        try {
            rselist = new ReservationList[10];
            conn = db.getMySQLConnection();
            stmt = conn.createStatement();

            query = "select * from mydb.reservation where MEMBER_S_ID = " + id +";";
            rset = stmt.executeQuery(query);

            if (rset != null) {
                while (rset.next()) {
                    rsenumber = rset.getInt(1);
                    roomnumber = rset.getInt(2);
                    t = rset.getString(3);
                    if(t.charAt(3) != '0' && t.charAt(4)!='0')
                        t = t.substring(0,2) + "시 "+t.substring(3,5)+"분";
                    else
                        t = t.substring(0,2) + "시";
                    d = rset.getString(4);
                    d=d.substring(5,7)+"월 "+d.substring(8,10) +"일";
                    nop = rset.getInt(5);
                    rselist[i] = new ReservationList(rsenumber,roomnumber,t,d,nop);
                    cnt++;
                    i++;
                }
            }

        } catch (SQLException e) {
            e.printStackTrace();
        } finally {
            db.close(stmt);
            db.close(rset);
            db.close(conn);
        }
    }

    public void Update( int del) //예약 취소 -> 오현경
    {
        try {
            conn = db.getMySQLConnection();
            stmt = conn.createStatement();

            //예약 번호는 디비에서 자동 증가(1000~)
            query = "delete from mydb.reservation where R_ID ="+del+";";

            stmt.executeUpdate(query);

        } catch (SQLException e) {
            e.printStackTrace();
        } finally {
            db.close(stmt);
            db.close(rset);
            db.close(conn);
        }
    }
}


yep, this is legacy of the source. I'll correct


@3djc please update also the IT section with:

#define TR_MODULE_UPDATE               TR("Agg. racc.", "Agg. modulo raccom.")


T5 pulley where can I get it


Successfully deployed to following URLs:

* https://commercetools-docs-kit-nmuwqgurn.now.sh
* https://commercetools-docs-kit.now.sh
* https://commercetools-docs-kit.commercetools.now.sh
* https://commercetools-docs-kit-git-master.commercetools.now.sh


@thijsjanzen: welcome on my branch!

I guess this was a typo or misclick. No worries, that happens. Just wanted to be sure you know :+1:


前端如果接受大量数据，可能下载会有延迟，速度较慢。所以最好还是后端支持，前端直接解析文件流。


Successfully deployed to following URLs:

* https://website-n5r9sm9ew.now.sh
* https://keplersj.com
* https://website.keplersj.now.sh
* https://website-git-master.keplersj.now.sh


display_print` does not have a constructor for %s, you need to use the `sprintf_` engine function to make a message for `display_print`


[R/bbt_get_paths.R:4:21:](https://github.com/ropensci/babette/blob/27167821e5f746ceea11f1a92ebbf84bf5ce43b5/R/bbt_get_paths.R#L4) *warning:* **no visible global function definition for ‘get_babette_path’**
```r
    filenames[i] <- get_babette_path(filenames[i]) # nolint internal function
                    ^~~~~~~~~~~~~~~~
```
[R/bbt_process_pkg_output.R:7:15:](https://github.com/ropensci/babette/blob/27167821e5f746ceea11f1a92ebbf84bf5ce43b5/R/bbt_process_pkg_output.R#L7) *warning:* **no visible global function definition for ‘bbt_create_ns’**
```r
    out$ns <- bbt_create_ns(out$output) # nolint internal function
              ^~~~~~~~~~~~~
```


what is this variable name


I know I should call sprintf, but the game crashed in my attempt. :\\


> what is this variable name

yes


sorry i will patch it
please do not fire me


@kitfit-dave EOL of node@8 is 31 December, also webpack@5 support only node@10, so we prepare loaders/plugins for webpack@5, you can you old version of file-loader if you need support node@8


Deployment failed with the following error:

~~~
The domain used as an alias roman40a.com is not verified yet. Please verify it.
~~~


But TDBB_trusted_ddl should be anyway cleaned in DDL triggers.
In other case they are able to change system tables directly.


FINALLY DONE


test


Examples of how to do this are in the code.


Successfully deployed to following URLs:

* https://firstmeanseverythingcom-idmxu9gyx.now.sh
* https://firstmeanseverything.com
* https://firstmeanseverythingcom.firstmeanseverything.now.sh
* https://firstmeanseverythingcom-git-master.firstmeanseverything.now.sh


why this masking is done?


Successfully deployed to following URLs:

* https://linketech-website-mwbm26dt8.now.sh
* https://linketech-website-smoky-pi.now.sh
* https://linketech-website.linketech.now.sh
* https://linketech-website-git-master.linketech.now.sh


тут лучше проверить на undefined именно, потому что можно передать пустую строку, например


Need to do optimizations now. Also have to add feature to delete posts and view latest post even from other user. Right now we need adress to view it.


Successfully deployed to following URLs:

* https://commercetools-docs-kit-nvul6z40u.now.sh
* https://commercetools-docs-kit.now.sh
* https://commercetools-docs-kit.commercetools.now.sh
* https://commercetools-docs-kit-git-master.commercetools.now.sh


@hamza-ubx a name is too long can make it shorter?


Current Test Coverage
![CurrentCoverage](https://user-images.githubusercontent.com/17881489/69795232-1154eb80-11cc-11ea-89cd-42a146902182.PNG)


@Ratana176 s


No, the son_slave reads it and sends it BACKHAUL_ENABLE message and it still being used on the backhaul manager.


With Clang 10.0 we must.


I already rebase your latest changes. I put the new error code you added in the end.


What's about all other supported countries? :)
https://bank.codes/iban/structure/


Successfully deployed to following URLs:

* https://gamerclubweb-gvwy92rpm.now.sh
* https://gamer.epicdata.net
* https://gamerclubweb.openepicdata.now.sh
* https://gamerclubweb-git-master.openepicdata.now.sh


trebuie la finalul  cout sa pui :, sa arate mai frumy, antelegi?


ok


Successfully deployed to following URLs:

* https://hn-client-mpnh80ot7.now.sh
* https://hn-client.now.sh
* https://hn-client.joshvasquez.now.sh
* https://hn-client-git-master.joshvasquez.now.sh


Successfully deployed to following URLs:

* https://alpaka-my-life-34934yrf3.now.sh
* https://alpaka-my-life.now.sh
* https://alpaka-my-life.laurapauly.now.sh
* https://alpaka-my-life-git-master.laurapauly.now.sh


To avoid the Message Pool Overflow


Successfully deployed to following URLs:

* https://website-5givgolzv.now.sh
* https://keplersj.com
* https://website.keplersj.now.sh
* https://website-git-master.keplersj.now.sh


thanks for the clarification. hope someone documents the build process someday.


Sure. I meant for name to be as descriptive as possible. Should I shorten it?


Merged Ralf's changes to [the HEAD of this branch](https://github.com/mattip/numpy/blob/nep-simd/doc/neps/nep-XXXX-SIMD-optimizations.rst). The problem with HackMD is the markdown/RST clash, but a PR puts it into the public realm. What would you prefer?


[Untitled document.pdf](https://github.com/Jose23237/che23/files/3901003/Untitled.document.pdf)


yes please


Thanks, sorry to bump this on you. You may see similar problems when **sf** implements the PROJ6/GDAL3 changes being piloted in **sp**/**rgdal** (look for use of `st_crs()` and `st_transform`).


dfdfkdfjdkfaldskdfj


Successfully deployed to following URLs:

* https://linketech-website-mjt8y6i9h.now.sh
* https://linketech-website-smoky-pi.now.sh
* https://linketech-website.linketech.now.sh
* https://linketech-website-git-master.linketech.now.sh


 郑月 2019011280

x1 <-c(25,20,6,1001,525,825,120,28,7,532,75,40,187,122,74)
x2 <-c(3547.79,896.34,750.32,2087.05,1639.31,3357.70,808.47,520.27,671.13,2863.32,1160.00,862.75,672.99,
901.76,3546.18)
y <-c(553.96,208.55,3.10,2815.40,1052.12,3427.00,442.82,70.12,122.24,1400.00,464.00,7.50,224.18,538.94,2442.79)
A <- data.frame(x1,x2,y)
is.data.frame(A)
myfit <- lm(y~x1+x2)
y_hat <- predict(myfit)
ei <- y-y_hat
ei
n <- 15
p <- 2
sigma_hat <- sqrt(sum(ei^2)/(n-p-1))
sigma_hat
hii <- hatvalues(myfit)
hii
SREi <- ei/(sigma_hat*sqrt(1-hii))
SREi
e_i <- ei/(1-hii)
e_i
SRE_i <- SREi*sqrt((n-p-2)/(n-p-1-SREi ^ 2))
chii <- hii-1/n
Di <- ei^2/((p+1)*sigma_hat^2)*hii/(1-hii)^2
result<-data.frame(x1,x2,y,ei,SREi,e_i,SRE_i,chii,Di)
result


check out the Commits 101 drop-down


No, it was wrong on 2.7 too


Hi! This is the friendly automated conda-forge-webservice.

I updated the Github team because of this commit.

- @romanarust was added to conda-forge. Welcome to conda-forge!
  Go to https://github.com/orgs/conda-forge/invitation see your invitation.

- @beverlylytle was added to this feedstock maintenance team.

You should get push access to this feedstock and CI services.

Feel free to join the community [chat room](https://gitter.im/conda-forge/conda-forge.github.io).

NOTE: Please make sure to not push to the repository directly.
      Use branches in your fork for any changes and send a PR.
      More details [here](https://conda-forge.org/docs/maintainer/updating_pkgs.html#forking-and-pull-requests)


Hi, to run the project, you can take a look at the README page [here](https://github.com/HashirZahir/FIFA-Player-Ratings) to download the required dependencies . To see how to run this module, check [here](https://github.com/HashirZahir/FIFA-Player-Ratings#usage). Hope that helps.


yes i can recollect but why at this stage?
have u looked into what kind of packets are coming in between?
are these null packets?


Este campo se ha definido para ser el inverse_name del campo academic_record_ids en Notebook lines. De esta manera poder hacer el One2many y poder obtener todos los registros relacionados con la linea del cuaderno.
Si la quito no puedo asignarle ningún inverse name para obtener los objetos.


Successfully deployed to following URLs:

* https://linketech-website-2o3khdvna.now.sh
* https://linketech-website-smoky-pi.now.sh
* https://linketech-website.linketech.now.sh
* https://linketech-website-git-master.linketech.now.sh


I wish we'd use walrus operator and require python3.8 cause then one could do:

```
while r, w, e := select.select([pipe_r, reader.fileno()], [], []):
```

When can we switch to python3.8? it is available in bionic....


So a release of 0.8.6 is going to happen soon?