[R/ABC_SMC.R:2:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L2) *style:* **Variable and function names should be all lowercase.**
```r
getRandomVals <- function(max_val)  {
^~~~~~~~~~~~~
```
[R/ABC_SMC.R:8:40:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L8) *style:* **Put spaces around all infix operators.**
```r
    a <- sample(1:3, size = 1, prob = x-floor(x) )
                                      ~^~
```
[R/ABC_SMC.R:9:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L9) *style:* **Put spaces around all infix operators.**
```r
    x2[a] <- x2[a]+1;
                 ~^~
```
[R/ABC_SMC.R:15:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L15) *style:* **Variable and function names should be all lowercase.**
```r
getFromPrevious <- function(inds, ws, disps, filts, comps)  {
^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:22:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L22) *style:* **Variable and function names should be all lowercase.**
```r
calculateWeight <- function(params, target, sigM,
^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:22:45:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L22) *style:* **Variable and function names should be all lowercase.**
```r
calculateWeight <- function(params, target, sigM,
                                            ^~~~
```
[R/ABC_SMC.R:23:29:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L23) *style:* **Variable and function names should be all lowercase.**
```r
                            dispVals, filtVals, compVals,
                            ^~~~~~~~
```
[R/ABC_SMC.R:23:39:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L23) *style:* **Variable and function names should be all lowercase.**
```r
                            dispVals, filtVals, compVals,
                                      ^~~~~~~~
```
[R/ABC_SMC.R:23:49:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L23) *style:* **Variable and function names should be all lowercase.**
```r
                            dispVals, filtVals, compVals,
                                                ^~~~~~~~
```
[R/ABC_SMC.R:24:29:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L24) *style:* **Variable and function names should be all lowercase.**
```r
                            numParticles, W)  {
                            ^~~~~~~~~~~~
```
[R/ABC_SMC.R:28:25:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L28) *style:* **Variable and function names should be all lowercase.**
```r
  for (i in 1:seq_along(dispVals)) {
                        ^~~~~~~~
```
[R/ABC_SMC.R:29:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L29) *style:* **Variable and function names should be all lowercase.**
```r
    prevP <- c(dispVals[i], filtVals[i], compVals[i])
    ^~~~~
```
[R/ABC_SMC.R:29:16:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L29) *style:* **Variable and function names should be all lowercase.**
```r
    prevP <- c(dispVals[i], filtVals[i], compVals[i])
               ^~~~~~~~
```
[R/ABC_SMC.R:29:29:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L29) *style:* **Variable and function names should be all lowercase.**
```r
    prevP <- c(dispVals[i], filtVals[i], compVals[i])
                            ^~~~~~~~
```
[R/ABC_SMC.R:29:42:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L29) *style:* **Variable and function names should be all lowercase.**
```r
    prevP <- c(dispVals[i], filtVals[i], compVals[i])
                                         ^~~~~~~~
```
[R/ABC_SMC.R:30:30:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L30) *style:* **Variable and function names should be all lowercase.**
```r
    diff <- params[target] - prevP[target]
                             ^~~~~
```
[R/ABC_SMC.R:31:50:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L31) *style:* **Variable and function names should be all lowercase.**
```r
    vals[i] <- W[i] * dnorm(diff, mean = 0, sd = sigM)
                                                 ^~~~
```
[R/ABC_SMC.R:37:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L37) *style:* **Variable and function names should be all lowercase.**
```r
normalizeWeights <- function(x) {
^~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:44:24:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L44) *style:* **Variable and function names should be all lowercase.**
```r
perturb <- function(p, sigM)  {
                       ^~~~
```
[R/ABC_SMC.R:46:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L46) *style:* **Use two spaces to indent, never tabs.**
```r
	    cat("Found previously finished run, loaded results from that run\n")
^
```
[R/ABC_SMC.R:48:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L48) *style:* **Use two spaces to indent, never tabs.**
```r
	    return(output);
^
```
[R/ABC_SMC.R:49:34:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L49) *style:* **Put spaces around all infix operators.**
```r
  x <- sample(numbers, 3, replace=F)
                                ~^~
```
[R/ABC_SMC.R:51:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L51) *style:* **Variable and function names should be all lowercase.**
```r
  oldVal <- params[x[1]]
  ^~~~~~
```
[R/ABC_SMC.R:53:65:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L53) *style:* **Variable and function names should be all lowercase.**
```r
  params[x[1]] <- round(params [x[1]] + rnorm(1, mean = 0, sd = sigM), 0)
                                                                ^~~~
```
[R/ABC_SMC.R:57:27:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L57) *style:* **Variable and function names should be all lowercase.**
```r
  diff <- params [x[1]] - oldVal
                          ^~~~~~
```
[R/ABC_SMC.R:71:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L71) *style:* **Variable and function names should be all lowercase.**
```r
calculateDistance <- function(rich, even, div, opt_diff, obs, sd_vals)  {
^~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:72:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L72) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  Fit_Rich <- (abs((rich - obs[,1])) / sd_vals[1])^2;
                   ^
```
[R/ABC_SMC.R:72:33:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L72) *style:* **Commas should always have a space after.**
```r
  Fit_Rich <- (abs((rich - obs[,1])) / sd_vals[1])^2;
                                ^
```
[R/ABC_SMC.R:72:51:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L72) *style:* **Put spaces around all infix operators.**
```r
  Fit_Rich <- (abs((rich - obs[,1])) / sd_vals[1])^2;
                                                 ~^~
```
[R/ABC_SMC.R:73:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L73) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  Fit_Even <- (abs((even - obs[,2])) / sd_vals[2])^2;
                   ^
```
[R/ABC_SMC.R:73:33:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L73) *style:* **Commas should always have a space after.**
```r
  Fit_Even <- (abs((even - obs[,2])) / sd_vals[2])^2;
                                ^
```
[R/ABC_SMC.R:73:51:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L73) *style:* **Put spaces around all infix operators.**
```r
  Fit_Even <- (abs((even - obs[,2])) / sd_vals[2])^2;
                                                 ~^~
```
[R/ABC_SMC.R:74:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L74) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  Fit_Div  <- (abs((div -  obs[,3])) / sd_vals[3])^2;
                   ^
```
[R/ABC_SMC.R:74:33:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L74) *style:* **Commas should always have a space after.**
```r
  Fit_Div  <- (abs((div -  obs[,3])) / sd_vals[3])^2;
                                ^
```
[R/ABC_SMC.R:74:51:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L74) *style:* **Put spaces around all infix operators.**
```r
  Fit_Div  <- (abs((div -  obs[,3])) / sd_vals[3])^2;
                                                 ~^~
```
[R/ABC_SMC.R:75:40:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L75) *style:* **Put spaces around all infix operators.**
```r
  Fit_optima <- (opt_diff / sd_vals[4])^2;
                                      ~^~
```
[R/ABC_SMC.R:83:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L83) *style:* **Variable and function names should be all lowercase.**
```r
ABC_SMC <- function(numParticles, species_fallout, taxa, esppres, n_traits,
                    ^~~~~~~~~~~~
```
[R/ABC_SMC.R:85:46:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L85) *style:* **Variable and function names should be all lowercase.**
```r
                    abundances, frequencies, stopRate, Ord)  {
                                             ^~~~~~~~
```
[R/ABC_SMC.R:88:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L88) *style:* **Variable and function names should be all lowercase.**
```r
  dispVals <- 1:numParticles
  ^~~~~~~~
```
[R/ABC_SMC.R:88:17:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L88) *style:* **Variable and function names should be all lowercase.**
```r
  dispVals <- 1:numParticles
                ^~~~~~~~~~~~
```
[R/ABC_SMC.R:89:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L89) *style:* **Variable and function names should be all lowercase.**
```r
  filtVals <- 1:numParticles
  ^~~~~~~~
```
[R/ABC_SMC.R:89:17:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L89) *style:* **Variable and function names should be all lowercase.**
```r
  filtVals <- 1:numParticles
                ^~~~~~~~~~~~
```
[R/ABC_SMC.R:90:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L90) *style:* **Variable and function names should be all lowercase.**
```r
  compVals <- 1:numParticles
  ^~~~~~~~
```
[R/ABC_SMC.R:90:17:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L90) *style:* **Variable and function names should be all lowercase.**
```r
  compVals <- 1:numParticles
                ^~~~~~~~~~~~
```
[R/ABC_SMC.R:92:13:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L92) *style:* **Variable and function names should be all lowercase.**
```r
  fits <- 1:numParticles
            ^~~~~~~~~~~~
```
[R/ABC_SMC.R:93:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L93) *style:* **Variable and function names should be all lowercase.**
```r
  RichVec <- 1:numParticles
  ^~~~~~~
```
[R/ABC_SMC.R:93:16:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L93) *style:* **Variable and function names should be all lowercase.**
```r
  RichVec <- 1:numParticles
               ^~~~~~~~~~~~
```
[R/ABC_SMC.R:94:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L94) *style:* **Variable and function names should be all lowercase.**
```r
  EveVec <- 1:numParticles
  ^~~~~~
```
[R/ABC_SMC.R:94:15:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L94) *style:* **Variable and function names should be all lowercase.**
```r
  EveVec <- 1:numParticles
              ^~~~~~~~~~~~
```
[R/ABC_SMC.R:95:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L95) *style:* **Variable and function names should be all lowercase.**
```r
  DivVec <- 1:numParticles
  ^~~~~~
```
[R/ABC_SMC.R:95:15:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L95) *style:* **Variable and function names should be all lowercase.**
```r
  DivVec <- 1:numParticles
              ^~~~~~~~~~~~
```
[R/ABC_SMC.R:96:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L96) *style:* **Variable and function names should be all lowercase.**
```r
  OptVec <- 1:numParticles
  ^~~~~~
```
[R/ABC_SMC.R:96:15:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L96) *style:* **Variable and function names should be all lowercase.**
```r
  OptVec <- 1:numParticles
              ^~~~~~~~~~~~
```
[R/ABC_SMC.R:98:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L98) *style:* **Variable and function names should be all lowercase.**
```r
  nextDisp <- dispVals
  ^~~~~~~~
```
[R/ABC_SMC.R:98:15:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L98) *style:* **Variable and function names should be all lowercase.**
```r
  nextDisp <- dispVals
              ^~~~~~~~
```
[R/ABC_SMC.R:99:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L99) *style:* **Variable and function names should be all lowercase.**
```r
  nextFilt <- filtVals
  ^~~~~~~~
```
[R/ABC_SMC.R:99:15:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L99) *style:* **Variable and function names should be all lowercase.**
```r
  nextFilt <- filtVals
              ^~~~~~~~
```
[R/ABC_SMC.R:100:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L100) *style:* **Variable and function names should be all lowercase.**
```r
  nextComp <- compVals
  ^~~~~~~~
```
[R/ABC_SMC.R:100:15:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L100) *style:* **Variable and function names should be all lowercase.**
```r
  nextComp <- compVals
              ^~~~~~~~
```
[R/ABC_SMC.R:102:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L102) *style:* **Variable and function names should be all lowercase.**
```r
  weights <- rep(1, numParticles)
                    ^~~~~~~~~~~~
```
[R/ABC_SMC.R:103:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L103) *style:* **Variable and function names should be all lowercase.**
```r
  nextWeights <- rep(1, numParticles)
  ^~~~~~~~~~~
```
[R/ABC_SMC.R:103:25:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L103) *style:* **Variable and function names should be all lowercase.**
```r
  nextWeights <- rep(1, numParticles)
                        ^~~~~~~~~~~~
```
[R/ABC_SMC.R:104:16:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L104) *style:* **Variable and function names should be all lowercase.**
```r
  indices <- 1:numParticles
               ^~~~~~~~~~~~
```
[R/ABC_SMC.R:110:6:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L110) *style:* **Place a space before left parenthesis, except in a function call.**
```r
   if(length(f) > 0)
     ^
```
[R/ABC_SMC.R:111:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L111) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  {
  ^
```
[R/ABC_SMC.R:117:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L117) *style:* **Variable and function names should be all lowercase.**
```r
    dispVals <- d[,1]
    ^~~~~~~~
```
[R/ABC_SMC.R:117:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L117) *style:* **Commas should always have a space after.**
```r
    dispVals <- d[,1]
                   ^
```
[R/ABC_SMC.R:118:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L118) *style:* **Variable and function names should be all lowercase.**
```r
    filtVals <- d[,2]
    ^~~~~~~~
```
[R/ABC_SMC.R:118:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L118) *style:* **Commas should always have a space after.**
```r
    filtVals <- d[,2]
                   ^
```
[R/ABC_SMC.R:119:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L119) *style:* **Variable and function names should be all lowercase.**
```r
    compVals <- d[,3]
    ^~~~~~~~
```
[R/ABC_SMC.R:119:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L119) *style:* **Commas should always have a space after.**
```r
    compVals <- d[,3]
                   ^
```
[R/ABC_SMC.R:120:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L120) *style:* **Commas should always have a space after.**
```r
    fits <-     d[,8]
                   ^
```
[R/ABC_SMC.R:121:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L121) *style:* **Commas should always have a space after.**
```r
    weights <-  d[,9]
                   ^
```
[R/ABC_SMC.R:124:11:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L124) *style:* **Variable and function names should be all lowercase.**
```r
    if (d[numParticles,1] == numParticles)
          ^~~~~~~~~~~~
```
[R/ABC_SMC.R:124:24:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L124) *style:* **Commas should always have a space after.**
```r
    if (d[numParticles,1] == numParticles)
                       ^
```
[R/ABC_SMC.R:124:30:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L124) *style:* **Variable and function names should be all lowercase.**
```r
    if (d[numParticles,1] == numParticles)
                             ^~~~~~~~~~~~
```
[R/ABC_SMC.R:125:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L125) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    {
    ^
```
[R/ABC_SMC.R:126:35:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L126) *style:* **Put spaces around all infix operators.**
```r
      d <- read.table( f[length(f)-1], header = F);
                                 ~^~
```
[R/ABC_SMC.R:127:31:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L127) *style:* **Commas should always have a space after.**
```r
      output <- list( DA = d[,1], HF = d[,2], LS = d[,3]);
                              ^
```
[R/ABC_SMC.R:127:43:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L127) *style:* **Commas should always have a space after.**
```r
      output <- list( DA = d[,1], HF = d[,2], LS = d[,3]);
                                          ^
```
[R/ABC_SMC.R:127:55:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L127) *style:* **Commas should always have a space after.**
```r
      output <- list( DA = d[,1], HF = d[,2], LS = d[,3]);
                                                      ^
```
[R/ABC_SMC.R:136:3:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L136) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  {
  ^
```
[R/ABC_SMC.R:144:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L144) *style:* **Variable and function names should be all lowercase.**
```r
    numberAccepted <- 0
    ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:145:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L145) *style:* **Use two spaces to indent, never tabs.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
^
```
[R/ABC_SMC.R:145:28:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L145) *style:* **Variable and function names should be all lowercase.**
```r
    if (t != 1) weights <- normalizeWeights(weights)
                           ^~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:145:28:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L145) *warning:* **no visible global function definition for ‘normalizeWeights’**
```r
    if (t != 1) weights <- normalizeWeights(weights)
                           ^~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:153:12:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L153) *style:* **Variable and function names should be all lowercase.**
```r
    while (numberAccepted < numParticles) {
           ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:153:29:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L153) *style:* **Variable and function names should be all lowercase.**
```r
    while (numberAccepted < numParticles) {
                            ^~~~~~~~~~~~
```
[R/ABC_SMC.R:157:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L157) *style:* **Variable and function names should be all lowercase.**
```r
        params <- getRandomVals(species_fallout)
                  ^~~~~~~~~~~~~
```
[R/ABC_SMC.R:157:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L157) *warning:* **no visible global function definition for ‘getRandomVals’**
```r
        params <- getRandomVals(species_fallout)
                  ^~~~~~~~~~~~~
```
[R/ABC_SMC.R:159:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L159) *style:* **lines should not be more than 80 characters.**
```r
        params <- getFromPrevious(indices, weights, dispVals, filtVals, compVals)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:159:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L159) *style:* **Variable and function names should be all lowercase.**
```r
        params <- getFromPrevious(indices, weights, dispVals, filtVals, compVals)
                  ^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:159:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L159) *warning:* **no visible global function definition for ‘getFromPrevious’**
```r
        params <- getFromPrevious(indices, weights, dispVals, filtVals, compVals)
                  ^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:159:53:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L159) *style:* **Variable and function names should be all lowercase.**
```r
        params <- getFromPrevious(indices, weights, dispVals, filtVals, compVals)
                                                    ^~~~~~~~
```
[R/ABC_SMC.R:159:63:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L159) *style:* **Variable and function names should be all lowercase.**
```r
        params <- getFromPrevious(indices, weights, dispVals, filtVals, compVals)
                                                              ^~~~~~~~
```
[R/ABC_SMC.R:159:73:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L159) *style:* **Variable and function names should be all lowercase.**
```r
        params <- getFromPrevious(indices, weights, dispVals, filtVals, compVals)
                                                                        ^~~~~~~~
```
[R/ABC_SMC.R:160:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L160) *warning:* **no visible global function definition for ‘perturb’**
```r
        params <- perturb(params, sigma)
                  ^~~~~~~
```
[R/ABC_SMC.R:167:11:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L167) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        if( sum(params) > species_fallout) {
          ^
```
[R/ABC_SMC.R:179:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L179) *style:* **lines should not be more than 80 characters.**
```r
      # and community ((66 * permutations * communities) x total species richness) matrices
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:180:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L180) *style:* **lines should not be more than 80 characters.**
```r
      traits <- as.data.frame(species[, c(2:(n_traits + 1))], row.names = c(1:taxa))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:184:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L184) *style:* **Use two spaces to indent, never tabs.**
```r
	  d <- read.table(paste("particles_t=", t - 2, ".txt", sep="",
^
```
[R/ABC_SMC.R:185:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L185) *style:* **Use two spaces to indent, never tabs.**
```r
	                        collapse = NULL), header = F)
^
```
[R/ABC_SMC.R:186:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L186) *style:* **lines should not be more than 80 characters.**
```r
     # FD_output <- dbFD(traits[present_species, ], communities[, present_species], stand.x = F,messages=FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:186:8:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L186) *style:* **Commented code should be removed.**
```r
     # FD_output <- dbFD(traits[present_species, ], communities[, present_species], stand.x = F,messages=FALSE)
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:187:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L187) *style:* **Variable and function names should be all lowercase.**
```r
      FD_output <- strippedDbFd(Ord, communities[,present_species])
                   ^~~~~~~~~~~~
```
[R/ABC_SMC.R:187:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L187) *warning:* **no visible global function definition for ‘strippedDbFd’**
```r
      FD_output <- strippedDbFd(Ord, communities[,present_species])
                   ^~~~~~~~~~~~
```
[R/ABC_SMC.R:187:51:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L187) *style:* **Commas should always have a space after.**
```r
      FD_output <- strippedDbFd(Ord, communities[,present_species])
                                                  ^
```
[R/ABC_SMC.R:188:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L188) *style:* **Use two spaces to indent, never tabs.**
```r
		  d <- read.table(paste("particles_t=", t - 1, ".txt", sep="",
^~
```
[R/ABC_SMC.R:188:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L188) *style:* **lines should not be more than 80 characters.**
```r
      FRic <- FD_output$FRic # FRic = functional richness (Villeger et al, 2008, Ecology)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:189:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L189) *style:* **Use two spaces to indent, never tabs.**
```r
		                        collapse = NULL), header = F)
^~
```
[R/ABC_SMC.R:189:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L189) *style:* **lines should not be more than 80 characters.**
```r
      FEve <- FD_output$FEve # FEve = functional evenness (Villeger et al, 2008, Ecology)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:190:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L190) *style:* **Use two spaces to indent, never tabs.**
```r
	  } else {
^
```
[R/ABC_SMC.R:190:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L190) *style:* **lines should not be more than 80 characters.**
```r
      FDiv <- FD_output$FDiv # FDiv = functional diversity (Villeger et al, 2008, Ecology)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:191:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L191) *style:* **Use two spaces to indent, never tabs.**
```r
		  d <- read.table(paste("particles_t=", t, ".txt", sep="",
^~
```
[R/ABC_SMC.R:192:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L192) *style:* **Use two spaces to indent, never tabs.**
```r
		                        collapse = NULL), header = F)
^~
```
[R/ABC_SMC.R:193:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L193) *style:* **Use two spaces to indent, never tabs.**
```r
	  }
^
```
[R/ABC_SMC.R:199:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L199) *style:* **lines should not be more than 80 characters.**
```r
      # calculate distance of trait mean simulated community from that of observed
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:202:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L202) *style:* **lines should not be more than 80 characters.**
```r
      # (inverse) fit of model: euclidian distance of FD and trait mean values of
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:204:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L204) *style:* **lines should not be more than 80 characters.**
```r
      fit <- calculateDistance(FRic[[1]], FEve[[1]], FDiv[[1]], mean_optimum[1], summary_stats, sd_vals)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:204:14:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L204) *style:* **Variable and function names should be all lowercase.**
```r
      fit <- calculateDistance(FRic[[1]], FEve[[1]], FDiv[[1]], mean_optimum[1], summary_stats, sd_vals)
             ^~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:204:14:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L204) *warning:* **no visible global function definition for ‘calculateDistance’**
```r
      fit <- calculateDistance(FRic[[1]], FEve[[1]], FDiv[[1]], mean_optimum[1], summary_stats, sd_vals)
             ^~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:208:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L208) *style:* **Variable and function names should be all lowercase.**
```r
        numberAccepted <- numberAccepted + 1
        ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:208:27:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L208) *style:* **Variable and function names should be all lowercase.**
