[inst/examples/example_distanceFromEachPoint.R:37:2:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/inst/examples/example_distanceFromEachPoint.R#L40) *style:* **Commented code should be removed.**
```r
#endCluster() # if beginCluster was run
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:82:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L82) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    if ( method != "RMexp") {
        ^
```
[R/initialize.R:237:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L237) *style:* **Variable or function name should be lowerCamelCase.**
```r
  X <- c(jitter(sort(rbeta(nPoints, betaPar, betaPar) * (maxX - minX) + minX)),
  ^
```
[R/initialize.R:239:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L239) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Y <- c(jitter(sort(rbeta(nPoints / 2, betaPar, betaPar) * (maxY - meanY) + meanY)),
  ^
```
[R/initialize.R:243:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L243) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Sr1 <- Polygon(cbind(X + xAdd, Y + yAdd))
  ^~~
```
[R/initialize.R:244:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L244) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Srs1 <- Polygons(list(Sr1), "s1")
  ^~~~
```
[R/initialize.R:341:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L341) *style:* **Commented code should be removed.**
```r
# ### INCORPORATE RELEVANT PARTS OF THIS OLD INIT FUNCTION INTO INITCOORDS()
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:346:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L346) *style:* **Commented code should be removed.**
```r
# #'                      (currently only \code{RasterLayer} or
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:347:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L347) *style:* **Commented code should be removed.**
```r
# #'                      \code{SpatialPolygonsDataFrame}) accepted.
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:357:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L357) *style:* **Commented code should be removed.**
```r
#     ext <- extent(agentlocation)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:359:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L359) *style:* **Commented code should be removed.**
```r
#       #            nonNAs <- !is.na(getvalue(probinit))
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:360:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L360) *style:* **Commented code should be removed.**
```r
#       nonNAs <- !is.na(getValues(probinit))
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:361:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L361) *style:* **Commented code should be removed.**
```r
#       wh.nonNAs <- which(nonNAs)
        ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:362:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L362) *style:* **Commented code should be removed.**
```r
#       #            ProbInit.v <- cumsum(getvalue(probinit)[nonNAs])
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:363:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L363) *style:* **Commented code should be removed.**
```r
#       ProbInit.v <- cumsum(getValues(probinit)[nonNAs])
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:365:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L365) *style:* **Commented code should be removed.**
```r
#         ran <- runif(numagents,0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:366:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L366) *style:* **Commented code should be removed.**
```r
#         fI <- findInterval(ran, ProbInit.v)+1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:367:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L367) *style:* **Commented code should be removed.**
```r
#         fI2 <- wh.nonNAs[fI]
          ^~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:368:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L368) *style:* **Commented code should be removed.**
```r
#         last.ran <- runif(numagents,0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:369:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L369) *style:* **Commented code should be removed.**
```r
#         last.fI <- findInterval(last.ran, ProbInit.v)+1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:370:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L370) *style:* **Commented code should be removed.**
```r
#         last.fI2 <- wh.nonNAs[last.fI]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:372:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L372) *style:* **Commented code should be removed.**
```r
#         #                va <- getvalue(probinit)[nonNAs]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:373:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L373) *style:* **Commented code should be removed.**
```r
#         va <- getValues(probinit)[nonNAs]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:374:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L374) *style:* **Commented code should be removed.**
```r
#         ran <- runif(length(va), 0, 1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:375:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L375) *style:* **Commented code should be removed.**
```r
#         fI2 <- wh.nonNAs[ran<va]
          ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:377:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L377) *style:* **Commented code should be removed.**
