[inst/examples/example_distanceFromEachPoint.R:37:2:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/inst/examples/example_distanceFromEachPoint.R#L37) *style:* **Commented code should be removed.**
```r
#beginCluster(3) # can do parallel
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_distanceFromEachPoint.R:40:2:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/inst/examples/example_distanceFromEachPoint.R#L40) *style:* **Commented code should be removed.**
```r
#endCluster() # if beginCluster was run
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_spread.R:54:2:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/inst/examples/example_spread.R#L54) *style:* **Commented code should be removed.**
```r
## Interrupt a spread event using iterations - need `returnIndices = TRUE` to
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_spread.R:247:2:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/inst/examples/example_spread.R#L247) *style:* **Commented code should be removed.**
```r
## Note: `neighProbs = c(0,1)` forces each active pixel to move to 2 new pixels
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/example_spread.R:248:2:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/inst/examples/example_spread.R#L248) *style:* **Commented code should be removed.**
```r
## (`prob = 0` for 1 neighbour, `prob = 1` for 2 neighbours)
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:243:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L243) *style:* **Commented code should be removed.**
```r
# ### INCORPORATE RELEVANT PARTS OF THIS OLD INIT FUNCTION INTO INITCOORDS()
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:248:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L248) *style:* **Commented code should be removed.**
```r
# #'                      (currently only \code{RasterLayer} or
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:249:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L249) *style:* **Commented code should be removed.**
```r
# #'                      \code{SpatialPolygonsDataFrame}) accepted.
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:259:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L259) *style:* **Commented code should be removed.**
```r
#     ext <- extent(agentlocation)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:261:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L261) *style:* **Commented code should be removed.**
```r
#       #            nonNAs <- !is.na(getvalue(probinit))
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:262:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L262) *style:* **Commented code should be removed.**
```r
#       nonNAs <- !is.na(getValues(probinit))
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:263:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L263) *style:* **Commented code should be removed.**
```r
#       wh.nonNAs <- which(nonNAs)
        ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:264:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L264) *style:* **Commented code should be removed.**
```r
#       #            ProbInit.v <- cumsum(getvalue(probinit)[nonNAs])
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:265:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L265) *style:* **Commented code should be removed.**
```r
#       ProbInit.v <- cumsum(getValues(probinit)[nonNAs])
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:267:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L267) *style:* **Commented code should be removed.**
```r
#         ran <- runif(numagents,0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:268:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L268) *style:* **Commented code should be removed.**
```r
#         fI <- findInterval(ran, ProbInit.v)+1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:269:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L269) *style:* **Commented code should be removed.**
```r
#         fI2 <- wh.nonNAs[fI]
          ^~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:270:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L270) *style:* **Commented code should be removed.**
```r
#         last.ran <- runif(numagents,0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:271:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L271) *style:* **Commented code should be removed.**
```r
#         last.fI <- findInterval(last.ran, ProbInit.v)+1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:272:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L272) *style:* **Commented code should be removed.**
```r
#         last.fI2 <- wh.nonNAs[last.fI]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:274:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L274) *style:* **Commented code should be removed.**
```r
#         #                va <- getvalue(probinit)[nonNAs]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:275:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L275) *style:* **Commented code should be removed.**
```r
#         va <- getValues(probinit)[nonNAs]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:276:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L276) *style:* **Commented code should be removed.**
```r
#         ran <- runif(length(va), 0, 1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:277:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L277) *style:* **Commented code should be removed.**
```r
#         fI2 <- wh.nonNAs[ran<va]
          ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:279:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L279) *style:* **Commented code should be removed.**