```r
        numberAccepted <- numberAccepted + 1
                          ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:209:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L209) *style:* **Variable and function names should be all lowercase.**
```r
        nextDisp[numberAccepted] = params[1]
        ^~~~~~~~
```
[R/ABC_SMC.R:209:18:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L209) *style:* **Variable and function names should be all lowercase.**
```r
        nextDisp[numberAccepted] = params[1]
                 ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:209:34:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L209) *style:* **Use <-, not =, for assignment.**
```r
        nextDisp[numberAccepted] = params[1]
                                 ^
```
[R/ABC_SMC.R:210:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L210) *style:* **Variable and function names should be all lowercase.**
```r
        nextFilt[numberAccepted] = params[2]
        ^~~~~~~~
```
[R/ABC_SMC.R:210:18:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L210) *style:* **Variable and function names should be all lowercase.**
```r
        nextFilt[numberAccepted] = params[2]
                 ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:210:34:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L210) *style:* **Use <-, not =, for assignment.**
```r
        nextFilt[numberAccepted] = params[2]
                                 ^
```
[R/ABC_SMC.R:211:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L211) *style:* **Variable and function names should be all lowercase.**
```r
        nextComp[numberAccepted] = params[3]
        ^~~~~~~~
```
[R/ABC_SMC.R:211:18:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L211) *style:* **Variable and function names should be all lowercase.**
```r
        nextComp[numberAccepted] = params[3]
                 ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:211:34:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L211) *style:* **Use <-, not =, for assignment.**