```r
#         last.ran <- runif(length(fI2), 0, 1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:378:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L378) *style:* **Commented code should be removed.**
```r
#         last.fI <- findInterval(last.ran, ProbInit.v) + 1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:379:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L379) *style:* **Commented code should be removed.**
```r
#         last.fI2 <- wh.nonNAs[last.fI]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:381:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L381) *style:* **Commented code should be removed.**
```r
#         #                last.ran <- runif(length(fI2),0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:382:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L382) *style:* **Commented code should be removed.**
```r
#         #                last.fI2 <- wh.nonNAs[last.ran<va]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:385:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L385) *style:* **Commented code should be removed.**
```r
#         position <- xyFromCell(agentlocation,fI2,spatial = TRUE)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:387:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L387) *style:* **Commented code should be removed.**
```r
#         position <- coordinates(agentlocation)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:389:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L389) *style:* **Commented code should be removed.**
```r
#         stop("need raster layer or Spatial Points object")
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:391:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L391) *style:* **Commented code should be removed.**
```r
#       numagents <- length(position)
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:399:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L399) *style:* **Commented code should be removed.**
```r
#           colnames(xy) = c("x", "y")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:400:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L400) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(xy)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:401:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L401) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(sampleRandom(agentlocation, numagents, xy = TRUE, sp = TRUE))
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:403:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L403) *style:* **Commented code should be removed.**
```r
#           sam <- sample(1:length(agentlocation),numagents)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:404:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L404) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(agentlocation[sam,])
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:406:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L406) *style:* **Commented code should be removed.**
```r
#           stop("need raster layer or Spatial Points object")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:413:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L413) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(agentlocation)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:415:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L415) *style:* **Commented code should be removed.**
```r
#           stop("need raster layer or Spatial Points object")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:417:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L417) *style:* **Commented code should be removed.**
```r
#         numagents <- length(position)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:425:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L425) *style:* **Commented code should be removed.**
```r
#         numagents <- length(position)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:429:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L429) *style:* **Commented code should be removed.**
```r
#     stop("Need to provide agentlocation, which can be a map layer")
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:431:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L431) *style:* **Commented code should be removed.**
```r
#   heading1 <- runif(numagents, 0, 360)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:432:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L432) *style:* **Commented code should be removed.**
```r
#   distance <- runif(numagents, 0.1, 10)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:434:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L434) *style:* **Commented code should be removed.**
```r
#   .Object@ID <- as.character(1:numagents)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:435:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L435) *style:* **Commented code should be removed.**
```r
#   .Object@spatial <- position
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:436:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L436) *style:* **Commented code should be removed.**
```r
#   .Object@heading <- heading1
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:437:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L437) *style:* **Commented code should be removed.**
```r
#   .Object@distance <- distance
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:439:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/initialize.R#L439) *style:* **Commented code should be removed.**
```r
#   return(.Object)
    ^~~~~~~~~~~~~~~
```
[R/mapReduce.R:53:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L114) *style:* **Variable or function name should be lowerCamelCase.**
```r
                    match.adjacent = FALSE, cutoff.for.data.table = 2e3,
                                            ^~~~~~~~~~~~~~~~~~~~~
```
[R/neighbourhood.R:233:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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:238:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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:297:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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:813:29:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L813) *style:* **Variable or function name should be lowerCamelCase.**
```r
setGeneric("wrap", function(X, bounds, withHeading) {
                            ^
```
[R/neighbourhood.R:822:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L822) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:839:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L839) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:849:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L849) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:850:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L850) *style:* **Variable or function name should be lowerCamelCase.**
```r
    X <- wrap(X, bounds = extent(bounds))
    ^
```
[R/neighbourhood.R:859:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L859) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:860:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L860) *style:* **Variable or function name should be lowerCamelCase.**
```r
    X <- wrap(X, bounds = extent(bounds))
    ^
```
[R/neighbourhood.R:869:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L869) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:872:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L872) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds))
      ^
```
[R/neighbourhood.R:884:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L884) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:909:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L909) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:910:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L910) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds), withHeading = withHeading)
      ^
```
[R/neighbourhood.R:919:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L919) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:922:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L922) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds), withHeading = withHeading)
      ^
```
[R/neighbourhood.R:1059:40:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/neighbourhood.R#L1059) *style:* **Commas should always have a space after.**
```r
  cc <- cbind(pureCircle2[, "x"] - xy[,"x"], pureCircle2[, "y"] - xy[, "y"])
                                       ^