```r
#         last.ran <- runif(length(fI2), 0, 1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:280:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L280) *style:* **Commented code should be removed.**
```r
#         last.fI <- findInterval(last.ran, ProbInit.v) + 1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:281:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L281) *style:* **Commented code should be removed.**
```r
#         last.fI2 <- wh.nonNAs[last.fI]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:283:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L283) *style:* **Commented code should be removed.**
```r
#         #                last.ran <- runif(length(fI2),0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:284:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L284) *style:* **Commented code should be removed.**
```r
#         #                last.fI2 <- wh.nonNAs[last.ran<va]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:287:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L287) *style:* **Commented code should be removed.**
```r
#         position <- xyFromCell(agentlocation,fI2,spatial = TRUE)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:289:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L289) *style:* **Commented code should be removed.**
```r
#         position <- coordinates(agentlocation)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:291:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L291) *style:* **Commented code should be removed.**
```r
#         stop("need raster layer or Spatial Points object")
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:293:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L293) *style:* **Commented code should be removed.**
```r
#       numagents <- length(position)
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:301:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L301) *style:* **Commented code should be removed.**
```r
#           colnames(xy) = c("x", "y")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:302:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L302) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(xy)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:303:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L303) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(sampleRandom(agentlocation, numagents, xy = TRUE, sp = TRUE))
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:305:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L305) *style:* **Commented code should be removed.**
```r
#           sam <- sample(1:length(agentlocation),numagents)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:306:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L306) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(agentlocation[sam,])
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:308:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L308) *style:* **Commented code should be removed.**
```r
#           stop("need raster layer or Spatial Points object")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:315:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L315) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(agentlocation)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:317:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L317) *style:* **Commented code should be removed.**
```r
#           stop("need raster layer or Spatial Points object")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:319:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L319) *style:* **Commented code should be removed.**
```r
#         numagents <- length(position)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:327:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L327) *style:* **Commented code should be removed.**
```r
#         numagents <- length(position)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:331:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L331) *style:* **Commented code should be removed.**
```r
#     stop("Need to provide agentlocation, which can be a map layer")
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:333:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L333) *style:* **Commented code should be removed.**
```r
#   heading1 <- runif(numagents, 0, 360)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:334:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L334) *style:* **Commented code should be removed.**
```r
#   distance <- runif(numagents, 0.1, 10)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:336:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L336) *style:* **Commented code should be removed.**
```r
#   .Object@ID <- as.character(1:numagents)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:337:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L337) *style:* **Commented code should be removed.**
```r
#   .Object@spatial <- position
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:338:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L338) *style:* **Commented code should be removed.**
```r
#   .Object@heading <- heading1
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:339:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L339) *style:* **Commented code should be removed.**
```r
#   .Object@distance <- distance
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:341:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/initialize.R#L341) *style:* **Commented code should be removed.**
```r
#   return(.Object)
    ^~~~~~~~~~~~~~~
```
[R/mapReduce.R:50:38:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/mapReduce.R#L50) *style:* **Variable or function name should be lowerCamelCase.**
```r
  fullRasterVals <- fullRasterVals[, row_number := 1L:.N]
                                     ^~~~~~~~~~
```
[R/mapReduce.R:53:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/mapReduce.R#L53) *style:* **Variable or function name should be lowerCamelCase.**
```r
  BsumVec <- reduced[fullRasterVals] # join
  ^~~~~~~
```
[R/neighbourhood.R:112:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L112) *style:* **Variable or function name should be lowerCamelCase.**
```r
adj.raw <- function(x = NULL, cells, directions = 8, sort = FALSE, pairs = TRUE,
^~~~~~~
```
[R/neighbourhood.R:114:21:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L114) *style:* **Variable or function name should be lowerCamelCase.**
```r
                    match.adjacent = FALSE, cutoff.for.data.table = 2e3,
                    ^~~~~~~~~~~~~~
```
[R/neighbourhood.R:114:45:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L114) *style:* **Variable or function name should be lowerCamelCase.**
```r
                    match.adjacent = FALSE, cutoff.for.data.table = 2e3,
                                            ^~~~~~~~~~~~~~~~~~~~~
```
[R/neighbourhood.R:117:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L117) *style:* **Variable or function name should be lowerCamelCase.**
```r
  J <- NULL
  ^
```
[R/neighbourhood.R:232:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L232) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((adj[, "to"] - 1) %% numCell + 1) != adj[, "to"]) | # top or bottom of raster
            ^
```
[R/neighbourhood.R:232:14:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L232) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((adj[, "to"] - 1) %% numCell + 1) != adj[, "to"]) | # top or bottom of raster
             ^
```
[R/neighbourhood.R:232:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L232) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((adj[, "to"] - 1) %% numCell + 1) != adj[, "to"]) | # top or bottom of raster
              ^
```
[R/neighbourhood.R:233:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L233) *style:* **Lines should not be more than 100 characters.**
```r
              ((adj[, "from"] %% numCol + adj[, "to"] %% numCol) == 1)) # | #right & left edge cells, with neighbours wrapped
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/neighbourhood.R:233:16:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L233) *style:* **Place a space before left parenthesis, except in a function call.**
```r
              ((adj[, "from"] %% numCol + adj[, "to"] %% numCol) == 1)) # | #right & left edge cells, with neighbours wrapped
               ^
```
[R/neighbourhood.R:237:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L237) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((adj[, "to"] - 1) %% numCell + 1) != adj[, "to"]) | # top or bottom of raster
            ^
```
[R/neighbourhood.R:237:14:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L237) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((adj[, "to"] - 1) %% numCell + 1) != adj[, "to"]) | # top or bottom of raster
             ^
```
[R/neighbourhood.R:237:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L237) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((adj[, "to"] - 1) %% numCell + 1) != adj[, "to"]) | # top or bottom of raster
              ^
```
[R/neighbourhood.R:238:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L238) *style:* **Lines should not be more than 100 characters.**
```r
              ((adj[, "from"] %% numCol + adj[, "to"] %% numCol) == 1)) # | #right & left edge cells, with neighbours wrapped
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/neighbourhood.R:238:16:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L238) *style:* **Place a space before left parenthesis, except in a function call.**
```r
              ((adj[, "from"] %% numCol + adj[, "to"] %% numCol) == 1)) # | #right & left edge cells, with neighbours wrapped
               ^
```
[R/neighbourhood.R:248:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L248) *style:* **Put spaces around all infix operators.**
```r
        numCol*(adj[whLefRig, "from"] - adj[whLefRig, "to"])
             ~^~
```
[R/neighbourhood.R:248:16:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L248) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        numCol*(adj[whLefRig, "from"] - adj[whLefRig, "to"])
               ^
```
[R/neighbourhood.R:249:20:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L249) *style:* **Place a space before left parenthesis, except in a function call.**
```r
      whBotTop <- ((adj[, "to"] - 1) %% numCell + 1) != adj[, "to"]
                   ^
```
[R/neighbourhood.R:296:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L296) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((to - 1) %% numCell + 1) != to) |  #top or bottom of raster
            ^
```
[R/neighbourhood.R:296:14:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L296) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((to - 1) %% numCell + 1) != to) |  #top or bottom of raster
             ^
```
[R/neighbourhood.R:296:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L296) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          !((((to - 1) %% numCell + 1) != to) |  #top or bottom of raster
              ^
```
[R/neighbourhood.R:297:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L297) *style:* **Lines should not be more than 100 characters.**
```r
              ((from %% numCol + to %% numCol) == 1))# | #right & left edge cells, with neighbours wrapped
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/neighbourhood.R:297:16:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L297) *style:* **Place a space before left parenthesis, except in a function call.**
```r
              ((from %% numCol + to %% numCol) == 1))# | #right & left edge cells, with neighbours wrapped
               ^
```
[R/neighbourhood.R:313:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L313) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            !((((to - 1) %% numCell + 1) != to) | ((from %% numCol + to %% numCol) == 1))
              ^
```
[R/neighbourhood.R:313:16:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L313) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            !((((to - 1) %% numCell + 1) != to) | ((from %% numCol + to %% numCol) == 1))
               ^
```
[R/neighbourhood.R:313:17:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L313) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            !((((to - 1) %% numCell + 1) != to) | ((from %% numCol + to %% numCol) == 1))
                ^
```
[R/neighbourhood.R:313:52:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L313) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            !((((to - 1) %% numCell + 1) != to) | ((from %% numCol + to %% numCol) == 1))
                                                   ^
```
[R/neighbourhood.R:318:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L318) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            !((((to - 1) %% numCell + 1) != to) | ((from %% numCol + to %% numCol) == 1))
              ^
```
[R/neighbourhood.R:318:16:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L318) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            !((((to - 1) %% numCell + 1) != to) | ((from %% numCol + to %% numCol) == 1))
               ^
```
[R/neighbourhood.R:318:17:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L318) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            !((((to - 1) %% numCell + 1) != to) | ((from %% numCol + to %% numCol) == 1))
                ^
```
[R/neighbourhood.R:318:52:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L318) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            !((((to - 1) %% numCell + 1) != to) | ((from %% numCol + to %% numCol) == 1))
                                                   ^
```
[R/neighbourhood.R:327:22:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L327) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        whBotTop <- ((adj$to - 1) %% numCell + 1) != adj$to
                     ^
```
[R/neighbourhood.R:342:22:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L342) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        whBotTop <- ((adj$to - 1) %% numCell + 1) != adj$to
                     ^
```
[R/neighbourhood.R:854:29:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L854) *style:* **Variable or function name should be lowerCamelCase.**
```r
setGeneric("wrap", function(X, bounds, withHeading) {
                            ^
```
[R/neighbourhood.R:863:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L863) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:880:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L880) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:890:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L890) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:891:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L891) *style:* **Variable or function name should be lowerCamelCase.**
```r
    X <- wrap(X, bounds = extent(bounds))
    ^
```
[R/neighbourhood.R:900:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L900) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:901:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L901) *style:* **Variable or function name should be lowerCamelCase.**
```r
    X <- wrap(X, bounds = extent(bounds))
    ^
```
[R/neighbourhood.R:910:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L910) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:913:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L913) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds))
      ^
```
[R/neighbourhood.R:925:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L925) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:950:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L950) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:951:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L951) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds), withHeading = withHeading)
      ^
```
[R/neighbourhood.R:960:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L960) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:963:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/neighbourhood.R#L963) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds), withHeading = withHeading)
      ^
```
[R/RcppExports.R:67:20:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/RcppExports.R#L67) *style:* **Variable or function name should be lowerCamelCase.**
```r
runifC <- function(N) {
                   ^
```
[R/RcppExports.R:70:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/RcppExports.R#L70) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/SELES.R:53:23:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/SELES.R#L53) *style:* **Variable or function name should be lowerCamelCase.**
```r
numAgents <- function(N, probInit) {
                      ^
```
[R/spread.R:429:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L429) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        if ((minValue(spreadProb) > 1L) || (maxValue(spreadProb) < 0L) ||
            ^
```
[R/spread.R:434:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L434) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          if (((minValue(spreadProbLater) > 1L) || (maxValue(spreadProbLater) < 0L) ||
              ^
```
[R/spread.R:434:16:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L434) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          if (((minValue(spreadProbLater) > 1L) || (maxValue(spreadProbLater) < 0L) ||
               ^
```
[R/spread.R:538:8:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L538) *style:* **Commented code should be removed.**
```r
      #isNASpreadProb <- is.na(spreadProb[])
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread.R:540:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L540) *style:* **Commented code should be removed.**
```r
      #   isNASpreadProb <- is.na(spreadProb[])
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread.R:541:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L541) *style:* **Commented code should be removed.**
```r
      #   spreadProb[isNASpreadProb] <- 0L
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread.R:783:43:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L783) *style:* **Place a space before left parenthesis, except in a function call.**
```r
              if (any(circleMaxRadius <= ((n - 1) * res(landscape)[1]))) {
                                          ^
```
[R/spread.R:807:19:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L807) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          if (any((size + len) > maxSize & size <= maxSize)) {
                  ^
```
[R/spread.R:927:75:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L927) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            toKeepSR <- !(eventCells[, "id"] %fin% as.numeric(names(which((shouldStop)))))
                                                                          ^
```
[R/spread.R:937:17:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L937) *style:* **Place a space before left parenthesis, except in a function call.**
```r
            if ((returnDistances | spreadStateExists) & !allowOverlap) {
                ^
```
[R/spread.R:942:41:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread.R#L942) *style:* **Place a space before left parenthesis, except in a function call.**
```r
              notDupsEvents <- notDups[-(1:(nrSpreads - nrPotentials))]
                                        ^
```
[R/spread2.R:532:29:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread2.R#L532) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        whNeedJump <- which(((clusterDT$numRetries + 1) %% 10) == 0)
                            ^
```
[R/spread2.R:532:30:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread2.R#L532) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        whNeedJump <- which(((clusterDT$numRetries + 1) %% 10) == 0)
                             ^
```
[R/spread2.R:621:32:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread2.R#L621) *style:* **Place a space before left parenthesis, except in a function call.**
```r
          effDists <- dists * ((2 - angleQualities[, "angleQuality"]) / 2 *
                               ^
```
[R/spread2.R:699:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread2.R#L699) *style:* **Commented code should be removed.**
```r
            # colnamesDtPot <- colnames(dtPotential)
              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:700:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread2.R#L700) *style:* **Commented code should be removed.**
```r
            # ll <-  lapply(colnamesDtPot, function(x) dtPotential[[x]][!spreadProbNA])
              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:701:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread2.R#L701) *style:* **Commented code should be removed.**
```r
            # names(ll) <- colnamesDtPot
              ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:702:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/R/spread2.R#L702) *style:* **Commented code should be removed.**
```r
            # dtPotential <- as.data.table(ll)
              ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-adj.R:53:38:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-adj.R#L53) *style:* **Place a space before left parenthesis, except in a function call.**
```r
                             if (sum((adjDT - adj2[, colOrd]) ^ 2) == 0) {
                                     ^
```
[tests/testthat/test-adj.R:57:46:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-adj.R#L57) *style:* **Place a space before left parenthesis, except in a function call.**
```r
                               expect_gt(sum((adjDT - adj2[, colOrd]) ^ 2), 0)
                                             ^
```
[tests/testthat/test-examples.R:2:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-examples.R#L2) *style:* **Commented code should be removed.**
```r
#   fns <- ls("package:SpaDES.tools")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:23:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L23) *style:* **Commented code should be removed.**
```r
  #expect_equal(sort(unique(getValues(biomass))), sort(reducedDT$biomass))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:27:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L27) *style:* **Commented code should be removed.**
```r
#   library(data.table)
    ^~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:28:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L28) *style:* **Commented code should be removed.**
```r
#   library(raster)
    ^~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:31:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L31) *style:* **Commented code should be removed.**
```r
#    detach("package:data.table")
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:35:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L35) *style:* **Commented code should be removed.**
```r
#   ras <- raster(extent(0,15,0,15), res=1)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:36:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L36) *style:* **Commented code should be removed.**
```r
#   fullRas <- randomPolygons(ras, numTypes=5, speedup=1, p=0.3)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:37:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L37) *style:* **Commented code should be removed.**
```r
#   names(fullRas) <- "mapcodeAll"
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:38:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L38) *style:* **Commented code should be removed.**
```r
#   uniqueComms <- raster::unique(fullRas)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:42:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L42) *style:* **Commented code should be removed.**
```r
#     biomass=rnbinom(length(uniqueComms), mu=4000, 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:44:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L44) *style:* **Commented code should be removed.**
```r
#   biomass <- rasterizeReduced(reducedDT, fullRas, "biomass")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:46:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L46) *style:* **Commented code should be removed.**
```r
#   expect_equal(sort(unique(getValues(biomass))), sort(reducedDT$biomass))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:47:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L47) *style:* **Commented code should be removed.**
```r
#   expect_equal(length(unique(getValues(biomass))), length(unique(getValues(fullRas))))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:49:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L49) *style:* **Commented code should be removed.**
```r
#   setkey(reducedDT, biomass)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:50:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L50) *style:* **Commented code should be removed.**
```r
#   communities <- rasterizeReduced(reducedDT, fullRas, "communities")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:51:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L51) *style:* **Commented code should be removed.**
```r
#   expect_equal(sort(unique(getValues(communities))), sort(reducedDT$communities))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:52:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L52) *style:* **Commented code should be removed.**
```r
#   expect_equal(length(unique(getValues(communities))), length(unique(getValues(fullRas))))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:56:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L56) *style:* **Commented code should be removed.**
```r
#   library(data.table)
    ^~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:57:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L57) *style:* **Commented code should be removed.**
```r
#   library(raster)
    ^~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:60:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L60) *style:* **Commented code should be removed.**
```r
#    detach("package:data.table")
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:64:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L64) *style:* **Commented code should be removed.**
```r
#   ras <- raster(extent(0, 15, 0, 15), res = 1)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:65:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L65) *style:* **Commented code should be removed.**
```r
#   fullRas <- randomPolygons(ras, numTypes = 5, speedup = 1, p = 0.3)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:67:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L67) *style:* **Commented code should be removed.**
```r
#   uniqueComms <- raster::unique(fullRas)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:71:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L71) *style:* **Commented code should be removed.**
```r
#     biomass=rnbinom(length(uniqueComms), mu = 4000, 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:73:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L73) *style:* **Commented code should be removed.**
```r
#   biomass <- rasterizeReduced(reducedDT, fullRas, "biomass")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:75:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L75) *style:* **Commented code should be removed.**
```r
#   setkey(reducedDT, biomass)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:76:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L76) *style:* **Commented code should be removed.**
```r
#   communities <- rasterizeReduced(reducedDT, fullRas, "communities")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:77:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L77) *style:* **Commented code should be removed.**
```r
#   expect_equal(sort(unique(getValues(communities))), sort(reducedDT$communities))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:81:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L81) *style:* **Commented code should be removed.**
```r
#   library(data.table)
    ^~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:82:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L82) *style:* **Commented code should be removed.**
```r
#   library(raster)
    ^~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:85:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L85) *style:* **Commented code should be removed.**
```r
#    detach("package:data.table")
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:89:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L89) *style:* **Commented code should be removed.**
```r
#   ras <- raster(extent(0,15,0,15), res=1)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:90:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L90) *style:* **Commented code should be removed.**
```r
#   fullRas <- randomPolygons(ras, numTypes=5, speedup=1, p=0.3)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:91:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L91) *style:* **Commented code should be removed.**
```r
#   names(fullRas) <- "mapcodeAll"
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:92:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L92) *style:* **Commented code should be removed.**
```r
#   uniqueComms <- raster::unique(fullRas)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:96:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L96) *style:* **Commented code should be removed.**
```r
#     biomass=rnbinom(length(uniqueComms), mu=4000, 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:98:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L98) *style:* **Commented code should be removed.**
```r
#   biomass <- rasterizeReduced(reducedDT, fullRas, "biomass")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:100:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L100) *style:* **Commented code should be removed.**
```r
#   setkey(reducedDT, biomass)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:101:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L101) *style:* **Commented code should be removed.**
```r
#   communities <- rasterizeReduced(reducedDT, fullRas, "communities")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mapReduce.R:102:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-mapReduce.R#L102) *style:* **Commented code should be removed.**
```r
#   expect_equal(length(unique(getValues(communities))), length(unique(getValues(fullRas))))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:151:8:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-splitRaster.R#L151) *style:* **Commented code should be removed.**
```r
      #detach("package:raster")
       ^~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:247:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-splitRaster.R#L247) *style:* **Commented code should be removed.**
```r
  #expect_equal(min(values(m)), min(values(r))) ## Error: cannot allocate vector of size 4.8 Gb
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:266:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-splitRaster.R#L266) *style:* **Commented code should be removed.**
```r
  #expect_equal(max(values(m1)), max(values(r)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:267:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-splitRaster.R#L267) *style:* **Commented code should be removed.**
```r
  #expect_equal(min(values(m1)), min(values(r)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread.R:209:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread.R#L209) *style:* **Lines should not be more than 100 characters.**
```r
    if (interactive()) Plot(circEdge, addTo = "circs", cols = c("transparent", rainbow(numCircs)[whCirc]))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread.R:601:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread.R#L601) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  expect_true((radius * 1.5) %>=% max(dists[, "dists"]))
              ^
```
[tests/testthat/test-spread2.R:474:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L474) *style:* **Lines should not be more than 100 characters.**
```r
  ##                                    expr       min        lq      mean   median        uq       max neval
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:475:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L475) *style:* **Lines should not be more than 100 characters.**
```r
  ##         iterativeFun(ras, FALSE, n, sp)  3.096979 12.642477  73.02248 35.17520  91.10528  764.4073   300
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:475:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L475) *style:* **Commented code should be removed.**
```r
  ##         iterativeFun(ras, FALSE, n, sp)  3.096979 12.642477  73.02248 35.17520  91.10528  764.4073   300
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:476:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L476) *style:* **Lines should not be more than 100 characters.**
```r
  ##      nonIterativeFun(ras, FALSE, n, sp)  1.509484  6.555565  31.18444 14.91066  42.78317  158.5237   300
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:476:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L476) *style:* **Commented code should be removed.**
```r
  ##      nonIterativeFun(ras, FALSE, n, sp)  1.509484  6.555565  31.18444 14.91066  42.78317  158.5237   300
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:477:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L477) *style:* **Lines should not be more than 100 characters.**
```r
  ##           origSpread(ras, FALSE, n, sp)  5.154006  7.555631  14.87158 11.49005  17.50599  231.5487   300
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:477:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L477) *style:* **Commented code should be removed.**
```r
  ##           origSpread(ras, FALSE, n, sp)  5.154006  7.555631  14.87158 11.49005  17.50599  231.5487   300
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:478:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L478) *style:* **Lines should not be more than 100 characters.**
```r
  ## origSpreadIterations(ras, FALSE, n, sp) 10.754669 51.524368 141.48620 93.61996 169.10808 2110.2683   300
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:478:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L478) *style:* **Commented code should be removed.**
```r
  ## origSpreadIterations(ras, FALSE, n, sp) 10.754669 51.524368 141.48620 93.61996 169.10808 2110.2683   300
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:702:38:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3914c1c25b83b10759cb9de5217f2d90d67d8a06/tests/testthat/test-spread2.R#L702) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  ciCentre[seq_len(ncell(ciCentre))[-(ncell(ciCentre) / 2 - ncol(ciCentre) / 2)]] <- NA_integer_
                                     ^
```