```r
        nextComp[numberAccepted] = params[3]
                                 ^
```
[R/ABC_SMC.R:213:14:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L213) *style:* **Variable and function names should be all lowercase.**
```r
        fits[numberAccepted] = fit
             ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:213:30:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L213) *style:* **Use <-, not =, for assignment.**
```r
        fits[numberAccepted] = fit
                             ^
```
[R/ABC_SMC.R:214:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L214) *style:* **Variable and function names should be all lowercase.**
```r
        RichVec[numberAccepted] = FRic[[1]]
        ^~~~~~~
```
[R/ABC_SMC.R:214:17:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L214) *style:* **Variable and function names should be all lowercase.**
```r
        RichVec[numberAccepted] = FRic[[1]]
                ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:214:33:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L214) *style:* **Use <-, not =, for assignment.**
```r
        RichVec[numberAccepted] = FRic[[1]]
                                ^
```
[R/ABC_SMC.R:215:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L215) *style:* **Variable and function names should be all lowercase.**
```r
        EveVec[numberAccepted] = FEve[[1]]
        ^~~~~~
```
[R/ABC_SMC.R:215:16:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L215) *style:* **Variable and function names should be all lowercase.**
```r
        EveVec[numberAccepted] = FEve[[1]]
               ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:215:32:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L215) *style:* **Use <-, not =, for assignment.**
```r
        EveVec[numberAccepted] = FEve[[1]]
                               ^
```
[R/ABC_SMC.R:216:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L216) *style:* **Variable and function names should be all lowercase.**
```r
        DivVec[numberAccepted] = FDiv[[1]]
        ^~~~~~
```
[R/ABC_SMC.R:216:16:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L216) *style:* **Variable and function names should be all lowercase.**
```r
        DivVec[numberAccepted] = FDiv[[1]]
               ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:216:32:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L216) *style:* **Use <-, not =, for assignment.**
```r
        DivVec[numberAccepted] = FDiv[[1]]
                               ^
```
[R/ABC_SMC.R:217:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L217) *style:* **Variable and function names should be all lowercase.**
```r
        OptVec[numberAccepted] = mean_optimum;
        ^~~~~~
```
[R/ABC_SMC.R:217:16:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L217) *style:* **Variable and function names should be all lowercase.**
```r
        OptVec[numberAccepted] = mean_optimum;
               ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:217:32:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L217) *style:* **Use <-, not =, for assignment.**
```r
        OptVec[numberAccepted] = mean_optimum;
                               ^
```
[R/ABC_SMC.R:219:11:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L219) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        if(t == 1) {
          ^
```
[R/ABC_SMC.R:220:11:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L220) *style:* **Variable and function names should be all lowercase.**
```r
          nextWeights[numberAccepted] = 1
          ^~~~~~~~~~~
```
[R/ABC_SMC.R:220:23:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L220) *style:* **Variable and function names should be all lowercase.**
```r
          nextWeights[numberAccepted] = 1
                      ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:220:39:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L220) *style:* **Use <-, not =, for assignment.**
```r
          nextWeights[numberAccepted] = 1
                                      ^
