[R/calc_K.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Calculate the average number of junctions after an infinite number of generations, provided information on the initial heterozygosity, population size and the number of generations.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calc_K.R:6:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
#' @param C Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calc_K.R:11:20:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L11) *style:* **Variable or function name should be snake_case.**
```r
calc_k <- function(N = Inf,
                   ^
```
[R/calc_K.R:12:20:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L12) *style:* **Variable or function name should be snake_case.**
```r
                   R = Inf,
                   ^
```
[R/calc_K.R:13:20:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L13) *style:* **Variable or function name should be snake_case.**
```r
                   H_0 = 0.5,
                   ^~~
```
[R/calc_K.R:16:3:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L16) *style:* **Variable or function name should be snake_case.**
```r
  K <- H_0 * C * 2 * N * R / (2 * N * C + R)
  ^
```
[R/calc_K.R:19:5:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L19) *style:* **Variable or function name should be snake_case.**
```r
    K <- H_0 * R
    ^
```
[R/calc_K.R:23:5:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L23) *style:* **Variable or function name should be snake_case.**
```r
    K <- H_0 * C * 2 * N
    ^
```
[R/calc_K.R:27:5:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calc_K.R#L27) *style:* **Variable or function name should be snake_case.**
```r
    K <- Inf
    ^
```
[R/calculate_error.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Calculate the error in the estimate of the onset of hybridisation, following Equations 3 & 4 in the Supplementary information of Janzen et al. 2018.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_error.R:7:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
#' @param C Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_error.R:9:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L9) *style:* **Lines should not be more than 80 characters.**
```r
#' @param relative Boolean flag, if TRUE: return the relative error, if FALSE: return error in generations
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_error.R:15:24:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L15) *style:* **Variable or function name should be snake_case.**
```r
time_error <- function(J = NA,
                       ^
```
[R/calculate_error.R:16:24:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L16) *style:* **Variable or function name should be snake_case.**
```r
                       N = Inf,
                       ^
```
[R/calculate_error.R:17:24:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L17) *style:* **Variable or function name should be snake_case.**
```r
                       R = Inf,
                       ^
```
[R/calculate_error.R:18:24:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L18) *style:* **Variable or function name should be snake_case.**
```r
                       H_0 = 0.5,
                       ^~~
```
[R/calculate_error.R:24:3:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L24) *style:* **Variable or function name should be snake_case.**
```r
  K <- junctions::calc_k(N, R, H_0, C)
  ^
```
[R/calculate_error.R:30:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L30) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  if ( relative) return(  error)
      ^
```
[R/calculate_error.R:30:25:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L30) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  if ( relative) return(  error)
                        ^
```
[R/calculate_error.R:31:26:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_error.R#L31) *style:* **Put spaces around all infix operators.**
```r
  if (!relative) return(t*error)
                        ~^~
```
[R/calculate_MAT.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_MAT.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Function that calculates the maximum time after hybridization after which the number of junctions can still be reliably used to estimate the onset of hybridization. This is following equation 15 in Janzen et al. 2018.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_MAT.R:6:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_MAT.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
#' @param C Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_MAT.R:12:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_MAT.R#L12) *style:* **Variable or function name should be snake_case.**
```r
calculate_mat <- function(N = Inf,
                          ^
```
[R/calculate_MAT.R:13:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_MAT.R#L13) *style:* **Variable or function name should be snake_case.**
```r
                          R = Inf,
                          ^
```
[R/calculate_MAT.R:14:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_MAT.R#L14) *style:* **Variable or function name should be snake_case.**
```r
                          H_0 = 0.5,
                          ^~~
```
[R/calculate_MAT.R:20:3:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_MAT.R#L20) *style:* **Variable or function name should be snake_case.**
```r
  K <- junctions::calc_k(N, R, H_0, C)
  ^
```
[R/calculate_time.R:1:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L1) *style:* **Lines should not be more than 80 characters.**
```r
#' Estimate the time since the onset of hybridization, using the number of junctions
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_time.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Estimate the time since the onset of hybridization, following equation 14 in Janzen et al. 2018
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_time.R:7:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
#' @param C Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_time.R:11:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L11) *style:* **Lines should not be more than 80 characters.**
```r
#' estimate_time(J = J, N = 100, R = 1000, H_0 = 0.5, C = 1)  # should be 200 again
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/calculate_time.R:13:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L13) *style:* **Variable or function name should be snake_case.**
```r
estimate_time <- function(J = NA,
                          ^
```
[R/calculate_time.R:14:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L14) *style:* **Variable or function name should be snake_case.**
```r
                          N = Inf,
                          ^
```
[R/calculate_time.R:15:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L15) *style:* **Variable or function name should be snake_case.**
```r
                          R = Inf,
                          ^
```
[R/calculate_time.R:16:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L16) *style:* **Variable or function name should be snake_case.**
```r
                          H_0 = 0.5,
                          ^~~
```
[R/calculate_time.R:28:3:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/calculate_time.R#L28) *style:* **Variable or function name should be snake_case.**
```r
  K <- junctions::calc_k(N, R, H_0, C)
  ^
```
[R/estimate_time_markers.R:1:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L1) *style:* **Lines should not be more than 80 characters.**
```r
#' Estimate the time since the onset of hybridization, using the observed number of junctions, taking into account the distribution of markers
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/estimate_time_markers.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Estimate the time since the onset of hybridization, following equation 1 in Janzen et al. unpublished
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/estimate_time_markers.R:6:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
#' @param marker_distribution A vector containing the position of all markers in Morgan.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/estimate_time_markers.R:10:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L10) *style:* **Lines should not be more than 80 characters.**
```r
#' J <- number_of_junctions_markers(N = 100, H_0 = 0.5, t = 200, marker_distribution = markers)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/estimate_time_markers.R:16:35:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L16) *style:* **Variable or function name should be snake_case.**
```r
estimate_time_markers <- function(J = NA,
                                  ^
```
[R/estimate_time_markers.R:17:35:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L17) *style:* **Variable or function name should be snake_case.**
```r
                                  N = Inf,
                                  ^
```
[R/estimate_time_markers.R:18:35:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L18) *style:* **Variable or function name should be snake_case.**
```r
                                  H_0 = 0.5,
                                  ^~~
```
[R/estimate_time_markers.R:31:5:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L31) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(J > 1e4) {
    ^
```
[R/estimate_time_markers.R:35:63:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_markers.R#L35) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  fitted <- stats::optimize(to_fit, interval = c(2, upper_lim) )
                                                              ^
```
[R/estimate_time_unphased.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_unphased.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Calculates the time since admixture, given unphased ancestry data.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/estimate_time_unphased.R:3:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_unphased.R#L3) *style:* **Lines should not be more than 80 characters.**
```r
#' @param local_anc matrix with two columns, where the first column represents ancestry on chromosome 1, and the second column represents ancestry on chromosome 2. Ancestry labels used should be [0, 1], where 0 indicates the first ancestor, and 1 indicates the second ancestor.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/estimate_time_unphased.R:7:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_unphased.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
#' @param max_t maximum time to be considered for maximum likelihood optimization. Too large values might cause the maximum likelihood algorithm to deviate from the global maximum.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/estimate_time_unphased.R:16:19:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_unphased.R#L16) *warning:* **no visible global function definition for ‘get_states’**
```r
  local_states <- get_states(local_anc)
                  ^~~~~~~~~~
```
[R/estimate_time_unphased.R:22:21:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_unphased.R#L22) *warning:* **no visible global function definition for ‘single_state’**
```r
    seven_states <- single_state(local_time, N = pop_size, d = di)
                    ^~~~~~~~~~~~
```
[R/estimate_time_unphased.R:34:6:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/estimate_time_unphased.R#L34) *style:* **Commented code should be removed.**
```r
    #cat(t, -sum(local_probs), "\n")
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions_backcross.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_backcross.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Calculate the expected number of junctions after t generations, in a backcrossing mating scheme.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions_backcross.R:4:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_backcross.R#L4) *style:* **Lines should not be more than 80 characters.**
```r
#' @param C Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions_backcross.R:10:43:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_backcross.R#L10) *style:* **Variable or function name should be snake_case.**
```r
number_of_junctions_backcross <- function(H_0 = 0.5,
                                          ^~~
```
[R/number_of_junctions_backcross.R:13:29:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_backcross.R#L13) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  jt <- 2 * H_0 * t * C * 2^(-t)
                            ^
```
[R/number_of_junctions_di.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_di.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' Calculate the expected number of junctions between two markers separated by a given amount of recombination
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions_di.R:3:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_di.R#L3) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Calculate the expected number of junctions after t generations, provided information on the initial heterozygosity, population size, the number of generations since the onset of admixture and the distance between two markers.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions_di.R:12:36:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_di.R#L12) *style:* **Variable or function name should be snake_case.**
```r
number_of_junctions_di <- function(N = Inf,
                                   ^
```
[R/number_of_junctions_di.R:13:36:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_di.R#L13) *style:* **Variable or function name should be snake_case.**
```r
                                   H_0 = 0.5,
                                   ^~~
```
[R/number_of_junctions_di.R:17:5:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_di.R#L17) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(is.infinite(N)) local_k <- H_0
    ^
```
[R/number_of_junctions_di.R:19:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_di.R#L19) *style:* **Put spaces around all infix operators.**
```r
  local_j <- local_k - local_k * (1 - 1 / (2*N) - di)^t
                                           ~^~
```
[R/number_of_junctions_markers.R:1:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L1) *style:* **Lines should not be more than 80 characters.**
```r
#' Calculate the expected total number of junctions in a chromosome, given the distribution of markers
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions_markers.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Calculate the expected number of junctions after t generations, provided information on the initial heterozygosity, population size, the number of generations since the onset of admixture and the distribution of markers.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions_markers.R:6:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
#' @param marker_distribution A vector containing the position of all markers in Morgan.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions_markers.R:20:41:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L20) *style:* **Variable or function name should be snake_case.**
```r
number_of_junctions_markers <- function(N = Inf,
                                        ^
```
[R/number_of_junctions_markers.R:21:41:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L21) *style:* **Variable or function name should be snake_case.**
```r
                                        H_0 = 0.5,
                                        ^~~
```
[R/number_of_junctions_markers.R:25:5:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L25) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(length(marker_distribution) < 2) {
    ^
```
[R/number_of_junctions_markers.R:30:6:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L30) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  for(i in 2:length(marker_distribution)) {
     ^
```
[R/number_of_junctions_markers.R:31:57:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L31) *style:* **Put spaces around all infix operators.**
```r
    di <- marker_distribution[i] - marker_distribution[i-1]
                                                       ~^~
```
[R/number_of_junctions_markers.R:32:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions_markers.R#L32) *warning:* **no visible global function definition for ‘number_of_junctions_di’**
```r
    expected_junctions <- number_of_junctions_di(N, H_0, t, di)
                          ^~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Calculate the average number of junctions after t generations, provided information on the initial heterozygosity, population size and the number of generations.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions.R:6:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
#' @param C Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/number_of_junctions.R:13:33:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions.R#L13) *style:* **Variable or function name should be snake_case.**
```r
number_of_junctions <- function(N = Inf,
                                ^
```
[R/number_of_junctions.R:14:33:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions.R#L14) *style:* **Variable or function name should be snake_case.**
```r
                                R = Inf,
                                ^
```
[R/number_of_junctions.R:15:33:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions.R#L15) *style:* **Variable or function name should be snake_case.**
```r
                                H_0 = 0.5,
                                ^~~
```
[R/number_of_junctions.R:28:3:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/number_of_junctions.R#L28) *style:* **Variable or function name should be snake_case.**
```r
  K <- junctions::calc_k(N, R, H_0, C)
  ^
```
[R/RcppExports.R:4:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L4) *style:* **Lines should not be more than 80 characters.**
```r
simulate_backcrossing_cpp <- function(pop_size, freq_ancestor_1, total_runtime, size_in_morgan, number_of_markers, time_points, seed) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:5:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L5) *style:* **Lines should not be more than 80 characters.**
```r
    .Call('_junctions_simulate_backcrossing_cpp', PACKAGE = 'junctions', pop_size, freq_ancestor_1, total_runtime, size_in_morgan, number_of_markers, time_points, seed)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:5:11:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L5) *style:* **Only use double-quotes.**
```r
    .Call('_junctions_simulate_backcrossing_cpp', PACKAGE = 'junctions', pop_size, freq_ancestor_1, total_runtime, size_in_morgan, number_of_markers, time_points, seed)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:5:61:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L5) *style:* **Only use double-quotes.**
```r
    .Call('_junctions_simulate_backcrossing_cpp', PACKAGE = 'junctions', pop_size, freq_ancestor_1, total_runtime, size_in_morgan, number_of_markers, time_points, seed)
                                                            ^~~~~~~~~~~
```
[R/RcppExports.R:8:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L8) *style:* **Lines should not be more than 80 characters.**
```r
sim_fin_chrom <- function(pop_size, freq_ancestor_1, run_time, size_in_Morgan, seed, R) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:8:64:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L8) *style:* **Variable or function name should be snake_case.**
```r
sim_fin_chrom <- function(pop_size, freq_ancestor_1, run_time, size_in_Morgan, seed, R) {
                                                               ^~~~~~~~~~~~~~
```
[R/RcppExports.R:8:86:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L8) *style:* **Variable or function name should be snake_case.**
```r
sim_fin_chrom <- function(pop_size, freq_ancestor_1, run_time, size_in_Morgan, seed, R) {
                                                                                ^
```
[R/RcppExports.R:9:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L9) *style:* **Lines should not be more than 80 characters.**
```r
    .Call('_junctions_sim_fin_chrom', PACKAGE = 'junctions', pop_size, freq_ancestor_1, run_time, size_in_Morgan, seed, R)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:9:11:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L9) *style:* **Only use double-quotes.**
```r
    .Call('_junctions_sim_fin_chrom', PACKAGE = 'junctions', pop_size, freq_ancestor_1, run_time, size_in_Morgan, seed, R)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:9:49:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L9) *style:* **Only use double-quotes.**
```r
    .Call('_junctions_sim_fin_chrom', PACKAGE = 'junctions', pop_size, freq_ancestor_1, run_time, size_in_Morgan, seed, R)
                                                ^~~~~~~~~~~
```
[R/RcppExports.R:12:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L12) *style:* **Lines should not be more than 80 characters.**
```r
sim_inf_chrom <- function(pop_size, freq_ancestor_1, run_time, size_in_Morgan, markers, seed) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:12:64:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L12) *style:* **Variable or function name should be snake_case.**
```r
sim_inf_chrom <- function(pop_size, freq_ancestor_1, run_time, size_in_Morgan, markers, seed) {
                                                               ^~~~~~~~~~~~~~
```
[R/RcppExports.R:13:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L13) *style:* **Lines should not be more than 80 characters.**
```r
    .Call('_junctions_sim_inf_chrom', PACKAGE = 'junctions', pop_size, freq_ancestor_1, run_time, size_in_Morgan, markers, seed)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:13:11:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L13) *style:* **Only use double-quotes.**
```r
    .Call('_junctions_sim_inf_chrom', PACKAGE = 'junctions', pop_size, freq_ancestor_1, run_time, size_in_Morgan, markers, seed)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:13:49:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L13) *style:* **Only use double-quotes.**
```r
    .Call('_junctions_sim_inf_chrom', PACKAGE = 'junctions', pop_size, freq_ancestor_1, run_time, size_in_Morgan, markers, seed)
                                                ^~~~~~~~~~~
```
[R/RcppExports.R:16:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L16) *style:* **Lines should not be more than 80 characters.**
```r
sim_phased_unphased_cpp <- function(pop_size, freq_ancestor_1, total_runtime, size_in_morgan, number_of_markers, time_points, seed) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:17:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L17) *style:* **Lines should not be more than 80 characters.**
```r
    .Call('_junctions_sim_phased_unphased_cpp', PACKAGE = 'junctions', pop_size, freq_ancestor_1, total_runtime, size_in_morgan, number_of_markers, time_points, seed)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:17:11:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L17) *style:* **Only use double-quotes.**
```r
    .Call('_junctions_sim_phased_unphased_cpp', PACKAGE = 'junctions', pop_size, freq_ancestor_1, total_runtime, size_in_morgan, number_of_markers, time_points, seed)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RcppExports.R:17:59:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L17) *style:* **Only use double-quotes.**
```r
    .Call('_junctions_sim_phased_unphased_cpp', PACKAGE = 'junctions', pop_size, freq_ancestor_1, total_runtime, size_in_morgan, number_of_markers, time_points, seed)
                                                          ^~~~~~~~~~~
```
[R/RcppExports.R:19:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/RcppExports.R#L19) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/sim_backcrossing.R:7:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_backcrossing.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
#' @param size_in_morgan Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_backcrossing.R:11:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_backcrossing.R#L11) *style:* **Lines should not be more than 80 characters.**
```r
#' recorded to be returned at the end of the simulation. If left at -1, ancestry is recorded at every generation (computationally heavy).
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_backcrossing.R:12:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_backcrossing.R#L12) *style:* **Lines should not be more than 80 characters.**
```r
#' @return List with five entries: average_junctions: average number of junctions over time, detected_junctions: average number of detected junctions, given the markers. markers: vector with the locations of the molecular markers, junction_distribution: distribution of junctions per time step average_heterozygosity: average heterozygosity.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_backcrossing.R:26:5:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_backcrossing.R#L26) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(length(time_points) == 1) {
    ^
```
[R/sim_backcrossing.R:27:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_backcrossing.R#L27) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(time_points == -1) {
      ^
```
[R/sim_fin_chrom.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_fin_chrom.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Individual based simulation of the accumulation of junctions for a chromosome with regularly distributed markers.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_fin_chrom.R:5:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_fin_chrom.R#L5) *style:* **Lines should not be more than 80 characters.**
```r
#' @param morgan Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_fin_chrom.R:9:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_fin_chrom.R#L9) *style:* **Lines should not be more than 80 characters.**
```r
#' @return \item{avgJunctions}{vector of the average number of junctions at time = [0, total_runtime]}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_fin_chrom.R:17:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_fin_chrom.R#L17) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
sim_fin_chrom <- function (pop_size = 100,
                          ^
```
[R/sim_fin_chrom.R:22:28:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_fin_chrom.R#L22) *style:* **Variable or function name should be snake_case.**
```r
                           R = 100) {
                           ^
```
[R/sim_inf_chrom.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_inf_chrom.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Individual based simulation of the accumulation of junctions for a chromosome with an infinite number of recombination sites.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_inf_chrom.R:6:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_inf_chrom.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
#' @param morgan Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_inf_chrom.R:7:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_inf_chrom.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
#' @param markers The number of genetic markers superimposed on the chromosome. If markers is set to -1, no markers are superimposed (faster simulation)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_inf_chrom.R:9:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_inf_chrom.R#L9) *style:* **Lines should not be more than 80 characters.**
```r
#' @return \item{avgJunctions}{vector of the average number of junctions at time = [0, total_runtime]}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_phased_unphased.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_phased_unphased.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Individual based simulation of the accumulation of junctions, returning phased and unphased data. Ancestry on both chromosomes of 10 randomly sampled individuals per generations is returned.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_phased_unphased.R:6:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_phased_unphased.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
#' @param size_in_morgan Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_phased_unphased.R:7:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_phased_unphased.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
#' @param number_of_markers The number of genetic markers superimposed on the chromosome.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_phased_unphased.R:8:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_phased_unphased.R#L8) *style:* **Lines should not be more than 80 characters.**
```r
#' @param time_points vector with time points at which local ancestry has to be recorded to be returned at the end of the simulation. If left at -1, ancestry is recorded at every generation (computationally heavy).
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_phased_unphased.R:10:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_phased_unphased.R#L10) *style:* **Lines should not be more than 80 characters.**
```r
#' @return matrix with five columns: [time, individual, marker location, ancestry chromosome 1, ancestry chromosome 2]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/sim_phased_unphased.R:24:5:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_phased_unphased.R#L24) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(length(time_points) == 1) {
    ^
```
[R/sim_phased_unphased.R:25:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/sim_phased_unphased.R#L25) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(time_points == -1) {
      ^
```
[R/unphased_log_likelihood.R:2:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/unphased_log_likelihood.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
#' @description Calculates the log likelihood of observing the unphased data, given the population size, initial heterozygosity and time since admixture
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/unphased_log_likelihood.R:3:1:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/unphased_log_likelihood.R#L3) *style:* **Lines should not be more than 80 characters.**
```r
#' @param local_anc matrix with two columns, where the first column represents ancestry on chromosome 1, and the second column represents ancestry on chromosome 2. Ancestry labels used should be [0, 1], where 0 indicates the first ancestor, and 1 indicates the second ancestor.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/unphased_log_likelihood.R:17:19:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/unphased_log_likelihood.R#L17) *warning:* **no visible global function definition for ‘get_states’**
```r
  local_states <- get_states(local_anc)
                  ^~~~~~~~~~
```
[R/unphased_log_likelihood.R:23:21:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/unphased_log_likelihood.R#L23) *warning:* **no visible global function definition for ‘single_state’**
```r
    seven_states <- single_state(t = local_time, N = local_pop_size, d = di)
                    ^~~~~~~~~~~~
```
[R/util.R:11:48:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L11) *style:* **Commas should always have a space after.**
```r
  local_anc <- rep(2, length(local_anc_matrix[,1]))
                                               ^
```
[R/util.R:12:37:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L12) *style:* **Commas should always have a space after.**
```r
  homo_0 <- which(local_anc_matrix[,1] == 0 &
                                    ^
```
[R/util.R:13:40:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L13) *style:* **Commas should always have a space after.**
```r
                    (local_anc_matrix[,1] == local_anc_matrix[,2]))
                                       ^
```
[R/util.R:13:64:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L13) *style:* **Commas should always have a space after.**
```r
                    (local_anc_matrix[,1] == local_anc_matrix[,2]))
                                                               ^
```
[R/util.R:14:37:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L14) *style:* **Commas should always have a space after.**
```r
  homo_1 <- which(local_anc_matrix[,1] == 1 &
                                    ^
```
[R/util.R:15:40:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L15) *style:* **Commas should always have a space after.**
```r
                    (local_anc_matrix[,1] == local_anc_matrix[,2]))
                                       ^
```
[R/util.R:15:64:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L15) *style:* **Commas should always have a space after.**
```r
                    (local_anc_matrix[,1] == local_anc_matrix[,2]))
                                                               ^
```
[R/util.R:20:6:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L20) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  for(i in 2:length(local_anc)) {
     ^
```
[R/util.R:21:24:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L21) *style:* **Put spaces around all infix operators.**
```r
    left <- local_anc[i-1]
                      ~^~
```
[R/util.R:24:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L24) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 0 && right == 1) all_states[i-1] <- 1
      ^
```
[R/util.R:24:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L24) *style:* **Put spaces around all infix operators.**
```r
    if(left == 0 && right == 1) all_states[i-1] <- 1
                                           ~^~
```
[R/util.R:25:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L25) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 1 && right == 0) all_states[i-1] <- 2
      ^
```
[R/util.R:25:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L25) *style:* **Put spaces around all infix operators.**
```r
    if(left == 1 && right == 0) all_states[i-1] <- 2
                                           ~^~
```
[R/util.R:26:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L26) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 1 && right == 1) all_states[i-1] <- 3
      ^
```
[R/util.R:26:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L26) *style:* **Put spaces around all infix operators.**
```r
    if(left == 1 && right == 1) all_states[i-1] <- 3
                                           ~^~
```
[R/util.R:27:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L27) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 0 && right == 0) all_states[i-1] <- 4
      ^
```
[R/util.R:27:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L27) *style:* **Put spaces around all infix operators.**
```r
    if(left == 0 && right == 0) all_states[i-1] <- 4
                                           ~^~
```
[R/util.R:28:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L28) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 2 && right == 1) all_states[i-1] <- 5
      ^
```
[R/util.R:28:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L28) *style:* **Put spaces around all infix operators.**
```r
    if(left == 2 && right == 1) all_states[i-1] <- 5
                                           ~^~
```
[R/util.R:29:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L29) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 2 && right == 0) all_states[i-1] <- 6
      ^
```
[R/util.R:29:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L29) *style:* **Put spaces around all infix operators.**
```r
    if(left == 2 && right == 0) all_states[i-1] <- 6
                                           ~^~
```
[R/util.R:30:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L30) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 0 && right == 2) all_states[i-1] <- 7
      ^
```
[R/util.R:30:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L30) *style:* **Put spaces around all infix operators.**
```r
    if(left == 0 && right == 2) all_states[i-1] <- 7
                                           ~^~
```
[R/util.R:31:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L31) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 1 && right == 2) all_states[i-1] <- 8
      ^
```
[R/util.R:31:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L31) *style:* **Put spaces around all infix operators.**
```r
    if(left == 1 && right == 2) all_states[i-1] <- 8
                                           ~^~
```
[R/util.R:32:7:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L32) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(left == 2 && right == 2) all_states[i-1] <- 9
      ^
```
[R/util.R:32:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L32) *style:* **Put spaces around all infix operators.**
```r
    if(left == 2 && right == 2) all_states[i-1] <- 9
                                           ~^~
```
[R/util.R:38:29:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L38) *style:* **Variable or function name should be snake_case.**
```r
single_state <- function(t, N, d) {
                            ^
```
[R/util.R:39:28:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L39) *style:* **Commas should always have a space after.**
```r
  trans_matrix <- matrix(0,7,7)
                           ^
```
[R/util.R:39:30:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L39) *style:* **Commas should always have a space after.**
```r
  trans_matrix <- matrix(0,7,7)
                             ^
```
[R/util.R:40:28:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                           ^~
```
[R/util.R:40:30:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                            ~^~
```
[R/util.R:40:31:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                              ^
```
[R/util.R:40:33:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                               ~^~
```
[R/util.R:40:40:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                                      ~^~
```
[R/util.R:40:43:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Commas should never have a space before.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                                         ~^
```
[R/util.R:40:46:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                                            ~^~
```
[R/util.R:40:60:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                                                          ~^~
```
[R/util.R:40:61:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                                                            ^
```
[R/util.R:40:63:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L40) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[1, ] <- c(1 -1/(2*N) - 2*d , 2*d, 0, 0, 0, 1/(2*N), 0)
                                                             ~^~
```
[R/util.R:41:27:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                         ~^~
```
[R/util.R:41:28:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                           ^
```
[R/util.R:41:30:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                            ~^~
```
[R/util.R:41:40:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                                      ~^~
```
[R/util.R:41:42:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                                        ~^~
```
[R/util.R:41:43:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                                          ^
```
[R/util.R:41:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                                           ~^~
```
[R/util.R:41:58:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                                                        ~^~
```
[R/util.R:41:60:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                                                          ~^~
```
[R/util.R:41:61:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                                                            ^
```
[R/util.R:41:63:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L41) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[2, ] <- c(1/(2*N), 1 - 3*1/(2*N) - d, d, 2*1/(2*N), 0, 0, 0)
                                                             ~^~
```
[R/util.R:42:30:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                            ~^~
```
[R/util.R:42:32:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                              ~^~
```
[R/util.R:42:33:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                ^
```
[R/util.R:42:35:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                 ~^~
```
[R/util.R:42:45:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                           ~^~
```
[R/util.R:42:47:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                             ~^~
```
[R/util.R:42:48:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                               ^
```
[R/util.R:42:50:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                                ~^~
```
[R/util.R:42:60:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                                           ^~
```
[R/util.R:42:62:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                                            ~^~
```
[R/util.R:42:63:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                                              ^
```
[R/util.R:42:65:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L42) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[3, ] <- c(0, 2*1/(2*N), 1 - 4*1/(2*N), 0, 2 *1/(2*N), 0, 0)
                                                               ~^~
```
[R/util.R:43:40:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L43) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[4, ] <- c(0, 0, 0, 1 - 1/(2*N) - d, d, 1/(2*N), 0)
                                      ~^~
```
[R/util.R:43:41:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L43) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  trans_matrix[4, ] <- c(0, 0, 0, 1 - 1/(2*N) - d, d, 1/(2*N), 0)
                                        ^
```
[R/util.R:43:43:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L43) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[4, ] <- c(0, 0, 0, 1 - 1/(2*N) - d, d, 1/(2*N), 0)
                                         ~^~
```
[R/util.R:43:56:](https://github.com/thijsjanzen/junctions/blob/4a448b5b68982a88a1e55b64f433cefe3f1a38d3/R/util.R#L43) *style:* **Put spaces around all infix operators.**
```r
  trans_matrix[4, ] <- c(0, 0, 0, 1 - 1/(2*N) - d, d, 1/(2*N), 0)
                                                      ~^~
```


[R/count_n_mutation.R:27:9:](https://github.com/richelbilderbeek/pirouette/blob/463a2bd61ee9d5ada7c249d803e99391de264b79/R/count_n_mutation.R#L27) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  ), "," )
        ^
```


Probably meant to be the `.Rounded` version.


### Enlaces de tutoriales de interfaz de GitHub.


@JCarter111 good start on adding dates, everything you've done makes sense, but as you say it would be good to have some validation that the date is valid! Moment is a brilliant library and takes a lot of the pain out of working with Dates in JavaScript so definitely let's leverage it here!

For example, you are storing your date on state as a string in the format "DD-MM-YYYY" which is fine, but maybe at this point when someone clicks "Add" you could validate the date and confirm whether it is valid! Moment will do this for you by parsing the date according to a particular format:

`const newTaskDueDate = moment(this.state.date, "DD-MM-YYYY");`

This produces a "moment object" which is a special object provided my moment which represents the date and has lots of handy methods you can call on it.

E.g. you could call `.isValid()` on the resulting moment object to find out whether it's valid:

`const isValidDate = newTaskDueDate.isValid()`

And then act accordingly - maybe display an error message on the page instead of adding the task?

I'd have a property on the state such as `dateInvalid: false` which you turn to `true`, if the date turns out to be invalid. Then you could **conditionally render** an error message on the page.

You have the option of storing the date as a moment object OR as the plain string in the format "DD-MM-YYYY" but I'd say storing moment objects is better as they come with so many handy methods for displaying and querying the date. for example it's so easy with moment to tell what is the distance between two dates. You could even display something like "due 3 days ago" if you wanted, for overdue tasks!


// download scrapy:
$pip install scrapy
// command line:
$scrapy crawl urls
$scrapy crawl contents


Y luego donde vamos a agregar recomendaciones???


@raphielscape Just my brother shitposting around.


@JCarter111 If you decide to store dates as moment objects then you'll need to update the state here so that these are all moment objects, created like so:

`date: moment("2019-11-19", "YYYY-MM-DD")`


Ahoj, perfektní! :-) Splněno 🍰


Shitposting is now a family business nice


cool Thanks!


Y luego donde vamos a crear plan de acción?


> Added left panel selection highlight (i like line-thru, can change if there are other preference)

Hmm, didn't notice that. Line thorough text generally means 'cancelled, unavailable, disabled' etc., so it's semantically wrong to use it for a selected link.

Just coloring the text looks fine to me.


Sad. All go back to raphielgang's shitposting. This is spam on my repo ._.


Derp @Flex1911 ?


@JCarter111 here you are using moment's formatting powers, awesome! There are many other options for displaying dates as you can see from the docs [here](http://momentjs.com/docs/#/displaying/) - although I'm sure you've seen already :)


Categoria no es objeto. El atributo debe ser categoria_id, pero hace mucho dejamos de hacerle referencia.


Beautiful!


Ah, yes - that's right. I factored the string out of `fk/main.go`, where it was refered to incorrectly as `crontab`.


Successfully aliased the URL <https://ssr-demo-1pg18ec7u.now.sh> to the following aliases.

* https://ssr-demo.schalela.now.sh
* https://ssr-demo-git-master.schalela.now.sh


Also bear in mind that if you store moment objects on the state then you wouldn't need to parse the object here, you'd just be able to do `this.props.taskObj.date.format("DD/MM/YYYY")`


No cerraste este if


Cualquiera puede agregar recomendaciones??


I like this idea of keys.
Probably repr() would be better:

https://ru.stackoverflow.com/questions/534440/%D0%A7%D0%B5%D0%BC-%D0%BE%D1%82%D0%BB%D0%B8%D1%87%D0%B0%D0%B5%D1%82%D1%81%D1%8F-repr-%D0%BE%D1%82-str


@zenkins release minor


As it is, NorthernHemisphere wasn't being used anywhere in the library but the main problem was that 'y' was being set into negative (y -= 10000000.0;) which resulted in faulty coordinates.


along with some stuff I was tinkering with.

A lot of the tinkering I do ends up getting removed before I commit, I am currently looking for a way to see messages sent ( something like dispatchusermessage in csgo ).


Successfully aliased the URL <https://registration-app-bawhjhgxj.now.sh> to the following aliases.

* https://registration.webconf.tech
* https://registration-app.webconf.now.sh
* https://registration-app-git-master.webconf.now.sh


Successfully aliased the URL <https://whatcolourhoodieiskevinwearingtodaycom-9h6r65dft.now.sh> to the following aliases.

* https://whatcolourhoodieiskevinwearingtoday.com
* https://whatcolourhoodieiskevinwearingtodaycom.kevincarrogan.now.sh
* https://whatcolourhoodieiskevinwearingtodaycom-git-master.kevincarrogan.now.sh


Ahoj, perfektní, splněno! :-) 🍰


#include <stdio.h>

int main()
{
  int c = 1;  // Initializing variable

  while (c <= 10)  // While loop will execute till the condition is true
  {
    printf("%d ", c);  // Note the space after %d for gap in the numbers we want in output
    c++;
  }

  return 0;
}


here's an idea of something you could do to determine whether a date's overdue:

```
// assuming taskDate is a moment object
const currDate = moment(); // creates a moment object for now by default
const diff = taskDate.diff(currDate);

// if diff is negative then the task was in the past, if it's positive then the task is in the future
```


上传SRS.html


Ooh interesting, maybe we were just hard-coding `cron` inline elsewhere then?


`kp.ru###popapIsBlockedAd`


Send Lenk in PM

On Wed, 8 May, 2019, 2:09 PM Baalaji, <notifications@github.com> wrote:

> Sad. All go back to raphielgang's shitposting. This is spam on my repo ._.
>
> —
> You are receiving this because you commented.
> Reply to this email directly, view it on GitHub
> <https://github.com/RaphielGang/Telegram-UserBot/commit/4ce821236a2ae83c5ecba8634226980a3e13c5db#commitcomment-33454933>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/AJBXB6EEXSQQPEOP45DBJTTPUKGUHANCNFSM4HLPQEHA>
> .
>


I think we should only check timeout args when op includes FUTEX_WAIT


Esto no funciona asi. recomendacion->planes es una coleccion (vacia cuando no tiene elementos), pero al fin y al cabo no es nula. Usa ->count()


no changes has done


Spam @raphielscape for links >_>


Ahoj, perfektní! :) Splněno 🍰


Successfully aliased the URL <https://nordnet-ui-ay98bxwcy.now.sh> to the following aliases.

* https://nordnet-ui.nordnet1.now.sh
* https://nordnet-ui-git-beta.nordnet1.now.sh


no


@bocaben


Check failed. Try rerunning the check
:point_right: click here to view a full list of the events :point_left:


Turn this comments section into shitposting chat


Lmao was studying git and bro showed his repo.


If we decouple 'binding' and 'black/whitelisting', we could bind to Object/Serializable and allow the user to whitelist their whole domain package in configuration? I can imagine some users will dislike having a marker interface.


пробыввл но не получается. причины:
1. getAnswer() используется в разных частях программы удалить его нецелесообразно.
2. getAnswer() сделать void - не могу получить  без ретёрн значение.
3. execute() переделать  на void  вместо String  вообще ерунда получается.
4. execute() вынести возвращаемое значение getAnswer() в переменную тоже смысла нет.
 вообщем решения не вижу.


Among the blind the one-eyed is king ;-)

What we (i.e. the ReaR upstream developers) would appreciate
most of all from you are GitHub pull requests with your changes.
I.e. what is needed for sponsorship is you as a developer.

Regardless that I do not yet have real paractical experience with IBM Z
I will help you as good as I can with general coding stuff in ReaR.

To avoid that you do much coding work on your own and then
we may tell you about a lot of things that you should have done differently
I would recommend that you do GitHub pull requests as soon as possible
for you (i.e. when you have some very first step that works a bit for you)
so that we can check early if changes are needed.

Many thanks in advance for your contributions to ReaR!

In general:

"Submit early, submit often"
(i.e. do GitHub pull requests early and often),
cf. Wikipedia: Release early, release often
http://www.wikipedia.org/wiki/Release_early,_release_often

Do not mix up several independent separated issues in one big all-in-one
GitHub pull request because a pull request cannot be partially accepted.
On the other hand do not split several changes that belong to each other
into several pull requests.

Have a look at our "Coding Style" hints at
https://github.com/rear/rear/wiki/Coding-Style

In particular for IBM Z specific code enhancements
explanatory comments directly in the code are important
to ensure that other ReaR users and contributors who may
not know anything about IBM Z specific things can understand
why the code for IBM Z is as it is so that they do not accidentally
break IBM Z specific code at any later time with their own changes.

See "Contributing" at
http://relax-and-recover.org/development/

In particular you may have a look at
"Keeping your forked repo synced with the upstream source" at
https://2buntu.com/articles/1459/keeping-your-forked-repo-synced-with-the-upstream-source/
for an illustrated guide how to work with GitHub in general.
The images therein might be a bit outdated but the general information
how to work with GitHub should still apply.


unix网络编程实例代码


Successfully aliased the URL <https://nordnet-ui-8d94el1qw.now.sh> to the following aliases.

* https://nordnet-ui.nordnet1.now.sh
* https://nordnet-ui-git-beta.nordnet1.now.sh


Sometimes I don't know if I should answer your questions or just try to fix it if I see the problem. In this case yes it exists. You can see it later in this commit in the contract, is it wrong?


Can you make a new release, which includes this fix thank you?


Successfully aliased the URL <https://registration-app-r0v7rh0n2.now.sh> to the following aliases.

* https://registration.webconf.tech
* https://registration-app.webconf.now.sh
* https://registration-app-git-master.webconf.now.sh


This commit has been mentioned on **Discourse Meta**. There might be relevant details there:

https://meta.discourse.org/t/subfolder-issue-with-pdf-uploads/116896/5


Hey thanks for fixing this!  I've pulled your changes into the original project :-)


When changing from e.g. `Auto` to `English`, I see the width/height of the `Settings` window
changes. i.e. shrinks. I fail to understand why it should.

Is there some default window-size in the QML code that is used for this redraw?


**选择语句**


This commit has been mentioned on **Discourse Meta**. There might be relevant details there:

https://meta.discourse.org/t/file-attachment-download-link-returns-success-ok/117092/4


Successfully aliased the URL <https://nordnet-ui-kit-b13au9s5i.now.sh> to the following aliases.

* https://nordnet-ui-kit.now.sh
* https://nordnet-ui-kit.nordnet1.now.sh
* https://nordnet-ui-kit-git-master.nordnet1.now.sh


Thanks, yes it's a good idea to update now it's just that anyway they should update when someone else uses the contract. Or should I be checking the logs?


No Space


NO


I would also add a few other examples with positive and negative exponents ;).
Maybe like
g**3 * g**5 = g**8
g**10 * g**(-13) = g**(-3)
but check if they are already there as a result of the negative exponent fix.


**灵活运用**


fixes #653


@naartjie here's a brief high level description of the update mechanism.

Our base type for describing the whole forest of components is called `element`. `element`s contain `component`s at their leaves. The `component`s are used to instantiate `instances` which in turn form `instanceForest` which is identical in shape to the `element` we began with.

`instanceForest` is the complete tree containing all instances, therefore we begin the update process with it.

```
  let updateInstanceForest =
	      (
	        ~updateContext: UpdateContex.t,
	        ~oldInstanceForest: instanceForest,
	        ~nextElement: element,
	        unit,
	      )
	      : renderedElement
```

In this function we simply compare the old instanceForest, i.e. the one we rendered last time and the `nextElement` which will be used for the update. Depending on what the element and instanceForest contain, we do different things and recurse down the tree.

Note: the function initializing `instanceForest` out of `element` has not been implemented.

What's interesting is what we do when we encounter a DynamicFragment. DynamicFragment contains a binary tree. We use trees absolute ordering to determine indices of particular views. The update logic in `updateDynamicKeyedFragment` is simple. The algorithm is essentially like what you'd do in order to find duplicates in two sorted lists. In this version, if you have a duplicate (i.e. you need to update instance with the new element) both `instance` and  `nextOpaqueComponent` (which should really be `nextElement` are `Some`. If one of them is `Some` you either have to delete or insert an item. Since everything is ordered, handling indices is possible.

Filling in the blank modules shouldn't be too hard with the exception of index tracking (which you have experience with :D.)


Fix #16


переделал. не на тот метод посмотрел.


千位以内阿拉伯数字转成中文的数字


@valib You're not supposed to (or allowed to according to most open source licenses) replace file headers. When it comes to Apache licensed stuff, you're not allowed to re-license it as GPL either.

If you copy and modify an Apache licensed code, you have to leave the original header and just add comments about who/what changes have been made.


EDIT: Would it be good for you, if instead of updating all the addresses, I would show the last events occurred?
I don't think that checking all the logs to get all the addresses balances is a good idea... or is it?


@JuliaRegistrator register()


@qwertychouskie See what incude dir does findsdl stuff return first pls. AFAIK, they already return `…/SDL2` as include dir.


Yes.


Resolves handshake issues with older Android etc. OpenSSL also recompiled with no weak ciphers.

![SSL Server Test- trident textpattern com (Powered by Qualys SSL Labs) ()](https://user-images.githubusercontent.com/226578/57363324-c95f7000-7178-11e9-9f98-db6dcef50e47.png)


Whoops!  Nice pick up!


Woops. Message should be "Add user authentication to calling code"


Oopsie! Thanks for spotting this.


Fixed


Check failed. Try rerunning the check
:point_right: click here to view a full list of the events :point_left:


refers to #20


from random import randint

dice_num =randint(1,6)
if dice_num==1:
    print('收获1个脑瓜崩')
elif dice_num==2:
    print('收获2个脑瓜崩')
elif dice_num==3:
    print('收获3个脑瓜崩')
elif dice_num==4:
    print('收获4个脑瓜崩')
elif dice_num==5:
    print('收获5个脑瓜崩')
else:
    print('恭喜你66666')


If one of the `continue` statements above is hit (perhaps the `Flush()` or `ReadAll()`), the reset will be skipped. Might this leave the `bodyBuffer` in an inconsistent state? Just to be on the safe side, would it be worth doing it before the `io.Copy()` at the top of the block?

Also, is it necessary to call [`Reset()`](https://golang.org/pkg/compress/gzip/#Writer.Reset) on the `GzipWriter` as well? My reading of the docs is that `GzipWriter` has some internal state that should be reset to re-use the object, but I don't know enough about the low-level details of gzip to know if `Flush()` already effectively does this for us.


![](https://github.trello.services/images/mini-trello-icon.png) [Parent outputcaching fixen bij aanpassing kind](https://trello.com/c/irz0kxlG/34-parent-outputcaching-fixen-bij-aanpassing-kind)


![](https://github.trello.services/images/mini-trello-icon.png) [Outputcache legen bij verwijderen pagina's](https://trello.com/c/5L1g09UB/33-outputcache-legen-bij-verwijderen-paginas)


See my last comment : https://bugs.limesurvey.org/view.php?id=14858#c51822


![](https://github.trello.services/images/mini-trello-icon.png) [Na aanmaken pagina bestaat de url nog niet](https://trello.com/c/lcVcNSdQ/32-na-aanmaken-pagina-bestaat-de-url-nog-niet)


@qwertychouskie
https://github.com/cubosphere/cubosphere-code/blob/de9f18bd0ac63fa05e886d18f1236235da0e8d80/cmake/FindSDL2_image.cmake#L43-L50

I was right. Including without `SDL2` prefix is correct way and allow setting SDL2 directory via CMake.


It should not happen. The only case when the node already exists - it was created for generated sources and we are adding generated test sources.


nyc all


as


et maintenent en modifié depuit github


OC ALIVE!!!!!!! BRILLIANT!!!!!!!!!


@yiendos Use the `package` resource instead of an `exec` for installing packages.


@yiendos use the `service` resource to manage services


@yiendos set `enable => true` in the `service` resource to make sure systemd will enable it to run after boot.


create homepage


It returns DataNode which should be used as a parent for source set. May be `findParentForSourceSetDataNode` should be a better name.


where does this come from?


Ok, I am going to change it in the code too


Successfully aliased the URL <https://coiny-k2v3fq1qc.now.sh> to the following aliases.

* https://coiny.astrolince.now.sh
* https://coiny-git-master.astrolince.now.sh


我之前给这个repo点的star怎么不见了。。。你新开了一个repo？


I found in my testing that there was also a similar issue in the TypeEx class - https://github.com/akkadotnet/Hyperion/blob/9b4ed1a3002f49f373bc8285dbe0e567ec671fc7/src/Hyperion/Extensions/TypeEx.cs#L76


Successfully aliased the URL <https://coiny-oekqu7zmr.now.sh> to the following aliases.

* https://coiny.astrolince.now.sh
* https://coiny-git-master.astrolince.now.sh


Successfully aliased the URL <https://whatcolourhoodieiskevinwearingtodaycom-5f5j970en.now.sh> to the following aliases.

* https://whatcolourhoodieiskevinwearingtoday.com
* https://whatcolourhoodieiskevinwearingtodaycom.kevincarrogan.now.sh
* https://whatcolourhoodieiskevinwearingtodaycom-git-master.kevincarrogan.now.sh


项目怎么跑起来呀 npm run dev? npm run serve? 还有啥？ 都没跑起来呀！！啊哈哈哈


nice!


@JuliaRegistrator register()


Socket is out of scope for this one. I/O I am not yet sure about. Proper streams would be nice, but it may not be what we need.


Используй свои константы что бы убрать повторение и инстанс переменные
```ruby
  def generate_cards
    names = Card::NAMES.keys + (2..10).to_a
    Card::SUITS.keys.each do |suit|
      names.each do |name|
        @card_deck << Card.new(suit, name)
      end
    end
  end
```


Nice merge pro dev


it's browser API and part of what is called "web components".

here's the obligatory caniuse: https://caniuse.com/#search=custom%20elements. also note that this is fully polyfill'able.

used this before to great extend (to embed react-stuff into elm-app) and am highly satisfied with the ease of use and flexibility.


Check failed. Try rerunning the check
:point_right: click here to view a full list of the events :point_left: