[inst/examples/example_experiment.R:91:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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:230:50:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L230) *style:* **Commas should always have a space after.**
```r
          cat(crayon::blue("  Using ", fromWhere," copy of", cur$moduleName, "module\n"))
                                                 ^
```
[R/cache.R:241:50:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L241) *style:* **Commas should always have a space after.**
```r
          cat(crayon::blue("  Using ", fromWhere," copy of", cur$eventType, "event in",
                                                 ^
```
[R/cache.R:288:10:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L288) *style:* **Commented code should be removed.**
```r
        #checkPath(cacheRepo, create = TRUE) #SpaDES dependency
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:324:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L324) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~
```
[R/cache.R:330:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L330) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/cache.R:342:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L342) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/cache.R:364:14:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L364) *style:* **Commented code should be removed.**
```r
            #object2@events <- unique(rbindlist(list(object@events, object2@events)))
             ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cache.R:367:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L367) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/cache.R:377:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L377) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/cache.R:381:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L381) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/cache.R:419:66:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L419) *style:* **Variable or function name should be lowerCamelCase.**
```r
  setGeneric(".addTagsToOutput", function(object, outputObjects, FUN) {
                                                                 ^~~
```
[R/cache.R:442:48:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L442) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(object, outputObjects, FUN, preDigestByClass) {
                                               ^~~
```
[R/cache.R:534:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/cache.R#L534) *style:* **Variable or function name should be lowerCamelCase.**
```r
objSize.simList <- function(x, quick = getOption("reproducible.quick", FALSE)) {
^~~~~~~~~~~~~~~
```
[R/checkpoint.R:36:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/downloadData.R#L250) *style:* **Commented code should be removed.**
```r
      #urls <- moduleMetadata(module, path)$inputObjects$sourceURL
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/downloadData.R:262:27:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/downloadData.R#L262) *style:* **Commas should always have a space after.**
```r
    chksums2 <- chksums[0,]
                          ^
```
[R/downloadData.R:263:6:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/downloadData.R#L263) *style:* **Commented code should be removed.**
```r
    #children <- moduleMetadata(module, path)$childModules
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/downloadData.R:266:13:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/downloadData.R#L266) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( all( nzchar(children) & !is.na(children) ) ) {
            ^
```
[R/downloadData.R:266:18:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/downloadData.R#L266) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( all( nzchar(children) & !is.na(children) ) ) {
                 ^
```
[R/downloadData.R:266:54:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/downloadData.R#L266) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
        if ( all( nzchar(children) & !is.na(children) ) ) {
                                                     ^
```
[R/downloadData.R:266:56:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/downloadData.R#L266) *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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/experiment.R#L314) *style:* **Commented code should be removed.**
```r
            params(sim_)[[mod[x]]][[param[[x]]]] <- val #factorialExp[ind,x]
                                                         ^~~~~~~~~~~~~~~~~~~
```
[R/helpers.R:230:74:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/helpers.R#L230) *style:* **Place a space before left parenthesis, except in a function call.**
```r
                             paste0("package:", .pkgEnv$corePackagesVec[-(1:2)]))
                                                                         ^
```
[R/load.R:198:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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:467:55:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/misc-methods.R#L467) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
          (inherits(get(w, envir = envir), "integer")) ) {
                                                      ^
```
[R/module-define.R:719:63:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/module-define.R#L719) *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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/module-dependencies-class.R#L53) *style:* **Variable or function name should be lowerCamelCase.**
```r
            out.df <- data.frame(
            ^~~~~~
```
[R/module-dependencies-class.R:172:9:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/module-dependencies-class.R#L172) *style:* **Commented code should be removed.**
```r
    #   warning("input object data.frame should use colnames sourceURL.")
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/module-dependencies-class.R:174:9:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/module-dependencies-class.R#L174) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if ( !all(colnames(.outputObjects()) %in% colnames(object@outputObjects)) ) {
        ^
```
[R/module-dependencies-class.R:174:78:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/module-dependencies-class.R#L174) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if ( !all(colnames(.outputObjects()) %in% colnames(object@outputObjects)) ) {
                                                                             ^
```
[R/module-dependencies-methods.R:43:5:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/module-repository.R#L402) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/moduleMetadata.R:72:6:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/moduleMetadata.R#L72) *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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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.R:6:31:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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/5b85e4167ba8e4e9ab5f573d50107172470f02a3/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:128:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L128) *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:186:12:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L186) *style:* **Variable or function name should be lowerCamelCase.**
```r
           NaNRetries = NA, logObjFnVals = FALSE, weights, useLog = FALSE) {
           ^~~~~~~~~~
```
[R/POM.R:196:25:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L196) *style:* **Variable or function name should be lowerCamelCase.**
```r
                        NaNRetries, logObjFnVals, weights, useLog) {
                        ^~~~~~~~~~
```
[R/POM.R:213:28:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L213) *style:* **Variable or function name should be lowerCamelCase.**
```r
    if (is.na(NaNRetries)) NaNRetries <- 1
                           ^~~~~~~~~~
```
[R/POM.R:237:11:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L237) *style:* **Variable or function name should be lowerCamelCase.**
```r
          sim_ <- Copy(sim)
          ^~~~
```
[R/POM.R:255:66:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L255) *style:* **Put spaces around all infix operators.**
```r
          envPOMCalled <- sys.frame(min(grep("POM", sys.calls()))-1)
                                                                ~^~
```
[R/POM.R:322:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L322) *style:* **Lines should not be more than 100 characters.**
```r
          cat(format(unlist(lapply(objectiveRes, function(x) x[["value"]])), digits = 4), dep = "\t")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/POM.R:360:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L360) *style:* **Lines should not be more than 100 characters.**
```r
      par[whP] <- unlist(deps[[modName]]@parameters$default[deps[[modName]]@parameters$paramName == names(P(sim, modName)[whParamsByMod[whP]])])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/POM.R:361:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L361) *style:* **Lines should not be more than 100 characters.**
```r
      upperRange[whP] <- unlist(deps[[modName]]@parameters$max[deps[[modName]]@parameters$paramName == names(P(sim, modName)[whParamsByMod[whP]])])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/POM.R:362:1:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L362) *style:* **Lines should not be more than 100 characters.**
```r
      lowerRange[whP] <- unlist(deps[[modName]]@parameters$min[deps[[modName]]@parameters$paramName == names(P(sim, modName)[whParamsByMod[whP]])])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/POM.R:378:27:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L378) *style:* **Variable or function name should be lowerCamelCase.**
```r
      deoptimArgs$control$NP <- 10 * length(lowerRange)
                          ^~
```
[R/POM.R:408:8:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L408) *style:* **Commented code should be removed.**
```r
      #deoptimArgs$control$parallelType <- deoptimArgs$control$parallelType
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/POM.R:447:21:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L447) *style:* **Variable or function name should be lowerCamelCase.**
```r
        deoptimArgs$Domains <- cbind(lowerRange, upperRange)
                    ^~~~~~~
```
[R/POM.R:448:21:](https://github.com/PredictiveEcology/SpaDES.core/blob/5b85e4167ba8e4e9ab5f573d50107172470f02a3/R/POM.R#L448) *style:* **Variable or function name should be lowerCamelCase.**
```r
        deoptimArgs$boundary.enforcement <- 2
                    ^~~~~~~~~~~~~~~~~~~~
```


By Cha


Lines 118-119 should be moved out of the while loop and preferably be before Line 94 to match it's parent `rep108.php`.


Good Improvements. Things you *need* to do:
- Use `virtualenv` and `pip freeze`.
- Add `_pycache_` and anything else (like environment folder created using `venv`) to `.gitignore`


这里没用到 deferred 啊囧 ，既不会 reject 又不会 resolve，没啥意义。
PS 是不是可以对外暴露一些事件？比如 close、click（注意 cursor），事件 handler 可以写在 `data` 中。一些行为之类的可参考原生的 Web Notification。


Why directly to master @niclash ?


这个注释干掉吧 好像和你这个 data 的数据结构不完全符合 😁


template 中避免过长的表达式。太长的情况下，增加一个 computed 属性来处理下。

PS ——  pug 中单个属性换行前面是否加逗号，尽量保持风格一致，属性用双引号包起来（貌似个别文件有地方用了单引号）。

**TODO**: pug lint 貌似没起到什么作用，看来还得再处理 linter 配置。。。（我的锅）


@Chakosai, Please explain this comment.


I thought thought that having a separate random_controller would be best for SRP.


命名供参考：
react: `dangerouslySetInnerHTML={'<div></div>'}`
element: `dangerouslyUseHTMLString: true`


I thought thought that having a separate random_controller would be best for SRP. Thoughts?


@tatatize note, underscores in numeric literals aren't supported in Python 2 :(


@Ryan-Gordon oh wow! That was nice of you to add my name to this file. Thank you! 😃


这是个啥?


[R/plotting-colours.R:89:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L89) *style:* **Lines should not be more than 100 characters.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-colours.R:89:32:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L89) *style:* **Put spaces around all infix operators.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                              ~^~~
```
[R/plotting-colours.R:89:35:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L89) *style:* **Put spaces around all infix operators.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                                 ~^~~
```
[R/plotting-colours.R:89:41:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L89) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                                        ^
```
[R/plotting-colours.R:106:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L106) *style:* **Lines should not be more than 100 characters.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-colours.R:106:32:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L106) *style:* **Put spaces around all infix operators.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                              ~^~~
```
[R/plotting-colours.R:106:35:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L106) *style:* **Put spaces around all infix operators.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                                 ~^~~
```
[R/plotting-colours.R:106:41:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L106) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                                        ^
```
[R/plotting-colours.R:131:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L131) *style:* **Lines should not be more than 100 characters.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-colours.R:131:32:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L131) *style:* **Put spaces around all infix operators.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                              ~^~~
```
[R/plotting-colours.R:131:35:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L131) *style:* **Put spaces around all infix operators.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                                 ~^~~
```
[R/plotting-colours.R:131:41:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L131) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
      if (all(na.omit(object[])%%1==0)) { # some factor rasters are actually real number -- makes no sense
                                        ^
```
[R/plotting-colours.R:284:75:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L284) *style:* **Put spaces around all infix operators.**
```r
    isFac <- any(raster::is.factor(grobToPlot)) & all(na.omit(grobToPlot[]%%1)==0)
                                                                         ~^~~
```
[R/plotting-colours.R:284:79:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-colours.R#L284) *style:* **Put spaces around all infix operators.**
```r
    isFac <- any(raster::is.factor(grobToPlot)) & all(na.omit(grobToPlot[]%%1)==0)
                                                                             ~^~~
```
[R/plotting-helpers.R:1023:44:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L1023) *style:* **Commas should always have a space after.**
```r
          grobToPlot <- grobToPlot[polySeq,]
                                           ^
```
[R/plotting-helpers.R:1028:38:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L1028) *style:* **Commas should always have a space after.**
```r
        grobToPlot <- grobToPlot[a[1,],]
                                     ^
```
[R/plotting-helpers.R:1028:40:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L1028) *style:* **Commas should always have a space after.**
```r
        grobToPlot <- grobToPlot[a[1,],]
                                       ^
```
[R/plotting-helpers.R:1291:41:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L1291) *style:* **Put spaces around all infix operators.**
```r
            if (all(na.omit(grobToPlot[]%%1)==0)) {
                                       ~^~~
```
[R/plotting-helpers.R:1291:45:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L1291) *style:* **Put spaces around all infix operators.**
```r
            if (all(na.omit(grobToPlot[]%%1)==0)) {
                                           ~^~~
```
[R/plotting-helpers.R:1380:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L1380) *style:* **Lines should not be more than 100 characters.**
```r
    grid.rect(x = 0, height = unit(1 + needsNewTitle * inherits(grobToPlot, "Raster") * 0.20 / (nRows / 2), "npc"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-helpers.R:2511:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2511) *style:* **Lines should not be more than 100 characters.**
```r
#'          jitter(sort(rbeta(nPoints, betaPar, betaPar) * (maxY - minY) + minY, decreasing = TRUE)),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-helpers.R:2589:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2589) *style:* **Variable or function name should be lowerCamelCase.**
```r
thin.SpatialPolygons <- function(x, tolerance = NULL, returnDataFrame = FALSE, minCoordsToThin = 0,
^~~~~~~~~~~~~~~~~~~~
```
[R/plotting-helpers.R:2610:8:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2610) *style:* **Commented code should be removed.**
```r
      #xyOrd[["out"]] <- xyOrd[["out"]][thinRes, ]# thin line
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-helpers.R:2633:50:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2633) *style:* **Commas should always have a space after.**
```r
            dat <- x@data[as.numeric(names1) + 1,]
                                                 ^
```
[R/plotting-helpers.R:2634:14:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2634) *style:* **Commented code should be removed.**
```r
            #row.names(dat) <- as.character(seq_len(length(xyOrd)))
             ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-helpers.R:2666:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2666) *style:* **Variable or function name should be lowerCamelCase.**
```r
thin.default <- function(x, tolerance, returnDataFrame, minCoordsToThin, ...) {
^~~~~~~~~~~~
```
[R/plotting-helpers.R:2701:3:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2701) *style:* **Variable or function name should be lowerCamelCase.**
```r
  IDs <- tryCatch(unlist(lapply(ordSeq, function(xx) {
  ^~~
```
[R/plotting-helpers.R:2726:7:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2726) *style:* **Commented code should be removed.**
```r
    # Polygons <- rep(rep(seq(numPolygons), numPolygon), idLength$V1) # sequential numbering
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-helpers.R:2727:5:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2727) *style:* **Variable or function name should be lowerCamelCase.**
```r
    Polygons <- rep(rep(IDs, numPolygon), idLength$V1) # actual ID labelling
    ^~~~~~~~
```
[R/plotting-helpers.R:2728:5:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2728) *style:* **Variable or function name should be lowerCamelCase.**
```r
    Polygon <- rep(unlist(lapply(numPolygon, seq)), idLength$V1)
    ^~~~~~~
```
[R/plotting-helpers.R:2735:36:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2735) *style:* **Commas should always have a space after.**
```r
    return(data.frame(lat = xyOrd[,1], long = xyOrd[,2], order = orders,
                                   ^
```
[R/plotting-helpers.R:2735:54:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2735) *style:* **Commas should always have a space after.**
```r
    return(data.frame(lat = xyOrd[,1], long = xyOrd[,2], order = orders,
                                                     ^
```
[R/plotting-helpers.R:2737:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2737) *style:* **Lines should not be more than 100 characters.**
```r
                      #group = paste0(as.character(Polygons), ".", as.character(Polygon)))) # the actual fortify
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-helpers.R:2740:40:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2740) *style:* **Commas should always have a space after.**
```r
    out <- setDT(data.frame(x = xyOrd[,1], y = xyOrd[,2], groups = groups))
                                       ^
```
[R/plotting-helpers.R:2740:55:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2740) *style:* **Commas should always have a space after.**
```r
    out <- setDT(data.frame(x = xyOrd[,1], y = xyOrd[,2], groups = groups))
                                                      ^
```
[R/plotting-helpers.R:2755:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2755) *style:* **Lines should not be more than 100 characters.**
```r
    which(polygon@data$Shape_Area>(sort(polygon@data$Shape_Area, decreasing = TRUE)[maxNumPolygons]))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting-helpers.R:2755:34:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2755) *style:* **Put spaces around all infix operators.**
```r
    which(polygon@data$Shape_Area>(sort(polygon@data$Shape_Area, decreasing = TRUE)[maxNumPolygons]))
                                ~^~
```
[R/plotting-helpers.R:2755:35:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2755) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    which(polygon@data$Shape_Area>(sort(polygon@data$Shape_Area, decreasing = TRUE)[maxNumPolygons]))
                                  ^
```
[R/plotting-helpers.R:2778:26:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-helpers.R#L2778) *style:* **Commas should always have a space after.**
```r
          totalAvailable," polygons in this view. See options('quickPlot.maxNumPolygons')")
                         ^
```
[R/plotting-other.R:202:48:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-other.R#L202) *style:* **Put spaces around all infix operators.**
```r
  if (any(raster::is.factor(ras1)) & all(ras1[]%%1==0)) {
                                              ~^~~
```
[R/plotting-other.R:202:51:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-other.R#L202) *style:* **Put spaces around all infix operators.**
```r
  if (any(raster::is.factor(ras1)) & all(ras1[]%%1==0)) {
                                                 ~^~~
```
[R/plotting-other.R:251:30:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-other.R#L251) *style:* **Commas should always have a space after.**
```r
    if (sum(corners$coords[1,] - corners$coords[2,]) %==% 0) {
                             ^
```
[R/plotting-other.R:251:51:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-other.R#L251) *style:* **Commas should always have a space after.**
```r
    if (sum(corners$coords[1,] - corners$coords[2,]) %==% 0) {
                                                  ^
```
[R/plotting-other.R:335:27:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-other.R#L335) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    if (length(row) == 0) { # above the plot
                          ^
```
[R/plotting-other.R:338:30:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting-other.R#L338) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    if (length(column) == 0) { # above the plot
                             ^
```
[R/plotting.R:290:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting.R#L290) *style:* **Lines should not be more than 100 characters.**
```r
    isDoCall <- grepl("^do.call", scalls) & grepl("\\<Plot\\>", scalls) & !grepl("test_that", scalls)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting.R:308:6:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting.R#L308) *style:* **Commented code should be removed.**
```r
    #whFrame <- grep(scalls, pattern = "^Plot|^quickPlot::Plot")
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting.R:318:8:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting.R#L318) *style:* **Commented code should be removed.**
```r
      #dotObjs <- mget(dotNames[!noName], envir = plotFrame, inherits = TRUE)
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/plotting.R:322:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/R/plotting.R#L322) *style:* **Lines should not be more than 100 characters.**
```r
        if (is.null(title)) plotArgs$title <- ifelse(nzchar(names(dotObjs2)), names(dotObjs2), dotNames)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-clickExtent.R:11:3:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-clickExtent.R#L11) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Sr1 <- Polygon(coords1)
  ^~~
```
[tests/testthat/test-clickExtent.R:12:3:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-clickExtent.R#L12) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Srs1 <- Polygons(list(Sr1), "s1")
  ^~~~
```
[tests/testthat/test-clickExtent.R:14:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-clickExtent.R#L14) *style:* **Lines should not be more than 100 characters.**
```r
  crs(shpEcozone) <- "+init=epsg:4326 +proj=longlat +datum=WGS84 +no_defs +ellps=WGS84 +towgs84=0,0,0"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-clickExtent.R:24:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-clickExtent.R#L24) *style:* **Lines should not be more than 100 characters.**
```r
  bb <- raster::shapefile(file.path(cacheRepo, "EC_borealdisturbance_polygonal_2008_2010_FINAL_ALBERS.shp"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-examples.R:11:15:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-examples.R#L11) *style:* **Closing curly-braces should always be on their own line, unless it's followed by an else.**
```r
    setwd(owd)}
              ^
```
[tests/testthat/test-Plot-do-call.R:8:3:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-Plot-do-call.R#L8) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Sr1 <- Polygon(coords1)
  ^~~
```
[tests/testthat/test-Plot-do-call.R:9:3:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-Plot-do-call.R#L9) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Srs1 <- Polygons(list(Sr1), "s1")
  ^~~~
```
[tests/testthat/test-Plot-do-call.R:11:1:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-Plot-do-call.R#L11) *style:* **Lines should not be more than 100 characters.**
```r
  crs(shpEcozone) <- "+init=epsg:4326 +proj=longlat +datum=WGS84 +no_defs +ellps=WGS84 +towgs84=0,0,0"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-Plot-do-call.R:13:24:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-Plot-do-call.R#L13) *style:* **Commas should always have a space after.**
```r
  r <- raster(extent(0,10,0,10), res = 1, vals = 1:100)
                       ^
```
[tests/testthat/test-Plot-do-call.R:13:27:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-Plot-do-call.R#L13) *style:* **Commas should always have a space after.**
```r
  r <- raster(extent(0,10,0,10), res = 1, vals = 1:100)
                          ^
```
[tests/testthat/test-Plot-do-call.R:13:29:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-Plot-do-call.R#L13) *style:* **Commas should always have a space after.**
```r
  r <- raster(extent(0,10,0,10), res = 1, vals = 1:100)
                            ^
```
[tests/testthat/test-Plot-nonVisual.R:65:21:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-Plot-nonVisual.R#L65) *style:* **Commented code should be removed.**
```r
  library(raster); #on.exit(detach("package:raster"), add = TRUE)
                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-Plot-nonVisual.R:70:3:](https://github.com/PredictiveEcology/quickPlot/blob/508c49814c0e83eab46d3a91a7ee8ba69788c91c/tests/testthat/test-Plot-nonVisual.R#L70) *style:* **Variable or function name should be lowerCamelCase.**
```r
  N <- ncol * nrow
  ^
```


But `node.image` would hide the original field data (like full mime type in filename).

In believe it would be possible to copy old data from `node.image` into that File node replacing `node.image` but then we would affect schema of File node. Really not sure what would be best. Replacing the field `node.image` sounds easiest, but I’m a bit worried about losing the original data.


весь закомментированный код надо выпилить


эти if надо объединить в один, связав условия логическим или


конский пробел перед Vector


лишняя пустая строка


точка с запятой не нужна тут


Can you check usage in montage demos  and filament ?


Your rustfmt and my rustfmt appear to be fighting each other - see https://github.com/rustodon/rustodon/commit/c69589fd67fdf46eb867f83e4bc8eed788d5e423

What do you do when you run it? Just cargo fmt?


для .find достаточно truly значения, чтобы "найти". Так что тут сработает `return (actor.type === 'player')`.


「协作」是不是更好？


здесь (и везде, повторяться не буду - нужны одинарные кавычки `'` вокруг строк вместо двойных). Надо заменить везде по коду


отступ


с отступом проблема


Yep! What does `cargo fmt --version` give you? for me:
```
λ ~/git/rustodon
» cargo fmt --version
rustfmt 0.6.1-nightly (0f8029f 2018-05-06)
```


вот эта висящая запятая мне совсем не нравится, надо причесать код


одна из двух пустых строк - лишняя


опять повторяющиеся пустые строки. Нужно отлюбить так делать


закомментированный код - удаляем


зачем этот тернарник? кажется, он не делает ничего, по сравнению с кодом перед знаком `?`


это мусорный комментарий


CNAME file


return undefined не нужен, нужен return;


пропущена `;`


не нужно


комментарий выпилить


выпилить


Great job


https://www.techinfected.net/2016/02/make-gui-calculator-in-python-windows-linux.html link to website where code is from


там ниже есть еще такие места, найдите и поправьте их


можно сэкономить на круглых скобках тут - как минимум 2 пары точно не нужны


не нужная пустая строка


не самый приятный глазу вариант форматирования кода, и точка с запятой не нужна там, где вы ее ставите, зато нужна в другом месте


这里改成 `add_cacheinfo` 了。


It was unused leftover cruft from the PEC writer code that was since fixed. But, solidly good to know. I tend to use them in binary to for readability.


destroy 的时候是不是需要 clearTimeout 一下以防万一？


The wheels are not built manually, but come from PyPI.


a working function


Is it fixed