```
[R/ABC_SMC.R:222:11:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L222) *style:* **Variable and function names should be all lowercase.**
```r
          nextWeights[numberAccepted] =
          ^~~~~~~~~~~
```
[R/ABC_SMC.R:222:23:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L222) *style:* **Variable and function names should be all lowercase.**
```r
          nextWeights[numberAccepted] =
                      ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:222:39:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L222) *style:* **Use <-, not =, for assignment.**
```r
          nextWeights[numberAccepted] =
                                      ^
```
[R/ABC_SMC.R:223:13:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L223) *style:* **Variable and function names should be all lowercase.**
```r
            calculateWeight(params, changed, sigma, dispVals, filtVals,
            ^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:223:53:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L223) *style:* **Variable and function names should be all lowercase.**
```r
            calculateWeight(params, changed, sigma, dispVals, filtVals,
                                                    ^~~~~~~~
```
[R/ABC_SMC.R:223:63:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L223) *style:* **Variable and function names should be all lowercase.**
```r
            calculateWeight(params, changed, sigma, dispVals, filtVals,
                                                              ^~~~~~~~
```
[R/ABC_SMC.R:224:29:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L224) *style:* **Variable and function names should be all lowercase.**
```r
                            compVals, numParticles, weights)
                            ^~~~~~~~
```
[R/ABC_SMC.R:224:39:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L224) *style:* **Variable and function names should be all lowercase.**
```r
                            compVals, numParticles, weights)
                                      ^~~~~~~~~~~~
```
[R/ABC_SMC.R:227:18:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L227) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
                 ^
```
[R/ABC_SMC.R:227:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L227) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
                  ^
```
[R/ABC_SMC.R:227:20:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L227) *style:* **Variable and function names should be all lowercase.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
                   ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:227:35:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L227) *style:* **Put spaces around all infix operators.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
                                 ~^~~
```
[R/ABC_SMC.R:227:37:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L227) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
                                    ^
```
[R/ABC_SMC.R:227:38:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L227) *style:* **Variable and function names should be all lowercase.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
                                     ^~~~~~~~~~~~
```
[R/ABC_SMC.R:227:51:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L227) *style:* **Put spaces around all infix operators.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
                                                 ~^~