I made a minimalistic JS wrapper as a possible alternative: https://github.com/MingweiSamuel/TeemoJS


so there's a bug... @rtri any clue?


Можна зробити setter на onClick, там буде більш гарніше виглядати присвоєнні в темплейті


Bluemix [toolchain](https://console-regional.ng.bluemix.net/devops/toolchains/3ba1f42b-c743-47d5-ba55-f927456e4616 "node-red-bluemix-starter-20170902172841747"): [Delivery Pipeline](https://console-regional.ng.bluemix.net/devops/pipelines/131241fc-83a5-46d9-9da2-76e95f84457a "node-red-bluemix-starter-20170902172841747") deployed [mercurio](https://github.com/vtmo/mercurio/releases/tag/deploy-ibm-yp-us-south-vitormoure-Dev-20170902-192628 "deploy-ibm-yp-us-south-vitormoure-Dev-20170902-192628") to [Dev](https://console.bluemix.net/apps/e07fd03b-2674-447c-9716-ac6fd4663deb?env_id=ibm:yp:us-south "ibm:yp:us-south:vitormoure:Dev"), including this commit


Woah, this is great, I like the direction this is going!

What is the difference between `colors` and `presetColors` in palette?


а тут value загнати в масів і зробити цикл )


@nikic Weird, I've never seen this RFC before. Since this was a PHP7 change, shouldn't have it been mentioned in at least one of these pages:
https://wiki.php.net/rfc/context_sensitive_lexer
http://php.net/releases/7_0_0.php
http://php.net/manual/en/migration70.new-features.php


