[inst/examples/example_experiment.R:91:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_experiment.R#L91) *style:* **Commented code should be removed.**
```r
  # library(raster)
    ^~~~~~~~~~~~~~~
```
[inst/examples/example_experiment.R:92:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_experiment.R#L92) *style:* **Commented code should be removed.**
```r
  # beginCluster(20) # if you have multiple clusters available, use them here to save time
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_experiment.R:96:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_experiment.R#L96) *style:* **Commented code should be removed.**
```r
  # endCluster() # end the clusters
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_experiment.R:152:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_experiment.R#L152) *style:* **Commented code should be removed.**
```r
  # fires <- lapply(sims, function(x) x$landscape$fires) %>% stack
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_POM.R:49:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_POM.R#L49) *style:* **Commented code should be removed.**
```r
  # cl <- makeCluster(detectCores() - 1) # not implemented yet in DEoptim
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_POM.R:84:4:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_POM.R#L84) *style:* **Commented code should be removed.**
```r
  #stopCluster(cl) # not yet implemented, waiting for DEoptim
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_POM.R:107:34:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_POM.R#L107) *style:* **Variable or function name should be lowerCamelCase.**
```r
    params(sim1)$caribouMovement$N <- pars[2]
                                 ^
```
[inst/examples/example_POM.R:114:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_POM.R#L114) *style:* **Variable or function name should be lowerCamelCase.**
```r
    nPattern_Out <- caribouFn(out$caribou)
    ^~~~~~~~~~~~
```
[inst/examples/example_POM.R:120:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_POM.R#L120) *style:* **Commented code should be removed.**
```r
    # cat(minimizeFn)
      ^~~~~~~~~~~~~~~
```
[inst/examples/example_POM.R:121:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_POM.R#L121) *style:* **Commented code should be removed.**
```r
    # cat(" ")
      ^~~~~~~~
```
[inst/examples/example_POM.R:122:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_POM.R#L122) *style:* **Commented code should be removed.**
```r
    # cat(pars)
      ^~~~~~~~~
```
[inst/examples/example_POM.R:123:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/examples/example_POM.R#L123) *style:* **Commented code should be removed.**
```r
    # cat("\n")
      ^~~~~~~~~
```
[inst/sampleModules/caribouMovement/caribouMovement.R:1:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L1) *style:* **Variable or function name should be lowerCamelCase.**
```r
SpaDES.core.version <- "0.1.0"
^~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/caribouMovement/caribouMovement.R:54:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L54) *style:* **Variable or function name should be lowerCamelCase.**
```r
doEvent.caribouMovement <- function(sim, eventTime, eventType, debug = FALSE) {
^~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/caribouMovement/caribouMovement.R:86:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L86) *style:* **Lines should not be more than 100 characters.**
```r
      sim <- scheduleEvent(sim, time(sim) + P(sim)$.plotInterval, "caribouMovement", "plot", .last())
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/caribouMovement/caribouMovement.R:95:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L95) *style:* **Lines should not be more than 100 characters.**
```r
      sim <- scheduleEvent(sim, time(sim) + P(sim)$.plotInterval, "caribouMovement", "plot", .last())
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/caribouMovement/caribouMovement.R:102:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L102) *style:* **Lines should not be more than 100 characters.**
```r
      sim <- scheduleEvent(sim, time(sim) + P(sim)$.saveInterval, "caribouMovement", "save", .last() + 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/caribouMovement/caribouMovement.R:114:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L114) *style:* **Variable or function name should be lowerCamelCase.**
```r
Init <- function(sim) {
^~~~
```
[inst/sampleModules/caribouMovement/caribouMovement.R:121:3:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L121) *style:* **Variable or function name should be lowerCamelCase.**
```r
  N <- P(sim)$N
  ^
```
[inst/sampleModules/caribouMovement/caribouMovement.R:122:3:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L122) *style:* **Variable or function name should be lowerCamelCase.**
```r
  IDs <- as.character(1:N)
  ^~~
```
[inst/sampleModules/caribouMovement/caribouMovement.R:138:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/caribouMovement/caribouMovement.R#L138) *style:* **Variable or function name should be lowerCamelCase.**
```r
Move <- function(sim) {
^~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:1:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L1) *style:* **Variable or function name should be lowerCamelCase.**
```r
SpaDES.core.version <- "0.1.0"
^~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:20:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L20) *style:* **Lines should not be more than 100 characters.**
```r
    person(c("Alex", "M"), "Chubaty", email = "alexander.chubaty@canada.ca", role = c("aut", "cre")),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:21:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L21) *style:* **Lines should not be more than 100 characters.**
```r
    person(c("Eliot", "J", "B"), "McIntire", email = "eliot.mcintire@canada.ca", role = c("aut", "cre")),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:35:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L35) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("persistprob", "numeric", 0.00, 0, 1, "probability of fire persisting in a pixel"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:37:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L37) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("spreadprob", "numeric", 0.225, 0.05, 0.5, "probability of fire spreading into a pixel"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:38:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L38) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("startTime", "numeric", start(sim) + 1, 0, end(sim), "time of initial fire ignition"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:39:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L39) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".plotInitialTime", "numeric", start(sim), start(sim), end(sim) + 1, "time to schedule first plot event"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:41:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L41) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".saveInitialTime", "numeric", NA_real_, NA, NA, "time to schedule first save event"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:42:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L42) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".saveInterval", "numeric", NA_real_, NA, NA, "time interval between save events")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:59:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L59) *style:* **Variable or function name should be lowerCamelCase.**
```r
doEvent.fireSpread <- function(sim, eventTime, eventType, debug = FALSE) {
^~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:87:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L87) *style:* **Lines should not be more than 100 characters.**
```r
      sim <- scheduleEvent(sim, time(sim), "fireSpread", "stats") # do stats immediately following burn
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:142:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L142) *style:* **Variable or function name should be lowerCamelCase.**
```r
Init <- function(sim) {
^~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:146:3:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L146) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Fires <- raster(extent(landscapes), ncol = ncol(landscapes),
  ^~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:150:3:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L150) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Fires <- setValues(Fires, 0)
  ^~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:153:14:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L153) *style:* **Variable or function name should be lowerCamelCase.**
```r
  landscapes$Fires <- Fires
             ^~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:159:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L159) *style:* **Variable or function name should be lowerCamelCase.**
```r
Burn <- function(sim) {
^~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:162:3:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L162) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Fires <- spread(landscapes[[1]],
  ^~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:174:14:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L174) *style:* **Variable or function name should be lowerCamelCase.**
```r
  landscapes$Fires <- Fires
             ^~~~~