```
[R/probability.R:41:35:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/probability.R#L41) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    1 / sqrt(var * 2 * pi) * exp(-((theta - mu + 2 * pi * k) ^ 2) / (2 * var))
                                  ^
```
[R/probability.R:44:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/probability.R#L44) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Next <- term(theta, mu, var, k)
  ^~~~
```
[R/probability.R:45:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/probability.R#L45) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Last <- Next
  ^~~~
```
[R/RcppExports.R:68:20:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/RcppExports.R#L68) *style:* **Variable or function name should be lowerCamelCase.**
```r
runifC <- function(N) {
                   ^
```
[R/RcppExports.R:71:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/RcppExports.R#L71) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/SELES.R:53:23:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/SELES.R#L53) *style:* **Variable or function name should be lowerCamelCase.**
```r
numAgents <- function(N, probInit) {
                      ^
```
[R/spades-tools-deprecated.R:53:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spades-tools-deprecated.R#L53) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/splitRaster.R:116:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/splitRaster.R#L116) *style:* **Lines should not be more than 100 characters.**
```r
      clusterApplyLB(cl = cl, x = seq_along(extents), fun = croppy, e = extents, r = r, path = path, rType = rType)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread.R:538:8:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread.R#L541) *style:* **Commented code should be removed.**
```r
      #   spreadProb[isNASpreadProb] <- 0L
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread.R:942:41:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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:5:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L5) *style:* **Lines should not be more than 100 characters.**
```r
                           "quantityAdj", "quantityAdj2", "state", "size", "tooBigByNCells", "V1", "proportion"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:674:12:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L674) *style:* **Commented code should be removed.**
```r
          #pureCircle <- unique(pureCircle)
           ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:759:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L759) *style:* **Commented code should be removed.**
```r
          # colnamesDtPot <- colnames(dtPotential)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:760:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L760) *style:* **Commented code should be removed.**
```r
          # ll <-  lapply(colnamesDtPot, function(x) dtPotential[[x]][!spreadProbNA])
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:761:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L761) *style:* **Commented code should be removed.**
```r
          # names(ll) <- colnamesDtPot
            ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:762:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L762) *style:* **Commented code should be removed.**
```r
          # dtPotential <- as.data.table(ll)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:772:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L772) *style:* **Lines should not be more than 100 characters.**
```r
                                                                   .I[sample.int(length(numNeighs), size = numNeighs, prob = spreadProbRel)],
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:787:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L787) *style:* **Variable or function name should be lowerCamelCase.**
```r
      NAaSP <- !is.na(actualSpreadProb)
      ^~~~~
```
[R/spread2.R:789:42:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L789) *style:* **Commas should always have a space after.**
```r
        dtPotential <- dtPotential[NAaSP,]
                                         ^
```
[R/spread2.R:830:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L830) *style:* **Lines should not be more than 100 characters.**
```r
        # this is to prevent overlap within an event... in some cases, overlap within event is desired, so skip this block
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:848:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L848) *style:* **Lines should not be more than 100 characters.**
```r
        #successCells <- na.omit(successCells[!dupsWithinDtPotential]) # remove the dupsWithinDtPotential
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/spread2.R:848:10:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/R/spread2.R#L848) *style:* **Commented code should be removed.**
```r
        #successCells <- na.omit(successCells[!dupsWithinDtPotential]) # remove the dupsWithinDtPotential
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-examples.R:3:47:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-examples.R#L3) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if (grepl("VIC-", Sys.info()["nodename"]))  { # for debugging only
                                              ^
```
[tests/testthat/test-examples.R:4:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-examples.R#L4) *style:* **Commented code should be removed.**
```r
    cat("#START##############\n", file = tmpExFile, append = FALSE)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-examples.R:14:15:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-examples.R#L14) *style:* **Closing curly-braces should always be on their own line, unless it's followed by an else.**