@volzhs i fixed it, but i guess i was not backporter.


тут пілся ? можна загнати в параметр і передати в метод get() url і гет параметри окремо посуті це буде бест практікс по стайл гайду з оф сайта


@NinoSkopac It's in http://php.net/manual/en/migration70.other-changes.php.


Hey Jasonccon,

I was curious what would need to be done to add Red White and Blue with glitter and red and green maybe with the juggle effect? I'm a noob sorry if this is a silly question


Well, the webkit dependency might be a bit too heavy to some users of this.  In particular, `xfce4-screenshooter` is a default part of Xfce – and that is supposed to be a light DE.


Le problème vient du fait que Animation utilise des valeurs temporelles avec update dt, et BigImage fout la grouille parce qu'il met trois plombes à découper l'image, d'où un décalage de temps qui fait que l'anim finit plus tôt que prévu, avec une image random selon le temps de chargement.


Hello llectronics
to get this changes i need install   qtwebkit 5.212 experimental from obs or how can i do to get this changes for testing?


Whoops! I didn't catch that when I transferred my notes. Thank you!


On peut rollback les animations big images, mais le problème reviendra avec ou sans ça au moindre coup de ram un tout petit peu conséquent dans le jeu


how did you do that? @quantum-satire


You don't need necessarily the qtwebkit 5.212 version from obs you can try it out without them but it will break html5 support slightly (embedded stuff won't show)