```
[R/ABC_SMC.R:227:65:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L227) *style:* **Put spaces around all infix operators.**
```r
	      if ((numberAccepted)%%(numParticles / PRINT_FREQ) == 0) {
                                                               ~^~~
```
[R/ABC_SMC.R:233:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L233) *style:* **Put spaces around all infix operators.**
```r
      if (tried > (1/stopRate) && tried > 5)  {
                   ~^~
```
[R/ABC_SMC.R:233:22:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L233) *style:* **Variable and function names should be all lowercase.**
```r
      if (tried > (1/stopRate) && tried > 5)  {
                     ^~~~~~~~
```
[R/ABC_SMC.R:235:13:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L235) *style:* **Variable and function names should be all lowercase.**
```r
        if (numberAccepted / tried < stopRate) {
            ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:235:38:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L235) *style:* **Variable and function names should be all lowercase.**
```r
        if (numberAccepted / tried < stopRate) {
                                     ^~~~~~~~
```
[R/ABC_SMC.R:242:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L242) *style:* **Variable and function names should be all lowercase.**
```r
    dispVals <- nextDisp
    ^~~~~~~~
```
[R/ABC_SMC.R:242:17:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L242) *style:* **Variable and function names should be all lowercase.**
```r
    dispVals <- nextDisp
                ^~~~~~~~
```
[R/ABC_SMC.R:243:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L243) *style:* **Variable and function names should be all lowercase.**
```r
    filtVals <- nextFilt
    ^~~~~~~~
```
[R/ABC_SMC.R:243:17:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L243) *style:* **Variable and function names should be all lowercase.**
```r
    filtVals <- nextFilt
                ^~~~~~~~
```
[R/ABC_SMC.R:244:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L244) *style:* **Variable and function names should be all lowercase.**
```r
    compVals <- nextComp
    ^~~~~~~~
```
[R/ABC_SMC.R:244:17:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L244) *style:* **Variable and function names should be all lowercase.**
```r
    compVals <- nextComp
                ^~~~~~~~
```
[R/ABC_SMC.R:245:16:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L245) *style:* **Variable and function names should be all lowercase.**
```r
    weights <- nextWeights
               ^~~~~~~~~~~
```
[R/ABC_SMC.R:247:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L247) *style:* **Variable and function names should be all lowercase.**
```r
    output <- cbind(dispVals, filtVals, compVals, RichVec,
                    ^~~~~~~~
```
[R/ABC_SMC.R:247:31:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L247) *style:* **Variable and function names should be all lowercase.**
```r
    output <- cbind(dispVals, filtVals, compVals, RichVec,
                              ^~~~~~~~
```
[R/ABC_SMC.R:247:41:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L247) *style:* **Variable and function names should be all lowercase.**
```r
    output <- cbind(dispVals, filtVals, compVals, RichVec,
                                        ^~~~~~~~
```
[R/ABC_SMC.R:247:51:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L247) *style:* **Variable and function names should be all lowercase.**
```r
    output <- cbind(dispVals, filtVals, compVals, RichVec,
                                                  ^~~~~~~
```
[R/ABC_SMC.R:248:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L248) *style:* **Variable and function names should be all lowercase.**
```r
                    EveVec, DivVec, OptVec, fits, weights)
                    ^~~~~~
```
[R/ABC_SMC.R:248:29:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L248) *style:* **Variable and function names should be all lowercase.**
```r
                    EveVec, DivVec, OptVec, fits, weights)
                            ^~~~~~
```
[R/ABC_SMC.R:248:37:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L248) *style:* **Variable and function names should be all lowercase.**
```r
                    EveVec, DivVec, OptVec, fits, weights)
                                    ^~~~~~
```
[R/ABC_SMC.R:249:54:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L249) *style:* **Put spaces around all infix operators.**
```r
    file_name <- paste("particles_t=", t, ".txt", sep="", collapse = NULL)
                                                    ~^~
```
[R/ABC_SMC.R:252:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L252) *style:* **lines should not be more than 80 characters.**
```r
    cat(" ", mean(dispVals), mean(filtVals), mean(compVals), "\t", "accept rate = ",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:252:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L252) *style:* **Variable and function names should be all lowercase.**
```r
    cat(" ", mean(dispVals), mean(filtVals), mean(compVals), "\t", "accept rate = ",
                  ^~~~~~~~
```
[R/ABC_SMC.R:252:35:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L252) *style:* **Variable and function names should be all lowercase.**
```r
    cat(" ", mean(dispVals), mean(filtVals), mean(compVals), "\t", "accept rate = ",
                                  ^~~~~~~~
```
[R/ABC_SMC.R:252:51:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L252) *style:* **Variable and function names should be all lowercase.**
```r
    cat(" ", mean(dispVals), mean(filtVals), mean(compVals), "\t", "accept rate = ",
                                                  ^~~~~~~~
```
[R/ABC_SMC.R:253:9:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L253) *style:* **Variable and function names should be all lowercase.**
```r
        numberAccepted / (tried-1), numberAccepted, tried, "\n")
        ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:253:32:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L253) *style:* **Put spaces around all infix operators.**
```r
        numberAccepted / (tried-1), numberAccepted, tried, "\n")
                              ~^~
```
[R/ABC_SMC.R:253:37:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L253) *style:* **Variable and function names should be all lowercase.**
```r
        numberAccepted / (tried-1), numberAccepted, tried, "\n")
                                    ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:256:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L256) *style:* **Variable and function names should be all lowercase.**
```r
    nextWeights <- rep(1,numParticles)
    ^~~~~~~~~~~
```
[R/ABC_SMC.R:256:26:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L256) *style:* **Commas should always have a space after.**
```r
    nextWeights <- rep(1,numParticles)
                         ^
```
[R/ABC_SMC.R:256:26:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L256) *style:* **Variable and function names should be all lowercase.**
```r
    nextWeights <- rep(1,numParticles)
                         ^~~~~~~~~~~~
```
[R/ABC_SMC.R:257:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L257) *style:* **Variable and function names should be all lowercase.**
```r
    nextDisp <- 1:numParticles
    ^~~~~~~~
```
[R/ABC_SMC.R:257:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L257) *style:* **Variable and function names should be all lowercase.**
```r
    nextDisp <- 1:numParticles
                  ^~~~~~~~~~~~
```
[R/ABC_SMC.R:258:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L258) *style:* **Variable and function names should be all lowercase.**
```r
    nextFilt <- 1:numParticles
    ^~~~~~~~
```
[R/ABC_SMC.R:258:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L258) *style:* **Variable and function names should be all lowercase.**
```r
    nextFilt <- 1:numParticles
                  ^~~~~~~~~~~~
```
[R/ABC_SMC.R:259:5:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L259) *style:* **Variable and function names should be all lowercase.**
```r
    nextComp <- 1:numParticles
    ^~~~~~~~
```
[R/ABC_SMC.R:259:19:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L259) *style:* **Variable and function names should be all lowercase.**
```r
    nextComp <- 1:numParticles
                  ^~~~~~~~~~~~
```
[R/ABC_SMC.R:266:13:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L266) *style:* **Put spaces around all infix operators.**
```r
	  d <- read.table(paste("particles_t=", t - 2, ".txt", sep="",
           ~^~~
```
[R/ABC_SMC.R:266:51:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L266) *style:* **Put spaces around all infix operators.**
```r
	  d <- read.table(paste("particles_t=", t - 2, ".txt", sep="",
                                                 ~^~
```
[R/ABC_SMC.R:267:42:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L267) *style:* **Put spaces around all infix operators.**
```r
	                        collapse = NULL), header = F)
                                        ~^
```
[R/ABC_SMC.R:270:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L270) *style:* **Put spaces around all infix operators.**
```r
		  d <- read.table(paste("particles_t=", t - 1, ".txt", sep="",
                   ~^~~
```
[R/ABC_SMC.R:270:59:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L270) *style:* **Put spaces around all infix operators.**
```r
		  d <- read.table(paste("particles_t=", t - 1, ".txt", sep="",
                                                         ~^~
```
[R/ABC_SMC.R:271:50:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L271) *style:* **Put spaces around all infix operators.**
```r
		                        collapse = NULL), header = F)
                                                ~^
```
[R/ABC_SMC.R:273:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L273) *style:* **Put spaces around all infix operators.**
```r
		  d <- read.table(paste("particles_t=", t, ".txt", sep="",
                   ~^~~
```
[R/ABC_SMC.R:274:50:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/ABC_SMC.R#L274) *style:* **Put spaces around all infix operators.**
```r
		                        collapse = NULL), header = F)
                                                ~^
```
[R/generateArtificialData.R:3:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L3) *style:* **Use two spaces to indent, never tabs.**
```r

^
```
[R/generateArtificialData.R:4:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L4) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
generate.Artificial.Data <- function(numSpecies, numTraits, numCommunities,
^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/generateArtificialData.R:4:38:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L4) *style:* **Variable and function names should be all lowercase.**
```r
generate.Artificial.Data <- function(numSpecies, numTraits, numCommunities,
                                     ^~~~~~~~~~
```
[R/generateArtificialData.R:4:50:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L4) *style:* **Variable and function names should be all lowercase.**
```r
generate.Artificial.Data <- function(numSpecies, numTraits, numCommunities,
                                                 ^~~~~~~~~
```
[R/generateArtificialData.R:4:61:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L4) *style:* **Variable and function names should be all lowercase.**
```r
generate.Artificial.Data <- function(numSpecies, numTraits, numCommunities,
                                                            ^~~~~~~~~~~~~~
```
[R/generateArtificialData.R:5:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L5) *style:* **Use two spaces to indent, never tabs.**
```r
	pool_richness <- numSpecies
^
```
[R/generateArtificialData.R:6:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L6) *style:* **Use two spaces to indent, never tabs.**
```r
	n_traits <- numTraits;
^
```
[R/generateArtificialData.R:6:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L6) *style:* **Trailing whitespace is superfluous.**
```r

^
```
[R/generateArtificialData.R:7:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L7) *style:* **Use two spaces to indent, never tabs.**
```r
	n_communities <- numCommunities
^
```
[R/generateArtificialData.R:8:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L8) *style:* **Use two spaces to indent, never tabs.**
```r
	mechanism_random <- random.Mechanism;
^
```
[R/generateArtificialData.R:8:23:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L8) *style:* **Put spaces around all infix operators.**
```r
	pool_richness <- numSpecies
                     ~^~~
```
[R/generateArtificialData.R:8:26:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L8) *style:* **Variable and function names should be all lowercase.**
```r
	pool_richness <- numSpecies
                         ^~~~~~~~~~
```
[R/generateArtificialData.R:8:39:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L8) *style:* **Use two spaces to indent, never tabs.**
```r
	mechanism_random <- random.Mechanism;
                                      ^
```
[R/generateArtificialData.R:9:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L9) *style:* **Use two spaces to indent, never tabs.**
```r

^
```
[R/generateArtificialData.R:9:18:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L9) *style:* **Put spaces around all infix operators.**
```r
	n_traits <- numTraits;
                ~^~~
```
[R/generateArtificialData.R:9:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L9) *style:* **Variable and function names should be all lowercase.**
```r
	n_traits <- numTraits;
                    ^~~~~~~~~
```
[R/generateArtificialData.R:10:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L10) *style:* **Use two spaces to indent, never tabs.**
```r
	traits_pool <- matrix(round(rnorm(n = (pool_richness * n_traits), mean = 0, sd = 1), 3),
^
```
[R/generateArtificialData.R:10:23:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L10) *style:* **Put spaces around all infix operators.**
```r
	n_communities <- numCommunities
                     ~^~~
```
[R/generateArtificialData.R:10:26:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L10) *style:* **Variable and function names should be all lowercase.**
```r
	n_communities <- numCommunities
                         ^~~~~~~~~~~~~~
```
[R/generateArtificialData.R:11:26:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L11) *style:* **Put spaces around all infix operators.**
```r
	mechanism_random <- random.Mechanism;
                        ~^~~
```
[R/generateArtificialData.R:11:39:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L11) *style:* **Trailing whitespace is superfluous.**
```r
	mechanism_random <- random.Mechanism;
                                      ^
```
[R/generateArtificialData.R:12:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L12) *style:* **Trailing whitespace is superfluous.**
```r

^
```
[R/generateArtificialData.R:13:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L13) *style:* **Use two spaces to indent, never tabs.**
```r
	column1 <- c()
^
```
[R/generateArtificialData.R:13:1:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L13) *style:* **lines should not be more than 80 characters.**
```r
	traits_pool <- matrix(round(rnorm(n = (pool_richness * n_traits), mean = 0, sd = 1), 3),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/generateArtificialData.R:13:21:](https://github.com/thijsjanzen/STEPCAM/blob/23fca3a12c6976cc5d84be35f8cf8869ffa3e8b9/R/generateArtificialData.R#L13) *style:* **Put spaces around all infix operators.**
```r
	traits_pool <- matrix(round(rnorm(n = (pool_richness * n_traits), mean = 0, sd = 1), 3),
                   ~^~~
```


On 18 Sep 2016, at 11:30, Tom Keffer wrote:

> They are redundant, but those are the id's used in the original docs in customizing.htm, and I didn't want to change them.

the 3.5.0 and earlier docs did not have a utilities.htm

customizing.htm had no references to #*_utility before we added utilities.htm - it had only one reference, and that was #wee_reports

so we should be able to do the #name identifiers right without breaking previous links


This `finishWritingToStream` method will call `serializationStream.close()` at the end of the method, which calls `RedirectableOutputStream.close()`, which will end up closing the `fileOutputStream` passed in here.


Great pull request. Could you have the same code styling so its easy to see what has changed and do the pull? :)


Unless there is a reference in the forums (which would be broken anyway).

Speaking of which, do you know a way to put a forwarding reference in `customizing.htm`? So, a reference to `customizing.htm#wee_database_utility` would be sent to `utilities.htm#wee_database_utility` (or, I suppose, `utilities.htm#wee_database`)?


that ws true, but the release was added on july 16th


latest cve fix


fuck


Ett svar från mig


also as a bonus I want `text-style-to-X-font` to fallback to the ordinary xorg-fonts when this part of code fails. I haven't started that part yet though and I'm not sure how feasible this will be. So instead of missing-font error we will have ugly font. What do you think about this idea?


If not logged in, the link in the menu could go to a plain profile page that just says, "you gotta login - or - search for a user"

Also, now that there are user/11/profile pages, we can link to those pages on things like, "updated on Sept-18-2016 by ssw" with the "ssw" linking to the profile page.

Also note that travis is complaining about that commit I made above. Tests aren't breaking, per se, but there are warnings.


Your js should be put inside `<head></head>`.


initial commit


Also see [Issue 284: SunCC 12.2 - 12.5 and incorrect results for GCM when using SSE2 ASM](http://github.com/weidai11/cryptopp/issues/284).


Good idea.  I was hesitant to do this because of formatting but I can just include detailed instructions in the readme.


On 18 Sep 2016, at 11:47, Tom Keffer wrote:

> Speaking of which, do you know a way to put a forwarding reference in customizing.htm? So, a reference to customizing.htm#wee_database_utility would be sent to utilities.htm#wee_database_utility (or, I suppose, utilities.htm#wee_database)?

i think the only options for redirect are in a web server.

as for client-side, i can imagine doing it in javascript.  you could have a function that rewrites all of the name anchors and/or ids when the page has loaded.  or you could have a function that intercepts any link and rewrites when clicked on.  the former would probably be more robust.


Breaking single responsibility principle.
Maintaining mystifly file path, reading from that file should be responsibility of mystifly specific class and not service class.


Добавлено copy


Removing the cloud thread was over-optimistic, but I was able to move the cloud icon handling out of the cloud thread. You should not hit that assert anymore.


Since ``Node`` is an independent class you will need a test case for it as well..


added two changes


Ууууу Зибаляба ХММММ БУГФИКСЫ!!! ДРАТУТИ!


这样就可以 `Db::connect()->getTables()` 获取所有表名了


If this commit crash world server when wintergrasp is turned on, i doesn't make sense


SD3 had duplicate declarations which had to be removed, therefore requiring this having to be done again for m3.


I was unable to specify employee list component in the directives property of @Component of app. Adding it to declarations worked.


Neat. Great that you found it useful.


Thanks for looking!

I didn't want to reuse the existing conn because I was changing the DN that it was binding with, and I was afraid I would change usage/assumptions for other uses of that connection.

I'm not sure there's a good reason to store or reuse the connection that the user did its bind with. Maybe it's OK to reuse conn after all, or maybe I should just close my connection?

Open to ideas.


Тогда предлагаю промежуточный вариант: заменить несколько букв на звёздочки.


No, I should have been more specific. Reading my first comment, it does seem like I'm suggesting removing the music altogether.


Ну так ведь он в оригинале использует на работе слова вроде "shit" и "fuck", поэтому 8ман и называет его "Informal man". Да, "Неформал" в России ассоциируется с... неформалами, но я не знаю варианта лучше.


delay to simulate network behavior?


>  Is the idea to have a nanosecond based equivalent to TimeSpan?

Kind of.

> This reads well enough, but mirroring TimeSpan with `TimeInterval.FromMilliseconds(200)` might make it a little more discoverable.

Done: https://github.com/PerfDotNet/BenchmarkDotNet/commit/ef3ecfad7ba8fa3dd346cdf7165a5b767591007f

> It's also a breaking change for anyone who has defined their own IConfig.

The next release will contain a lot of breaking changes, I have significantly improved Job API. So, it would be `v0.10.0`, not `v0.9.10`.


Да, так будет лучше.


Это не баг, а фича. Всё ок


Nicely done!


See what does Results do if supplier don't return result in 30 seconds. (delay is missing as well)


OK, grazie Sara, dopo vedo di modificarla.


You are a god :dancer:


Quang ơi, phần hướng phát triển


Always use relative paths. You can not ensure file will be at same path at server.
Also file path should be configurable. Use web.config for configurations.


new VC


So nice


this wont work, tried it long back


creating new vc


Thank


What's this weird code?


heh, i think this was mainly me being thick. thanks for clarifying though :)


Not enought space on device....


i need a guide


@ZakAmirz here it's how @TheDoct0r11 does an example of population, like you said how you does.


now


that's a wrong needle. Reboot is not selected but Logout. Also, I recommend to not name it "Leap422" as it's not very specific to Leap42.2. It does have the Leap background but the rest is Plasma5.8. We need the same needle on Krypton/Argon.