```r
    setwd(owd)}
              ^
```
[tests/testthat/test-examples.R:16:46:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-examples.R#L16) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if (grepl("VIC-", Sys.info()["nodename"])) { # for debugging only
                                             ^
```
[tests/testthat/test-examples.R:17:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-examples.R#L17) *style:* **Lines should not be more than 100 characters.**
```r
    cat(paste("All files exist: ", isTRUE(all(file.exists(exFiles))), "\n"), file = tmpExFile, append = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-examples.R:22:48:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-examples.R#L22) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    if (grepl("VIC-", Sys.info()["nodename"])) { # for debugging only
                                               ^
```
[tests/testthat/test-mapReduce.R:23:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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-randomPolygon.R:25:60:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-randomPolygon.R#L25) *style:* **Put spaces around all infix operators.**
```r
  expect_true(base::abs(base::abs(polyArea - area)) <  area/4) ## TODO: why is this area/4?
                                                          ~^~
```
[tests/testthat/test-splitRaster.R:148:38:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-splitRaster.R#L148) *style:* **Commas should always have a space after.**
```r
  expect_identical(dataType(y4[[1]]),"INT1U")
                                     ^
```
[tests/testthat/test-splitRaster.R:165:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-splitRaster.R#L165) *style:* **Lines should not be more than 100 characters.**
```r
    tmpdir <- file.path(tempdir(), "splitRaster-test-parallel") %>% reproducible::checkPath(create = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:168:8:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-splitRaster.R#L168) *style:* **Commented code should be removed.**
```r
      #detach("package:raster")
       ^~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:226:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-splitRaster.R#L226) *style:* **Lines should not be more than 100 characters.**
```r
  tmpdir <- file.path(tempdir(), "splitRaster-test-large") %>% reproducible::checkPath(create = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:264:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-splitRaster.R#L264) *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:283:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-splitRaster.R#L283) *style:* **Commented code should be removed.**
```r
  #expect_equal(max(values(m1)), max(values(r)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:284:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-splitRaster.R#L284) *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/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/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-spread2.R:148:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L148) *style:* **Commented code should be removed.**
```r
  #quickDT <- data.table(id = seq_along(sams), initialPixels = sams, key = "id")
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:150:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L150) *style:* **Commented code should be removed.**
```r
  #cirOut <- quickDT[cirOut, on = ]
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:473:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L473) *style:* **Lines should not be more than 100 characters.**
```r
  ##                                    expr       min        lq      mean   median        uq       max neval
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:474:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L474) *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:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L475) *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:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L476) *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:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L477) *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:688:38:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L688) *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_
                                     ^
```
[tests/testthat/test-spread2.R:884:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L884) *style:* **Lines should not be more than 100 characters.**
```r
                       spreadProb = 0.23, persistProb = 0, iterations = 10, directions = 8L, plot.it = FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:886:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L886) *style:* **Lines should not be more than 100 characters.**
```r
                      spreadProb = 0.23, persistProb = 0.8, iterations = 10, directions = 8L, plot.it = FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:891:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L891) *style:* **Variable or function name should be lowerCamelCase.**
```r
  M <- matrix(0.8, nrow = 50, ncol = 50)
  ^
```
[tests/testthat/test-spread2.R:898:35:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L898) *style:* **Put spaces around all infix operators.**
```r
  start <- c(50, length(landscape)-49)
                                 ~^~
```
[tests/testthat/test-spread2.R:902:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L902) *style:* **Lines should not be more than 100 characters.**
```r
                        spreadProb = 0.23, persistProb = persistRas, iterations = 10, directions = 8L,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-spread2.R:916:14:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L916) *style:* **Use <-, not =, for assignment.**