```
[inst/sampleModules/fireSpread/fireSpread.R:181:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/fireSpread/fireSpread.R#L181) *style:* **Variable or function name should be lowerCamelCase.**
```r
Stats <- function(sim) {
^~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:1:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L1) *style:* **Variable or function name should be lowerCamelCase.**
```r
SpaDES.core.version <- "0.1.0"
^~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:33:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L33) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("inRAM", "logical", FALSE, TRUE, FALSE, "should the raster be stored in memory?"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:34:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L34) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("nx", "numeric", 100L, 10L, 500L, "size of map (number of pixels) in the x dimension"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:35:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L35) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("ny", "numeric", 100L, 10L, 500L, "size of map (number of pixels) in the y dimension"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:37:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L37) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".plotInitialTime", "numeric", start(sim), start(sim), NA, "time to schedule first plot event"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:38:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L38) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".plotInterval", "numeric", NA_real_, NA, NA, "time interval between plot events"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:39:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L39) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".saveInitialTime", "numeric", NA_real_, NA, NA, "time to schedule first save event"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:40:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L40) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".saveInterval", "numeric", NA_real_, NA, NA, "time interval between save events"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:41:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L41) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".useCache", "logical", FALSE, c("init", "plot"), NA, "should the module result be cached for future use")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:55:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L55) *style:* **Variable or function name should be lowerCamelCase.**
```r
doEvent.randomLandscapes <- function(sim, eventTime, eventType, debug = FALSE) {
^~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:75:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L75) *style:* **Lines should not be more than 100 characters.**
```r
      sim <- scheduleEvent(sim, time(sim) + P(sim)$.saveInterval, "randomLandscapes", "save", .last() + 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:86:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L86) *style:* **Variable or function name should be lowerCamelCase.**
```r
Init <- function(sim) {
^~~~
```
[inst/sampleModules/randomLandscapes/randomLandscapes.R:100:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/randomLandscapes/randomLandscapes.R#L100) *style:* **Variable or function name should be lowerCamelCase.**
```r
    DEM <- gaussMap(template, scale = 300, var = 0.03, speedup = speedup, inMemory = inMemory)
    ^~~
```
[inst/sampleModules/SpaDES_sampleModules/SpaDES_sampleModules.R:17:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/SpaDES_sampleModules/SpaDES_sampleModules.R#L17) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".plotInitialTime", "numeric", NA_real_, NA, NA, "This describes the simulation time at which the first plot event should occur"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/sampleModules/SpaDES_sampleModules/SpaDES_sampleModules.R:18:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/inst/sampleModules/SpaDES_sampleModules/SpaDES_sampleModules.R#L18) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".saveInitialTime", "numeric", NA_real_, NA, NA, "This describes the simulation time at which the first save event should occur")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:233:50:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L233) *style:* **Commas should always have a space after.**
```r
          cat(crayon::blue("  Using ", fromWhere," copy of", cur$moduleName, "module\n"))
                                                 ^
```
[R/cache.R:244:50:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L244) *style:* **Commas should always have a space after.**
```r
          cat(crayon::blue("  Using ", fromWhere," copy of", cur$eventType, "event in",
                                                 ^
```
[R/cache.R:294:10:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L294) *style:* **Commented code should be removed.**
```r
        #checkPath(cacheRepo, create = TRUE) #SpaDES dependency
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:418:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L418) *style:* **Lines should not be more than 100 characters.**
```r
        #   makes soft copy of all objects, i.e., they have the identical objects, which are pointers only
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:446:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L446) *style:* **Lines should not be more than 100 characters.**
```r
        list2env(mget(lsObjectEnv[lsObjectEnv %in% createOutputs | lsObjectEnv %in% expectsInputs], envir = object@.envir), envir = object2@.envir)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:456:12:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L456) *style:* **Commented code should be removed.**
```r
          #object2@events <- unique(rbindlist(list(object@events, object2@events)))
           ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:460:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L460) *style:* **Lines should not be more than 100 characters.**
```r
        # This is for objects that are not in the return environment yet because they are unrelated to the
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:473:10:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L473) *style:* **Place a space before left parenthesis, except in a function call.**
```r
      for(atts in attrsToGrab) {
         ^
```
[R/cache.R:477:9:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L477) *style:* **Commented code should be removed.**
```r
      # attr(object2, "tags") <- attr(object, "tags")
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:478:9:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L478) *style:* **Commented code should be removed.**
```r
      # attr(object2, "call") <- attr(object, "call")
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:479:9:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L479) *style:* **Commented code should be removed.**
```r
      # attr(object2, "function") <- attr(object, "function")
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:512:66:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L512) *style:* **Variable or function name should be lowerCamelCase.**
```r
  setGeneric(".addTagsToOutput", function(object, outputObjects, FUN) {
                                                                 ^~~
```
[R/cache.R:535:48:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L535) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(object, outputObjects, FUN, preDigestByClass) {
                                               ^~~
```
[R/cache.R:627:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L627) *style:* **Variable or function name should be lowerCamelCase.**
```r
objSize.simList <- function(x, quick = getOption("reproducible.quick", FALSE)) {
^~~~~~~~~~~~~~~
```
[R/cache.R:654:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L654) *style:* **Variable or function name should be lowerCamelCase.**
```r
makeMemoiseable.simList <- function(x) {
^~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:662:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/cache.R#L662) *style:* **Variable or function name should be lowerCamelCase.**
```r
unmakeMemoiseable.simList_ <- function(x) {
^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/checkpoint.R:36:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/checkpoint.R#L36) *style:* **Variable or function name should be lowerCamelCase.**
```r
doEvent.checkpoint <- function(sim, eventTime, eventType, debug = FALSE) {
^~~~~~~~~~~~~~~~~~
```
[R/code-checking.R:86:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L86) *style:* **Lines should not be more than 100 characters.**
```r
                xAsCall <- .isLastLineSim(x = x, xAsString = bb[seq(funStarts[yy], funEnds[yy + 1])])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/code-checking.R:90:16:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L90) *style:* **Commented code should be removed.**
```r
              #y = strsplit(bb[funStarts[yy]], split = "\\s+")[[1]][1]
               ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/code-checking.R:91:53:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L91) *style:* **Commas should always have a space after.**
```r
              y <- paste0(cantCodeCheckMessage, "'",bb[funStarts[yy]], "'")
                                                    ^
```
[R/code-checking.R:144:39:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L144) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    if (identical(type, "returnSim")) { # This is intended for only the last line of a function
                                      ^
```
[R/code-checking.R:182:48:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L182) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
      } else if (identical(x[[1]], quote(`<-`)) ) {
                                               ^
```
[R/code-checking.R:185:62:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L185) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
            if (any(grepl(x[[2]][[2]], pattern = ".envir"))) {# i.e., sim@.envir
                                                             ^
```
[R/code-checking.R:202:19:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L202) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          x <- x[-(1:2)]
                  ^
```
[R/code-checking.R:218:29:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L218) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          x[[2]] <- x[[2]][-(1:2)]
                            ^
```
[R/code-checking.R:286:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L286) *style:* **Lines should not be more than 100 characters.**
```r
  allChecks <- list(simAssigns = simAssigns, simGets = simGets, returnsSim = returnsSim, assignToSim = assignToSim, fg = fg)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/code-checking.R:319:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L319) *style:* **Lines should not be more than 100 characters.**
```r
    allChecks[anyCantCodeCheck] <- lapply(names(cantCodeCheck[anyCantCodeCheck]), function(objName) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/code-checking.R:368:51:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L368) *style:* **Commas should always have a space after.**
```r
                                              " ",verb," declared in outputObjects, ",
                                                  ^
```
[R/code-checking.R:368:56:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L368) *style:* **Commas should always have a space after.**
```r
                                              " ",verb," declared in outputObjects, ",
                                                       ^
```
[R/code-checking.R:384:20:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L384) *style:* **Commas should always have a space after.**
```r
               " ",verb," declared in inputObjects, ",
                   ^
```
[R/code-checking.R:384:25:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L384) *style:* **Commas should always have a space after.**
```r
               " ",verb," declared in inputObjects, ",
                        ^
```
[R/code-checking.R:395:90:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L395) *style:* **Commas should always have a space after.**
```r
                                       paste0(paste(missingFrmMod, collapse = ", "), " ",verb,
                                                                                ^
```
[R/code-checking.R:440:75:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L440) *style:* **Commas should always have a space after.**
```r
             " but only for the 'get' functions, not the 'set' function ","
                                                                          ^
```
[R/code-checking.R:454:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L454) *style:* **Lines should not be more than 100 characters.**
```r
    missingInMetadata <- simAssignsNotInDotInputObjects[!(simAssignsNotInDotInputObjects %in% outputObjNames)]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/code-checking.R:463:24:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L463) *style:* **Commas should always have a space after.**
```r
                   " ",verbs[[fn]]," assigned to sim inside ",
                       ^
```
[R/code-checking.R:463:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L463) *style:* **Commas should always have a space after.**
```r
                   " ",verbs[[fn]]," assigned to sim inside ",
                                   ^
```
[R/code-checking.R:464:33:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L464) *style:* **Commas should always have a space after.**
```r
                   fn, ", but ",verbs[[fn]]," not declared in outputObjects")
                                ^
```
[R/code-checking.R:464:45:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L464) *style:* **Commas should always have a space after.**
```r
                   fn, ", but ",verbs[[fn]]," not declared in outputObjects")
                                            ^
```
[R/code-checking.R:471:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L471) *style:* **Lines should not be more than 100 characters.**
```r
    missingInMetadata <- simAssignsInDotInputObjects[!(simAssignsInDotInputObjects %in% inputObjNames)]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/code-checking.R:480:24:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L480) *style:* **Commas should always have a space after.**
```r
                   " ",verbs[[fn]]," assigned to sim inside ",
                       ^
```
[R/code-checking.R:480:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L480) *style:* **Commas should always have a space after.**
```r
                   " ",verbs[[fn]]," assigned to sim inside ",
                                   ^
```
[R/code-checking.R:481:33:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L481) *style:* **Commas should always have a space after.**
```r
                   fn, ", but ",verbs[[fn]]," not declared in inputObjects")
                                ^
```
[R/code-checking.R:481:45:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L481) *style:* **Commas should always have a space after.**
```r
                   fn, ", but ",verbs[[fn]]," not declared in inputObjects")
                                            ^
```
[R/code-checking.R:503:24:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L503) *style:* **Commas should always have a space after.**
```r
                   " ",verbs[[fn]]," used from sim inside ",
                       ^
```
[R/code-checking.R:503:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L503) *style:* **Commas should always have a space after.**
```r
                   " ",verbs[[fn]]," used from sim inside ",
                                   ^
```
[R/code-checking.R:504:33:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L504) *style:* **Commas should always have a space after.**
```r
                   fn, ", but ",verbs[[fn]]," not declared in inputObjects")
                                ^