+ grown tree est ajouté deux fois à object pool je vois


en fait c'était plutot ça

bon c'est réglé, le coup du refresh de l'animation reste quand même un problème potentiel


@Jamielynn92 Do you mean how to push the picture to the Hub through the Terminal in general or how to do it from a Linux computer?


This is great @tsanders. Way easier than what I was thinking.


How to push it through the terminal? I think I keep missing a step.


Bluemix [toolchain](https://console-regional.ng.bluemix.net/devops/toolchains/3ba1f42b-c743-47d5-ba55-f927456e4616 "node-red-bluemix-starter-20170902172841747"): [Delivery Pipeline](https://console-regional.ng.bluemix.net/devops/pipelines/131241fc-83a5-46d9-9da2-76e95f84457a "node-red-bluemix-starter-20170902172841747") deployed [mercurio](https://github.com/vtmo/mercurio/releases/tag/deploy-ibm-yp-us-south-vitormoure-Dev-20170902-194230 "deploy-ibm-yp-us-south-vitormoure-Dev-20170902-194230") to [Dev](https://console.bluemix.net/apps/e07fd03b-2674-447c-9716-ac6fd4663deb?env_id=ibm:yp:us-south "ibm:yp:us-south:vitormoure:Dev"), including this commit


Use quotes to guard this:

write /sys/devices/system/cpu/cpu4/core_ctl/always_online_cpu 1 1 0 0

Should be:

write /sys/devices/system/cpu/cpu4/core_ctl/always_online_cpu "1 1 0 0"


@casesandberg So I ran through several naming conventions, if you dug through the commits, but stuck with `colors` since that seemed to be everywhere else.

So firstly, there is a new HOC, like ColorWrap, called SwatchWrap. Palette uses that. The reason mainly being that users may want to customize or make their own color palette and implement that inside their own color picker. I may have taken the wrong approach with it, since I've essentially been in my own personal crash course for react the last two weeks, but it made sense. Palette exists mainly as a prebuilt palette for users to use.

Now that that is said, I have presetColors and colors as a 'default' and a 'custom' palette. colors can be defined with the same values as presetColors, or another set brought in from an API, or even left blank. These colors are what users would collect from the color picker. if customPalette is enabled, users will have the option of adding and removing colors from the palette. This is what meets the basic requirements of the issue, #305.

Passing an array of colors to presetColors will create a list of swatches that are, for the most part, not customize-able for users. If a company has a preset of company colors they always want displayed for the user to pick from, those would go here. Basically there is no state to track for these colors in SwatchWrap, because they never really change. However, even this can be customized in a custom colorpicker, if the developer decided they want users to have the option of saving their current custom palette as the "default", by simply updating whatever value is holding their presetColors with the ones from colors. presetColors is totally optional now.

I'm at home,and haven't really worked on this at all here, so I can pull this and get it set up and make some gifs demonstrating the intent, if you would like.


Ooo spotligth is back yeaaaaaa the bot developer


@Jamielynn92 Can you attach a screenshot of your Terminal with all of your commands? I can take a look and we can figure it out!


Ok, but it is possible to install the changes in qtwebkit from obs or  i have to wait for a new version of sailfishOS that comes with those changes?


Oh, right, I hadn't realised that the diagonal mirroring was like the rotating whereby you could overprint empty areas with the result of the rotation. Unfortunately I already have a code golf answer `↙³↑↑³←←×_χ↑\Ｆ³«Ｐ¹⁵↑↑¹»↓↗¹×_¹⁴‖ＢＯ⁹` that uses that overlap behaviour, and the other relevant answer uses `Copy` instead anyway.


можнна зробити один setter Spinner замість двух методів startSpinner і stopSpinner


Yes you can do this. It should work flawless. For html5 audio+video support choose the one called this way.
Also notice that this support is limited in general. Video plays but very choppy. And audio seems to be muted by default.


Ok, ca marche
Tu peux check dans mes derniers commit, j'ai trouvé la lumière pour les classes en lua :D
Un héritage plutot clean sans redéfinir 1E16 fois les memes variables


On a toujours un pirate pad ou un salon de chat pour causer de ce qu'on fait ?


![](https://github.trello.services/images/mini-trello-icon.png) [Login de usuarios con facebook](https://trello.com/c/pCjuL0Ry/1-login-de-usuarios-con-facebook)