```r
  spreadProb = landscape
             ^
```
[tests/testthat/test-spread2.R:918:72:](https://github.com/PredictiveEcology/SpaDES.tools/blob/993e143024de61ebf2efb4b5fb1adcae38ed0cf1/tests/testthat/test-spread2.R#L918) *style:* **Commas should always have a space after.**
```r
  expect_silent(spread2(landscape = landscape, spreadProb = spreadProb,start = start,
                                                                       ^
```


I forgot to mention, this fixes #2


Это самые сложные тесты из всех из-за названий. Мы правда думали над этим и текущий вариант нам тоже не очень, но как-то не смогли придумать лучше. Причем наличие тут двух тестов на меньше года и больше года не случайно. Мы сначала написали один и нашли баг в самом коде. Поэтому написали второй и собственно еще во втором задании поправили баг, который некорректно считал месяцы для пиццерий до года.


Java constructor example


TinyCI build failure:
[make] returned [2]:
```[ 28%] Built target sp2freetype
[ 29%] Built target json11
[ 39%] Built target box2d
[ 39%] Built target glew
[ 45%] Built target lua
[ 76%] Built target bullet
[ 76%] Building CXX object CMakeFiles/Fuseblaze.dir/src/blood.cpp.o
CMakeFiles/Fuseblaze.dir/build.make:62: recipe for target 'CMakeFiles/Fuseblaze.dir/src/blood.cpp.o' failed
CMakeFiles/Makefile2:220: recipe for target 'CMakeFiles/Fuseblaze.dir/all' failed
Makefile:83: recipe for target 'all' failed

/home/daid/_tinyci/daid/Fuseblaze/src/blood.cpp:5:35: fatal error: sp2/graphics/meshData.h: No such file or directory
 #include <sp2/graphics/meshData.h>
                                   ^
compilation terminated.
make[2]: *** [CMakeFiles/Fuseblaze.dir/src/blood.cpp.o] Error 1
make[1]: *** [CMakeFiles/Fuseblaze.dir/all] Error 2
make: *** [all] Error 2
```


Pretty sure this is a memory leak. It's never freed after this.


Oops. :(


TinyCI build failure:
[make -j 3] returned [2]:
```[  1%] Built target json11
[ 11%] Built target box2d
[ 11%] Built target glew
[ 39%] Built target sp2freetype
[ 45%] Built target lua
[ 76%] Built target bullet
[ 76%] Building CXX object CMakeFiles/Fuseblaze.dir/src/editor/editorHandle.cpp.o
[ 76%] Building CXX object CMakeFiles/Fuseblaze.dir/src/blood.cpp.o
[ 76%] Building CXX object CMakeFiles/Fuseblaze.dir/src/editor/editor.cpp.o
CMakeFiles/Fuseblaze.dir/build.make:62: recipe for target 'CMakeFiles/Fuseblaze.dir/src/blood.cpp.o' failed
CMakeFiles/Makefile2:220: recipe for target 'CMakeFiles/Fuseblaze.dir/all' failed
Makefile:83: recipe for target 'all' failed

/home/daid/_tinyci/daid/Fuseblaze/src/blood.cpp:5:35: fatal error: sp2/graphics/meshData.h: No such file or directory
 #include <sp2/graphics/meshData.h>
                                   ^
compilation terminated.
make[2]: *** [CMakeFiles/Fuseblaze.dir/src/blood.cpp.o] Error 1
make[2]: *** Waiting for unfinished jobs....
/home/daid/_tinyci/daid/Fuseblaze/src/editor/editor.cpp: In member function 'sp::Vector2d Editor::toWorld(sp::Vector2d)':
/home/daid/_tinyci/daid/Fuseblaze/src/editor/editor.cpp:159:1: warning: no return statement in function returning non-void [-Wreturn-type]
 }
 ^
make[1]: *** [CMakeFiles/Fuseblaze.dir/all] Error 2
make: *** [all] Error 2
```


1. Это не OrganizationTests
2. Сложное, длинное и непонятное название теста. Попробуйте написать по-русски, как ведет себя этот код при заданных условиях. Потом тупо переведите на английский.


`&& !DONT_UPDATE_BUFFER`


get rid of this memset


hm


Заинлайньте константы, они мешают читать тест.
Неужели не проще назвать как-нибудь типа
`GetCallCenterPhoneFromXml_WithPhone_ExtractsPhoneNumber`


🔥 [Jenkins job](http://xamarin-jenkins.guest.corp.microsoft.com:8080/job/macios-device-tests/7/display/redirect) (on internal Jenkins) failed in stage 'Publish builds to GitHub' 🔥 : hudson.AbortException: No item named ../macios-device-tests found

✅ [Build succeeded](http://xamarin-jenkins.guest.corp.microsoft.com:8080/job/macios-device-tests/7//console)


@daid TinyCI build failure:
[make -j 3] returned [2]:
```[  1%] Built target json11
[ 11%] Built target box2d
[ 11%] Built target glew
[ 39%] Built target sp2freetype
[ 45%] Built target lua
[ 76%] Built target bullet
Scanning dependencies of target Fuseblaze
[ 76%] Building CXX object CMakeFiles/Fuseblaze.dir/src/blood.cpp.o
[ 77%] Building CXX object CMakeFiles/Fuseblaze.dir/src/editor/prototype.cpp.o
[ 77%] Building CXX object CMakeFiles/Fuseblaze.dir/src/effect.cpp.o
CMakeFiles/Fuseblaze.dir/build.make:158: recipe for target 'CMakeFiles/Fuseblaze.dir/src/effect.cpp.o' failed
CMakeFiles/Makefile2:220: recipe for target 'CMakeFiles/Fuseblaze.dir/all' failed
Makefile:83: recipe for target 'all' failed

/home/daid/_tinyci/daid/Fuseblaze/src/effect.cpp:4:35: fatal error: sp2/graphics/meshData.h: No such file or directory
 #include <sp2/graphics/meshData.h>
                                   ^
compilation terminated.
make[2]: *** [CMakeFiles/Fuseblaze.dir/src/effect.cpp.o] Error 1
make[2]: *** Waiting for unfinished jobs....
make[1]: *** [CMakeFiles/Fuseblaze.dir/all] Error 2
make: *** [all] Error 2
```


wrap this whole block of #ifdefs in `if !DONT_UPDATE_BUFFER`


Go @matthewnitschke 🎉


Враньё, в Arrange нет никакого SitePath


Thanks for the update. I always hate having to do workarounds for non-conformant compilers, so if you can switch versions I'd be happier just keeping the code the way it is.


Sorry for the late reply, the whole thing slipped my mind and I got busy with treemacs again.

There is no buffer involved in this version. The process output is passed to the filter function and that's that. To associate the process with a buffer you need to explicitly pass something to the `:buffer` argument of `make-process`. I don't know whether such an option is worth it, running some performance tests for this is still on my todo list.


Configure fails to detect IPv6 support on musl systems. As a result, the standard package lacks ipv6 support (rsync --version shows no-IPV6). This commit applies [Alpine Linux's fix](https://git.alpinelinux.org/cgit/aports/commit/?id=2883d8bada0d04fb59f363e8a3c9a581f978aab3) by forcing IPV6 support on.

This is only done when the global IPV6 flag is enabled, otherwise support will be disabled explicitly by the standard rsync configure flag.

Signed-off-by: Simon Tretter simon@mediaarchitectu.re


done


Making edits for this page.  @tonysmith


Created multidev environment [nedcamp#ci-103](https://dashboard.pantheon.io/sites/1e9ab33c-01d3-42bd-bb42-5008333172a3#ci-103).

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


The `augment()` function:

can you please change this to:

The `augment()` function in the `broom` package

throughout


so i tested and it looks like the issue the drop effect has is caused by something else, maybe because it takes in %itemtypes/experience%. I swapped this to item type.


__[API Description file `simulationapi`](https://app.apiary.io/simulationapi/editor) has not been updated in Apiary.io__ due to server timeout.
Please try it later by trying to redeliver the associated [web hook in settings](api.github.com/3DSIM/simulation-api-specification/settings/hooks) of this repository. (Autogenerated message from apiary.io)