```
[R/code-checking.R:504:45:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L504) *style:* **Commas should always have a space after.**
```r
                   fn, ", but ",verbs[[fn]]," not declared in inputObjects")
                                            ^
```
[R/code-checking.R:516:13:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L516) *style:* **Commas should always have a space after.**
```r
        " ",verb," used from sim inside ",
            ^
```
[R/code-checking.R:516:18:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L516) *style:* **Commas should always have a space after.**
```r
        " ",verb," used from sim inside ",
                 ^
```
[R/code-checking.R:518:18:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L518) *style:* **Commas should always have a space after.**
```r
        ", but ",verb," not declared in inputObjects"
                 ^
```
[R/code-checking.R:518:23:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L518) *style:* **Commas should always have a space after.**
```r
        ", but ",verb," not declared in inputObjects"
                      ^
```
[R/code-checking.R:661:6:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L661) *style:* **Commented code should be removed.**
```r
    #unique(pd[outerWh, "line1"])
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/code-checking.R:665:34:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L665) *style:* **Commas should always have a space after.**
```r
      whInner <- any((pd[outerWh,"line1"] < lwf) & (pd[outerWh,"line2"] > lwf) )
                                 ^
```
[R/code-checking.R:665:64:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L665) *style:* **Commas should always have a space after.**
```r
      whInner <- any((pd[outerWh,"line1"] < lwf) & (pd[outerWh,"line2"] > lwf) )
                                                               ^
```
[R/code-checking.R:665:79:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/code-checking.R#L665) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
      whInner <- any((pd[outerWh,"line1"] < lwf) & (pd[outerWh,"line2"] > lwf) )
                                                                              ^
```
[R/copy.R:37:13:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/copy.R#L37) *style:* **Variable or function name should be lowerCamelCase.**
```r
            sim_ <- object
            ^~~~
```
[R/downloadData.R:54:96:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L54) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    io <- .parseModulePartial(sim, modules = list(module), defineModuleElement = "inputObjects" )
                                                                                ^
```
[R/downloadData.R:242:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L242) *style:* **Commented code should be removed.**
```r
    # parsedModule <- parse(file = file.path(path, module, paste0(module, '.R')))
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/downloadData.R:243:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L243) *style:* **Commented code should be removed.**
```r
    # urls <- .getSourceURL(pattern = fileToDownload, x = parsedModule)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/downloadData.R:250:8:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L250) *style:* **Commented code should be removed.**
```r
      #urls <- moduleMetadata(module, path)$inputObjects$sourceURL
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/downloadData.R:275:27:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L275) *style:* **Commas should always have a space after.**
```r
    chksums2 <- chksums[0,]
                          ^
```
[R/downloadData.R:276:6:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L276) *style:* **Commented code should be removed.**
```r
    #children <- moduleMetadata(module, path)$childModules
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/downloadData.R:279:13:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L279) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( all( nzchar(children) & !is.na(children) ) ) {
            ^
```
[R/downloadData.R:279:18:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L279) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( all( nzchar(children) & !is.na(children) ) ) {
                 ^
```
[R/downloadData.R:279:54:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L279) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( all( nzchar(children) & !is.na(children) ) ) {
                                                     ^
```
[R/downloadData.R:279:56:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/downloadData.R#L279) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( all( nzchar(children) & !is.na(children) ) ) {
                                                       ^
```
[R/experiment.R:200:6:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/experiment.R#L200) *style:* **Commented code should be removed.**
```r
    #sim <- Copy(sim, objects = FALSE, queues = TRUE)
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/experiment.R:215:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/experiment.R#L215) *style:* **Commented code should be removed.**
```r
    # cl <- tryCatch(getCluster(), error = function(x) NULL)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/experiment.R:216:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/experiment.R#L216) *style:* **Commented code should be removed.**
```r
    # on.exit(if (!is.null(cl)) returnCluster(), add = TRUE)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/experiment.R:218:6:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/experiment.R#L218) *style:* **Commented code should be removed.**
```r
    #if (length(modules) == 0) modules <- list(modules(sim)[-(1:4)])
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/experiment.R:222:11:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/experiment.R#L222) *style:* **Commented code should be removed.**
```r
        # unlist(params[paramsTmp], recursive = FALSE)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/experiment.R:314:58:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/experiment.R#L314) *style:* **Commented code should be removed.**
```r
            params(sim_)[[mod[x]]][[param[[x]]]] <- val #factorialExp[ind,x]
                                                         ^~~~~~~~~~~~~~~~~~~
```
[R/helpers.R:232:74:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/helpers.R#L232) *style:* **Place a space before left parenthesis, except in a function call.**
```r
                             paste0("package:", .pkgEnv$corePackagesVec[-(1:2)]))
                                                                         ^
```
[R/helpers.R:262:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/helpers.R#L262) *style:* **Variable or function name should be lowerCamelCase.**
```r
all.equal.simList <- function(target, current, ...) {
^~~~~~~~~~~~~~~~~
```
[R/load.R:198:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/load.R#L198) *style:* **Lines should not be more than 100 characters.**
```r
                names(argument) <- c(nam, names(formals(getFromNamespace(loadFun[y], loadPackage[y])))[1])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/misc-methods.R:465:55:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/misc-methods.R#L465) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
          (inherits(get(w, envir = envir), "integer")) ) {
                                                      ^
```
[R/module-define.R:744:63:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-define.R#L744) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
      exts <- na.omit(match(file_ext(fl), .fileExts[, "exts"]) )
                                                              ^
```
[R/module-dependencies-class.R:53:13:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-class.R#L53) *style:* **Variable or function name should be lowerCamelCase.**
```r
            out.df <- data.frame(
            ^~~~~~
```
[R/module-dependencies-class.R:171:9:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-class.R#L171) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if ( !all(colnames(._outputObjectsDF()) %in% colnames(object@outputObjects)) ) {
        ^
```
[R/module-dependencies-class.R:171:81:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-class.R#L171) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if ( !all(colnames(._outputObjectsDF()) %in% colnames(object@outputObjects)) ) {
                                                                                ^
```
[R/module-dependencies-methods.R:43:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L43) *style:* **Variable or function name should be lowerCamelCase.**
```r
    DT <- .depsEdgeListMem(deps, plot)
    ^~
```
[R/module-dependencies-methods.R:56:3:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L56) *style:* **Variable or function name should be lowerCamelCase.**
```r
  sim.in <- sim.out <- data.table(objectName = character(0),
  ^~~~~~
```
[R/module-dependencies-methods.R:56:13:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L56) *style:* **Variable or function name should be lowerCamelCase.**
```r
  sim.in <- sim.out <- data.table(objectName = character(0),
            ^~~~~~~
```
[R/module-dependencies-methods.R:61:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L61) *style:* **Variable or function name should be lowerCamelCase.**
```r
      z.in <- as.data.table(x@inputObjects)[, .(objectName, objectClass)]
      ^~~~
```
[R/module-dependencies-methods.R:62:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L62) *style:* **Variable or function name should be lowerCamelCase.**
```r
      z.out <- as.data.table(x@outputObjects)[, .(objectName, objectClass)]
      ^~~~~
```
[R/module-dependencies-methods.R:65:9:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L65) *style:* **Variable or function name should be lowerCamelCase.**
```r
        sim.in <<- rbindlist(list(sim.in, z.in), use.names = TRUE)
        ^~~~~~
```
[R/module-dependencies-methods.R:68:9:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L68) *style:* **Variable or function name should be lowerCamelCase.**
```r
        sim.out <<- rbindlist(list(sim.out, z.out), use.names = TRUE)
        ^~~~~~~
```
[R/module-dependencies-methods.R:80:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L80) *style:* **Variable or function name should be lowerCamelCase.**
```r
    DT <- dx[, list(from = module, to = i.module,
    ^~
```
[R/module-dependencies-methods.R:83:15:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L83) *style:* **Variable or function name should be lowerCamelCase.**
```r
    if (plot) DT <- DT[!duplicated(DT[, 1:2, with = FALSE]), ]
              ^~
```
[R/module-dependencies-methods.R:85:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L85) *style:* **Variable or function name should be lowerCamelCase.**
```r
    DT <- data.table(from = character(0), to = character(0),
    ^~
```
[R/module-dependencies-methods.R:164:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L164) *style:* **Variable or function name should be lowerCamelCase.**
```r
    M <- distances(simGraph, mode = "out")
    ^
```
[R/module-dependencies-methods.R:196:39:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L196) *style:* **`%>%` should always have a space before it and a new line after it, unless the full pipeline fits on one line.**
```r
      missingObjects <- simEdgeList %>% filter(from != to) %>%
                                    ~~^
```
[R/module-dependencies-methods.R:210:26:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L210) *style:* **`%>%` should always have a space before it and a new line after it, unless the full pipeline fits on one line.**
```r
    return(newEdgeList %>% data.table() %>% setorder("from", "to", "objName"))
                       ~~^
```
[R/module-dependencies-methods.R:246:79:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-dependencies-methods.R#L246) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
              loadOrder <- names(simGraph[[tsort, ]]) %>% .[!(. %in% "_INPUT_" )]
                                                                              ^
```
[R/module-repository.R:28:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-repository.R#L28) *style:* **Lines should not be more than 100 characters.**
```r
#'          (\url{http://spades-core.predictiveecology.org/articles/ii-modules.html#module-directory-structure-modulename}),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/module-repository.R:52:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-repository.R#L52) *style:* **Lines should not be more than 100 characters.**
```r
    zipFiles <- grep(file.path(name, "data"), zipFiles, invert = TRUE, value = TRUE) # remove any zip in data folder
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/module-repository.R:293:8:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-repository.R#L293) *style:* **Commented code should be removed.**
```r
      #versionWarning(name, version)
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/module-repository.R:305:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-repository.R#L305) *style:* **Lines should not be more than 100 characters.**
```r
        GET(zip, ua, config = list(config(token = pat)), write_disk(localzip, overwrite = overwrite))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/module-repository.R:401:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-repository.R#L401) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/module-repository.R:402:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/module-repository.R#L402) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/moduleMetadata.R:75:6:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/moduleMetadata.R#L75) *style:* **Commented code should be removed.**
```r
    #metadata <- eval(parse(text = x)) # can't be used because can't evaluate start(sim)
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-diagrams.R:78:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L78) *style:* **Variable or function name should be lowerCamelCase.**
```r
    DT <- tail(completed(sim), n)
    ^~
```
[R/plotting-diagrams.R:173:28:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L173) *style:* **`%>%` should always have a space before it and a new line after it, unless the full pipeline fits on one line.**
```r
        sapply(ll, NROW) %>% sum() %>% `*`(., 26L)
                         ~~^
```
[R/plotting-diagrams.R:325:7:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L325) *style:* **Variable or function name should be lowerCamelCase.**
```r
      PlotRemovingDots <- function(modDia, plotFn, axes, ...,
      ^~~~~~~~~~~~~~~~
```
[R/plotting-diagrams.R:326:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L326) *style:* **Variable or function name should be lowerCamelCase.**
```r
                                   vertex.color,
                                   ^~~~~~~~~~~~
```
[R/plotting-diagrams.R:327:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L327) *style:* **Variable or function name should be lowerCamelCase.**
```r
                                   vertex.size,
                                   ^~~~~~~~~~~
```
[R/plotting-diagrams.R:328:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L328) *style:* **Variable or function name should be lowerCamelCase.**
```r
                                   vertex.size2,
                                   ^~~~~~~~~~~~
```
[R/plotting-diagrams.R:329:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L329) *style:* **Variable or function name should be lowerCamelCase.**
```r
                                   vertex.shape,
                                   ^~~~~~~~~~~~
```
[R/plotting-diagrams.R:330:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L330) *style:* **Variable or function name should be lowerCamelCase.**
```r
                                   vertex.label.cex,
                                   ^~~~~~~~~~~~~~~~
```
[R/plotting-diagrams.R:331:36:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L331) *style:* **Variable or function name should be lowerCamelCase.**
```r
                                   vertex.label.family,
                                   ^~~~~~~~~~~~~~~~~~~
```
[R/plotting-diagrams.R:345:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L345) *style:* **Lines should not be more than 100 characters.**
```r
          c(nchar(namesModDia)^0.8 * 10) # use exponential to stretch out, and multiplication to make all bigger
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-diagrams.R:443:22:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting-diagrams.R#L443) *style:* **Only use double-quotes.**
```r
    if ((Sys.info()[['sysname']] == "Darwin") && (Sys.which("glpsol") == "")) {
                     ^~~~~~~~~
```
[R/plotting.R:6:31:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L6) *style:* **Variable or function name should be lowerCamelCase.**
```r
                              na.color, zero.color, length){
                              ^~~~~~~~
```
[R/plotting.R:6:41:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L6) *style:* **Variable or function name should be lowerCamelCase.**
```r
                              na.color, zero.color, length){
                                        ^~~~~~~~~~
```
[R/plotting.R:37:25:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L37) *style:* **Variable or function name should be lowerCamelCase.**
```r
                        na.color, zero.color, length) {
                        ^~~~~~~~
```
[R/plotting.R:37:35:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L37) *style:* **Variable or function name should be lowerCamelCase.**
```r
                        na.color, zero.color, length) {
                                  ^~~~~~~~~~
```
[R/plotting.R:86:22:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L86) *style:* **Put spaces around all infix operators.**
```r
      eval(parse(text=deparse(elems[[useElem]])), envir=tmp@.envir),
                    ~^~
```
[R/plotting.R:86:56:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L86) *style:* **Put spaces around all infix operators.**
```r
      eval(parse(text=deparse(elems[[useElem]])), envir=tmp@.envir),
                                                      ~^~
```
[R/plotting.R:87:12:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L87) *style:* **Put spaces around all infix operators.**
```r
      error=function(x) eval(parse(text=deparse(elems[[useElem]])), envir=envir))
          ~^~
```
[R/plotting.R:87:40:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L87) *style:* **Put spaces around all infix operators.**
```r
      error=function(x) eval(parse(text=deparse(elems[[useElem]])), envir=envir))
                                      ~^~
```
[R/plotting.R:87:74:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/plotting.R#L87) *style:* **Put spaces around all infix operators.**
```r
      error=function(x) eval(parse(text=deparse(elems[[useElem]])), envir=envir))
                                                                        ~^~
```
[R/POM.R:131:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L131) *style:* **Lines should not be more than 100 characters.**
```r
#' @param objFnCompare Character string. Either, "MAD" or "RMSE" indicating that inside the objective
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/POM.R:190:12:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L190) *style:* **Variable or function name should be lowerCamelCase.**
```r
           NaNRetries = NA, logObjFnVals = FALSE, weights, useLog = FALSE) {
           ^~~~~~~~~~
```
[R/POM.R:200:25:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L200) *style:* **Variable or function name should be lowerCamelCase.**
```r
                        NaNRetries, logObjFnVals, weights, useLog) {
                        ^~~~~~~~~~
```
[R/POM.R:217:28:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L217) *style:* **Variable or function name should be lowerCamelCase.**
```r
    if (is.na(NaNRetries)) NaNRetries <- 1
                           ^~~~~~~~~~
```
[R/POM.R:241:11:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L241) *style:* **Variable or function name should be lowerCamelCase.**
```r
          sim_ <- Copy(sim)
          ^~~~
```
[R/POM.R:259:11:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L259) *style:* **Variable or function name should be lowerCamelCase.**
```r
          POMFrameNum <- .grepSysCalls(sys.calls(), pattern = "POM")
          ^~~~~~~~~~~
```
[R/POM.R:260:13:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L260) *style:* **Commented code should be removed.**
```r
          # scallsFirstElement <- lapply(sys.calls(), function(x) x[1])
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/POM.R:261:13:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L261) *style:* **Commented code should be removed.**
```r
          # POMFrameNum <- grep(scallsFirstElement, pattern = "POM")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/POM.R:263:53:](https://github.com/PredictiveEcology/SpaDES.core/blob/da205c48fbe484fe792793d8af2ccc4ab4b62a3d/R/POM.R#L263) *style:* **Put spaces around all infix operators.**
```r
          envPOMCalled <- sys.frame(min(POMFrameNum)-1)
                                                   ~^~
```


i can't use port forwarding, bad of my router, so i usually use ngrok, but when i put ngrok ip on Zirikatu, it closes with an invalid ip error, how i can do it in wan?


판매기X 판매하기O


`gte` and `lte` should be switched here


I think we shouldn't rely on VCS branches (i.e. still want to be able to do the full suite of development tasks without having git installed); we only want to think about them to the extent necessary to minimize merge conflicts.


zsiki> chmod 666 geo_easy.log

Unacceptable. Completely violates the concept of OS Linux.

Maybe there is such a value of ENV in MS Windows, which, when substituted into the if{}, will solve this problem? And for the Linux log will be in $HOME?


What is that ?
There is no file `http://ostap34js.github.io:35729/livereload.js/`.
Port `35729` is not allowed in github.com.


160251551_Issue#5997 (Nigusse) - x86_64-Linux-Ubuntu-14.04-cppcheck-1.61: OK (0 of 0 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.png)


@JoepBC try the defs file I just uploaded please


Agreed. HTTP 2 Should be supported.


Should this be MonitorPullTime?


Getting this error while setting development environment for bigbluebutton-web -
No such property: ROLE_ATTENDEE for class: org.bigbluebutton.web.controllers.ApiController. Stacktrace follows:
groovy.lang.MissingPropertyException: No such property: ROLE_ATTENDEE for class: org.bigbluebutton.web.controllers.ApiController
        at org.bigbluebutton.web.controllers.ApiController$_closure4.doCall(ApiController.groovy:522)
        at java.util.concurrent.ThreadPoolExecutor.runWorker(ThreadPoolExecutor.java:1149)
        at java.util.concurrent.ThreadPoolExecutor$Worker.run(ThreadPoolExecutor.java:624)
        at java.lang.Thread.run(Thread.java:748)

I believe replacing the ROLE_ATTENDEE with Meeting.ROLE_ATTENDEE could fix the problem


same here, on clearlinux you should point to `/run`

Does this start a daemon? Why isn't this a unit file started with `systemctl`?


I don't believe there's is a perfect solution to this. Once we're done with this refactor there shouldn't be a reason to make changes. If, in the future, a change is required then we can implement that change in a controlled way, e.g.,
copy the changes from a diff and paste into existing settings.local.php file. A move, as you imply (which will overwrite the file), isn't necessary.


Created multidev environment [rad-new#pr-39](https://dashboard.pantheon.io/sites/a0f7976a-d5a5-49c8-b64a-9c7ca3ce2c18#pr-39).

[![Visit Site](https://raw.githubusercontent.com/pantheon-systems/ci-drops-8/0.1.0/data/img/visit-site-36.png)](https://pr-39-rad-new.pantheonsite.io/)


yup that's how I was thinking about implementing the communication between RA/reicast to provide fastforward state.   I was under the impression that libretro changes are the "requires act of congress" type changes, though, so wasn't sure if that was a viable solution.


verify now!


lk


This only checks for callable, not async callable. Using the stricter `inspect.iscoroutinefunction()` resulted in an `ImportError`. Is this sufficient or would you suggest some other stricter check?


It is set in the setCanonicalHost() function. I will update the comment/code to better reflect this.


Validar que la nueva contraseña sea diferente a la actual(anterior)


Given that in OpenStack the cloudbridge gateway is just an external network, it maps to the 'public' network and we can't change the label on that...


fixes #1


Индентацию нужно поправить тут


I disagree. Splitting this block out into a separate file is extraneous. See my comment above re: updates to the code.


I have tried all the above methods regarding the name field. However, the issue still persists. Blank name pets are getting stored. Is there any other thing we can try?


Yep, I missed this. Done.


renamed class


Regarding @RetroSven comments above, I tend to agree that libretro is hard to integrate with cores using multi-threading, which is the case when emulating recent platforms I believe.

The fast forwarding status (and probably also fast motion rate and relevant parameters) should really be available to the core. It's way too hard to figure it out based on the frequency and timing of retro_run() calls.

Also, having multiple threads communicating with semaphores makes pausing and shutting down tricky to avoid deadlocks.
So it looks like the libretro API could be improved to support these use cases more easily.


code reworked


`let re = new RegExp('stats.*/hits');` does not throw. Escaping `/` is required only for literal regex.


Added classes


А зачем тебе номер поезда, если ты уже нашел сам поезд?


Not sure what you're trying to say here. Can you restate your comment?


Работай с объектами, а не со строками. current_station  подразумевает, что у тебя там будет объект станции, а не его название


Zaboravila sam da napomenem da node_modules folder treba da ide u `.gitignore`, da ne bi bilo `Showing 5,738 changed files with 325,845 additions and 0 deletions.`


Right. Are you saying we should remove it?


I'll try to I remember to do this with the next bump I'm planning to do in a few days.


Ok, thanks for this info. It's very helpful.


@sbatten which label has raw HTML?


Added the menu


Вот тут опять не нужные аргументы. Поезд знает свою текущую станцию. Если ты закинешь сюда только поезд аргументом, то
```
  def look_stations_train(train)
    puts "Текущая станция для поезда #{train.number} #{train.current_station.name} "
  end
```
То есть опять же, если мы работаем с объектами, то мы можем использовать все их публичные методы


<foaf:age>23</foaf:age>
<foaf:based_near>Arbutus</foaf:based_near>


Yes, this was fixed in a followup


и метод лучше назвать show_trains_current_station


Created multidev environment [rad-new#ci-80](https://dashboard.pantheon.io/sites/a0f7976a-d5a5-49c8-b64a-9c7ca3ce2c18#ci-80).

[![Visit Site](https://raw.githubusercontent.com/pantheon-systems/ci-drops-8/0.1.0/data/img/visit-site-36.png)](https://ci-80-rad-new.pantheonsite.io/)


`stringsAsFactors` ruins everything…


I posted an RFC to make the hash extension permanent in PHP which cannot be disabled:
https://wiki.php.net/rfc/permanent_hash_ext

If it passes, I suppose this commit could be re-applied


Ssd


Could be confusing to commit this patch, but we'll be on the lookout for it next week when we finally get to merge to master.


Please, add override for Intel(R) Core i5 M 460


We have done with other tutorials also (`spark`, for example). The logic is to give end user the notion that files in `/usr` are templates and by copying them to `/etc` they have safe-to-edit files.
The control plane could be started without copying the files to `/etc`, but then users may wrongly edit stateless files when customizing their deployment.


This commit establishes the `data` object in the `App.vue` file, which returns two properties: a `quotes` array containing a sample quote string, and a `maxQuotes` property that will be used to determine the maximum number of quotes which can be entered by the user. Also, two component files are added in a `components` directory: `Quote.vue` for individual quote functionality, and `QuoteGrid.vue` for displaying the entire quote collection.


`--------------------------------------------------------------------------
 ----------------        Basic Setting       ------------------------------
 --------------------------------------------------------------------------

 ---- key bind ----

 local ump9_key = nil
 local akm_key = nil
 local m16a4_key = nil
 local m416_key = nil
 local scarl_key = nil
 local uzi_key = nil
 local qbz_key = nil
 local set_off_key = 5

 ---- keyboard ---- Only Support logitech G Keyboard

 local ump9_gkey = 5  ---1 is use F1.
 local akm_gkey = 4
 local m16a4_gkey = 6
 local m416_gkey = 1
 local scarl_gkey = 2
 local uzi_gkey = 7
 local qbz_gkey = 3
 local set_off_gkey = nil

 ---- control_key ----

 local control_key = "lctrl"

 ---- can use "lalt", "ralt", "alt"  "lshift", "rshift", "shift"  "lctrl", "rctrl", "ctrl"

 local ignore_key = "lalt" --- ignore key
 local hold_breath_key = "lshift"

 --- fastloot setting---
 --- Press controlkey and and ignore_key and click Left mouse button ---
 --- "lctrl" + "lalt" + mousebutton

 local control_key = "lctrl"
 local fastloot = false ---if you don't need it, you can close it by true to false.
 local move = 40 ----1920*1080

 ---- only can use "numlock", "capslock", "scrolllock"

 local full_mode_key = "numlock"   ---numlock lamp on,recoil is full_mode."numlock"
 local mode_switch_key = "capslock"
 local lighton_key = "scrolllock"  ---start script,scrolllock lamp will be on.close script ,scrolllock lamp will be off.

 --- Your Sensitivity in Game

 local vertical_sensitivity = 0.7 --- default is 0.7
 local target_sensitivity = 29 --- default is 50.0
 local scope_sensitivity = 29 --- default is 50.0
 local scope4x_sensitivity = 35 --- default is 50.0

 -- you can close these by true to false

 local hold_breath_mode = true
 local full_mode = true

 ---- Obfs setting
 -- local obfs_mode = false
 local obfs_mode = false
 local interval_ratio = 0.75
 local random_seed = 1

 local auto_reloading = false

 -- if auto_mode = true ,the guns need to switch automatic shooting mode,except m16 single.

 local auto_mode = true
 --------------------------------------------------------------------------
 ----------------        Recoil Table        ------------------------------
 ---------------- You can fix the value here ------------------------------
 --------------------------------------------------------------------------
 --- recoil times
 --- if the Recoil compensation is Large or small,You can modify the value of all_recoil_Times or recoil_table{times}
 local all_recoil_times = 1

 local recoil_table = {}

 recoil_table["akm"] = {
     basic={60.3,40.2,47.5,51.0,54.5, 64.0,67.5,69.0,70.5,71.9, 71.5,73.6,79.3,79.3,81.6 ,70},
     basictimes = 1,
     full={61.3,41.2,47.5,51.0,54.5, 64.0,67.5,69.0,70.5,71.9, 71.5,73.6,79.3,79.3,81.6 ,80},
     fulltimes = 1*0.75,
     quadruple={61.3,41.2,47.5,51.0,54.5, 64.0,67.5,69.0,70.5,71.9, 71.5,73.6,79.3,79.3,81.6 ,80},
     quadrupletimes = 4*1,
     fullof4x={61.3,41.2,47.5,51.0,54.5, 64.0,67.5,69.0,70.5,71.9, 71.5,73.6,79.3,79.3,81.6 ,80},
     fullof4xtimes = 4*1*0.75,
     speed = 100,
     maxbullets = 40,
     holdbreathtimes = 1.25,
     fullholdbreathtimes = 1.25,
 }

 recoil_table["m416"] = {
     basic={52.0,39.5,41.0,43.0,48.0, 50.0,53.2,54.2,54.5,52.5, 55.5,54.8,58.6,58.6,59.5, 70.3},
     basictimes = 1,
     full={52.0,39.5,41.0,43.0,48.0, 50.0,53.2,53.2,53.5,51.5, 51.5,54.8,58.6,58.6,59.5, 60.3},
     fulltimes = 1*0.75,
     quadruple={52.0,39.5,41.0,43.0,48.0, 50.0,53.2,53.2,53.5,51.5, 51.5,54.8,58.6,58.6,59.5, 60.3},
     quadrupletimes = 4*1*0.9,
     fullof4x={52.0,39.5,41.0,43.0,48.0, 50.0,53.2,53.2,53.5,51.5, 51.5,54.8,58.6,58.6,59.5, 60.3},
     fullof4xtimes = 4*1*0.75,
     speed = 90,
     maxbullets = 40,
     holdbreathtimes = 1.25,
     fullholdbreathtimes = 1.25,
 }

 recoil_table["scarl"] = {
     basic={56.0,26.0,32.0,40.0,45.1, 48.9,51.0,54.2,59.8,60.4, 60.9,60.9,58.9,56.9,59.8, 60.5},
     basictimes = 1,
     full={56.0,26.0,32.0,40.0,45.1, 48.9,51.0,54.2,59.8,60.4, 60.9,60.9,58.9,56.9,59.8, 60.5},
     fulltimes = 1*0.75,
     quadruple={56.0,26.0,32.0,40.0,45.1, 48.9,51.0,54.2,59.8,60.4, 60.9,60.9,58.9,56.9,59.8, 60.5},
     quadrupletimes = 4*1,
     fullof4x={56.0,26.0,32.0,40.0,45.1, 48.9,51.0,54.2,59.8,60.4, 60.9,60.9,58.9,56.9,59.8, 60.5},
     fullof4xtimes = 4*1*0.75,
     speed = 100,
     maxbullets = 40,
     holdbreathtimes = 1.25,
     fullholdbreathtimes = 1.25,
 }

 recoil_table["qbz"] = {
     basic={52.0,25.0,28.7,38.2,42.4, 44.0,46.0,46.0,45.6,45.1, 48.0,51.3,52.0,54.0,56.0, 59},
     basictimes = 1.05,
     full={51.2,24.5,28.7,38.2,42.4, 43.3,45.2,45.2,45.6,45.1, 48.0,50.3,51.0,53.0,55.0},
     fulltimes = 1*0.75,
     quadruple={51.2,24.5,28.7,38.2,42.4, 43.3,45.2,45.2,45.6,45.1, 48.0,50.3,51.0,53.0,55.0},
     quadrupletimes = 4*1,
     fullof4x={51.2,24.5,28.7,38.2,42.4, 43.3,45.2,45.2,45.6,45.1, 48.0,50.3,51.0,53.0,55.0},
     fullof4xtimes = 4*1*0.75,
     speed = 90,
     maxbullets = 40,
     holdbreathtimes = 1.25,
     fullholdbreathtimes = 1.25,
 }

 recoil_table["ump9"] = {
     basic={33.5,19.2,30.5,35.7,39.3, 39.0,38.7,40.2,41.8,44.0, 43.8,43.8,46.5,44.5,47.5},
     basictimes = 1.05,
     full={33.5,19.2,30.5,35.7,39.3, 39.0,38.7,40.2,41.8,44.0, 43.8,43.8,46.5,44.5,47.5},
     fulltimes = 0.75*0.9,
     quadruple={33.5,19.2,30.5,35.7,39.3, 39.0,38.7,40.2,41.8,44.0, 43.8,43.8,46.5,44.5,47.5},
     quadrupletimes = 4*1*0.97,
     fullof4x={33.5,19.2,30.5,35.7,39.3, 39.0,38.7,40.2,41.8,44.0, 43.8,43.8,46.5,44.5,47.5},
     fullof4xtimes = 4*0.75,
     speed = 90,
     maxbullets = 40,
     holdbreathtimes = 1.25,
     fullholdbreathtimes = 1.25,
 }

 recoil_table["uzi"] = {
     basic={16.0,16.0,16.0,17.6,18.6, 20.4,22.4,22.9,25.8,27.6, 32.6,36.9,38.0,38.8,39.8,40.5},
     basictimes = 1.15,
     full={16.0,16.0,16.0,17.6,18.6, 20.4,22.4,22.9,25.8,27.6, 32.6,36.9,38.0,38.8,39.8,40.5},
     fulltimes = 1.15*0.75*0.75,
     quadruple={16.0,16.0,16.0,17.6,18.6, 20.4,22.4,22.9,25.8,27.6, 32.6,36.9,38.0,38.8,39.8,40.5},
     quadrupletimes = 1.15,
     fullof4x={16.0,16.0,16.0,17.6,18.6, 20.4,22.4,22.9,25.8,27.6, 32.6,36.9,38.0,38.8,39.8,40.5},
     fullof4xtimes = 1.15*0.75*0.75,
     speed = 48,
     maxbullets = 35,
     holdbreathtimes = 1.25,
     fullholdbreathtimes = 1.25,
 }

 recoil_table["m16a4"] = {
     basic={42.3,31.2,32.4,42.3,50.4, 54.1,62.1,60,62.5,65.5, 63,62.1,64.4,64.4,65.25,63.9},
     basictimes = 1.23,
     full={42.3,31.2,32.4,42.3,50.4,54.1,62.1,60,62.5,65.5,63,62.1,64.4,64.4,65.25,63.9},
     fulltimes = 1.23*0.77,
     quadruple={42.3,31.2,32.4,42.3,50.4,54.1,62.1,60,62.5,65.5,63,62.1,64.4,64.4,65.25,63.9},
     quadrupletimes = 1.23*4,
     fullof4x={42.3,31.2,32.4,42.3,50.4,54.1,62.1,60,62.5,65.5,63,62.1,64.4,64.4,65.25,63.9},
     fullof4xtimes = 4*1.23*0.75,
     speed = 80,
     maxbullets = 40,
     clickspeed = 40,
     holdbreathtimes = 1.25,
     fullholdbreathtimes = 1.25,
 }

 recoil_table["none"] = {
     basic={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},
     basictimes = 1,
     full={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},
     fulltimes = 1,
     quadruple={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},
     quadrupletimes = 1,
     fullof4x={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},
     fullof4xtimes = 1,
     speed = 30,
     maxbullets = 40,
     clickspeed = 40,
     holdbreathtimes = 1.25,
     fullholdbreathtimes = 1.25,
 }

 --------------------------------------------------------------------------
 ----------------          Function          ------------------------------
 --------------------------------------------------------------------------

 function convert_sens(unconvertedSens)
     return 0.002 * math.pow(10, unconvertedSens / 50)
 end

 function calc_sens_scale(sensitivity)
     return convert_sens(sensitivity)/convert_sens(50)
 end

 local target_scale = calc_sens_scale(target_sensitivity)
 local scope_scale = calc_sens_scale(scope_sensitivity)
 local scope4x_scale = calc_sens_scale(scope4x_sensitivity)

 function recoil_mode()
     if not IsKeyLockOn(mode_switch_key) then
         if IsKeyLockOn(full_mode_key) and full_mode then
 	       return "full";
 	else
 	       return "basic";
         end
     end

     if IsKeyLockOn(mode_switch_key) then
         if IsKeyLockOn(full_mode_key) and full_mode then
 	       return "fullof4x"
 	else
 	       return "quadruple"
         end
     end
 end

 function single_value(value)
     return 10 * math.floor(( value / 10 ) + 0.9)
     end

 function recoil_value(_weapon,_duration)
     local _mode = recoil_mode()
     local step = (math.floor(_duration/recoil_table[_weapon]["speed"])) + 1
     if step > #recoil_table[_weapon][_mode] then
         step = #recoil_table[_weapon][_mode]
     end

     local weapon_recoil = recoil_table[_weapon][_mode][step]
     local weapon_speed = recoil_table[_weapon]["speed"]
     local weapon_clickspeed = recoil_table[_weapon]["clickspeed"]
     local weapon_maxbullets = recoil_table[_weapon]["maxbullets"]
     local weapon_basictimes = recoil_table[_weapon]["basictimes"]
     local weapon_fulltimes = recoil_table[_weapon]["fulltimes"]
     local weapon_quadrupletimes = recoil_table[_weapon]["quadrupletimes"]
     local weapon_fullof4xtimes = recoil_table[_weapon]["fullof4xtimes"]
     local weapon_holdbreathtimes = recoil_table[_weapon]["holdbreathtimes"]
     local weapon_fullofholdbreathtimes = recoil_table[_weapon]["fullholdbreathtimes"]
     local weapon_intervals = weapon_speed
     local weapon_clicktime = weapon_clickspeed
     local weapon_bullets = weapon_maxbullets

     if obfs_mode then
         local coefficient = interval_ratio * ( 1 + random_seed * math.random())
         weapon_intervals = math.floor(coefficient  * weapon_speed)
     end
     -- OutputLogMessage("weapon_intervals = %s\n", weapon_intervals)

     recoil_recovery = weapon_recoil
     recoil_times = all_recoil_times * 0.7 / vertical_sensitivity

     if recoil_mode() == "basic" and not IsModifierPressed(hold_breath_key) then
     recoil_recovery = recoil_recovery * recoil_times * weapon_basictimes
     end
     if recoil_mode() == "basic" and hold_breath_mode and IsModifierPressed(hold_breath_key) then
     recoil_recovery = recoil_recovery * weapon_holdbreathtimes * recoil_times * weapon_basictimes
     end

     if recoil_mode() == "full" and not IsModifierPressed(hold_breath_key) then
     recoil_recovery = recoil_recovery * recoil_times * weapon_fulltimes
     end
     if recoil_mode() == "full" and hold_breath_mode and IsModifierPressed(hold_breath_key) then
     recoil_recovery = recoil_recovery * weapon_fullofholdbreathtimes * recoil_times * weapon_fulltimes
     end

     if recoil_mode() == "quadruple" then
     recoil_recovery = recoil_recovery * recoil_times * weapon_quadrupletimes
     end

     if recoil_mode() == "fullof4x" then
     recoil_recovery = recoil_recovery * recoil_times * weapon_fullof4xtimes
     end

     -- issues/3
     if IsMouseButtonPressed(2) then
         recoil_recovery = recoil_recovery / target_scale
     elseif recoil_mode() == "basic" then
         recoil_recovery = recoil_recovery / scope_scale
     elseif recoil_mode() == "full" then
         recoil_recovery = recoil_recovery / scope_scale
     elseif recoil_mode() == "quadruple" then
         recoil_recovery = recoil_recovery / scope4x_scale
     elseif recoil_mode() == "fullof4x" then
         recoil_recovery = recoil_recovery / scope4x_scale
     end

     return weapon_intervals,recoil_recovery,weapon_clicktime,weapon_bullets
 end

 --------------------------------------------------------------------------
 ----------------          OnEvent          ------------------------------
 --------------------------------------------------------------------------

 function OnEvent(event, arg)
     OutputLogMessage("event = %s, arg = %d\n", event, arg)
     if (event == "PROFILE_ACTIVATED") then
         EnablePrimaryMouseButtonEvents(true)
         Fire = false
         current_weapon = "none"
         shoot_duration = 0.0
         if IsKeyLockOn(lighton_key) then
         PressAndReleaseKey(lighton_key)
         elseif IsKeyLockOn(full_mode_key) then
         PressAndReleaseKey(full_mode_key)
         elseif IsKeyLockOn(mode_switch_key) then
         PressAndReleaseKey(mode_switch_key)
         end
     elseif event == "PROFILE_DEACTIVATED" then
         ReleaseMouseButton(1)
     end

     if (event == "MOUSE_BUTTON_PRESSED" and arg == set_off_key)
     or (event == "G_PRESSED" and arg == set_off_gkey) then
         current_weapon = "none"
     elseif (event == "MOUSE_BUTTON_PRESSED" and arg == akm_key)
     or (event == "G_PRESSED" and arg == akm_gkey) then
         current_weapon = "akm"
     elseif (event == "MOUSE_BUTTON_PRESSED" and arg == m16a4_key)
     or (event == "G_PRESSED" and arg == m16a4_gkey) then
         current_weapon = "m16a4"
     elseif (event == "MOUSE_BUTTON_PRESSED" and arg == m416_key)
     or (event == "G_PRESSED" and arg == m416_gkey) then
         current_weapon = "m416"
     elseif (event == "MOUSE_BUTTON_PRESSED" and arg == ump9_key)
     or (event == "G_PRESSED" and arg == ump9_gkey) then
         current_weapon = "ump9"
     elseif (event == "MOUSE_BUTTON_PRESSED" and arg == uzi_key)
     or (event == "G_PRESSED" and arg == uzi_gkey) then
         current_weapon = "uzi"
     elseif (event == "MOUSE_BUTTON_PRESSED" and arg == scarl_key)
     or (event == "G_PRESSED" and arg == scarl_gkey) then
         current_weapon = "scarl"
     elseif (event == "MOUSE_BUTTON_PRESSED" and arg == qbz_key)
     or (event == "G_PRESSED" and arg == qbz_gkey) then
         current_weapon = "qbz"

     elseif (event == "M_RELEASED" and arg == 3 and Fire) then
         local intervals,recovery,clicktime,bullets = recoil_value(current_weapon,shoot_duration)
         if shoot_duration % (single_value(intervals) / 2) == 0 then
             PressAndReleaseMouseButton(1)
         end
         MoveMouseRelative(0, recovery / 10)
         Sleep(single_value(intervals)/10)
         shoot_duration = shoot_duration + (single_value(intervals)/10)
         if auto_reloading then
             if shoot_duration > (single_value(intervals) * bullets) + 100 then
             ReleaseMouseButton(1)
             PressAndReleaseKey("r")
             Sleep(200)
             Fire = false
             end
         end
         if not Fire then
             ReleaseMouseButton(1)
         elseif Fire then
             SetMKeyState(3)
         end

     elseif (event == "MOUSE_BUTTON_PRESSED" and arg == 1) then
         -- button 1 : Shoot
         if ((current_weapon == "none") or IsModifierPressed(ignore_key)) then
             PressMouseButton(1)
             repeat
                 Sleep(30)
             until not IsMouseButtonPressed(1)
         elseif(current_weapon == "m16a4") then
             Fire = true
             SetMKeyState(3)
         else
             if auto_mode then
             repeat
             local intervals,recovery,clicktime,bullets = recoil_value(current_weapon,shoot_duration)
             MoveMouseRelative(0, recovery /10 )
             Sleep(intervals/10)
             shoot_duration = shoot_duration + (intervals/10)
             if auto_reloading then
                if shoot_duration > (intervals * bullets) + 100 then
                ReleaseMouseButton(1)
                PressAndReleaseKey("r")
                Sleep(200)
                end
             end
             until not IsMouseButtonPressed(1)
             else
             Fire = true
             SetMKeyState(3)
             end
         end
     elseif (event == "MOUSE_BUTTON_RELEASED" and arg == 1) then
         Fire = false
         shoot_duration = 0.0
     end

     while (event == "MOUSE_BUTTON_PRESSED" and arg == 1 and IsModifierPressed(control_key) and IsModifierPressed(ignore_key) and fastloot) do
         ReleaseMouseButton(1)
         PressMouseButton(1)
         for i = 0, 14 do
         MoveMouseRelative(move, 0)
         Sleep(2)
         end
         ReleaseMouseButton(1)
         for i = 0, 14 do
         MoveMouseRelative(-move, 0)
         Sleep(2)
         end
         Sleep(10)
     end
     if (current_weapon == "none") then
         if IsKeyLockOn(lighton_key) then
         PressAndReleaseKey(lighton_key)
         end
     else
         if not IsKeyLockOn(lighton_key) then
         PressAndReleaseKey(lighton_key)
         end
     end
 end`