[inst/examples/example_distanceFromEachPoint.R:37:2:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/inst/examples/example_distanceFromEachPoint.R#L40) *style:* **Commented code should be removed.**
```r
#endCluster() # if beginCluster was run
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:83:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L83) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
      if ( method != "RMexp") {
          ^
```
[R/initialize.R:88:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L88) *style:* **Lines should not be more than 100 characters.**
```r
    map <- raster(RandomFields::RFsimulate(model, y = 1:ncSpeedup, x = 1:nrSpeedup, grid = TRUE, ...))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:223:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L223) *style:* **Variable or function name should be lowerCamelCase.**
```r
randomPolygon.SpatialPoints <- function(x, hectares, area) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:247:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L247) *style:* **Commented code should be removed.**
```r
  #y <- spTransform(x, areaCRS)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:263:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L263) *style:* **Variable or function name should be lowerCamelCase.**
```r
  X <- c(jitter(sort(rbeta(nPoints, betaPar, betaPar) * (maxX - minX) + minX)),
  ^
```
[R/initialize.R:265:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L265) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Y <- c(jitter(sort(rbeta(nPoints / 2, betaPar, betaPar) * (maxY - meanY) + meanY)),
  ^
```
[R/initialize.R:269:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L269) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Sr1 <- Polygon(cbind(X + xAdd, Y + yAdd))
  ^~~
```
[R/initialize.R:270:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L270) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Srs1 <- Polygons(list(Sr1), "s1")
  ^~~~
```
[R/initialize.R:283:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L283) *style:* **Variable or function name should be lowerCamelCase.**
```r
randomPolygon.matrix <- function(x, hectares, area) {
^~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:300:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L300) *style:* **Variable or function name should be lowerCamelCase.**
```r
randomPolygon.SpatialPolygons <- function(x, hectares, area) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:307:8:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L307) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  while(need) {
       ^
```
[R/initialize.R:407:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L407) *style:* **Commented code should be removed.**
```r
# ### INCORPORATE RELEVANT PARTS OF THIS OLD INIT FUNCTION INTO INITCOORDS()
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:412:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L412) *style:* **Commented code should be removed.**
```r
# #'                      (currently only \code{RasterLayer} or
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:413:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L413) *style:* **Commented code should be removed.**
```r
# #'                      \code{SpatialPolygonsDataFrame}) accepted.
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:423:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L423) *style:* **Commented code should be removed.**
```r
#     ext <- extent(agentlocation)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:425:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L425) *style:* **Commented code should be removed.**
```r
#       #            nonNAs <- !is.na(getvalue(probinit))
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:426:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L426) *style:* **Commented code should be removed.**
```r
#       nonNAs <- !is.na(getValues(probinit))
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:427:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L427) *style:* **Commented code should be removed.**
```r
#       wh.nonNAs <- which(nonNAs)
        ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:428:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L428) *style:* **Commented code should be removed.**
```r
#       #            ProbInit.v <- cumsum(getvalue(probinit)[nonNAs])
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:429:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L429) *style:* **Commented code should be removed.**
```r
#       ProbInit.v <- cumsum(getValues(probinit)[nonNAs])
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:431:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L431) *style:* **Commented code should be removed.**
```r
#         ran <- runif(numagents,0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:432:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L432) *style:* **Commented code should be removed.**
```r
#         fI <- findInterval(ran, ProbInit.v)+1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:433:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L433) *style:* **Commented code should be removed.**
```r
#         fI2 <- wh.nonNAs[fI]
          ^~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:434:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L434) *style:* **Commented code should be removed.**
```r
#         last.ran <- runif(numagents,0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:435:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L435) *style:* **Commented code should be removed.**
```r
#         last.fI <- findInterval(last.ran, ProbInit.v)+1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:436:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L436) *style:* **Commented code should be removed.**
```r
#         last.fI2 <- wh.nonNAs[last.fI]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:438:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L438) *style:* **Commented code should be removed.**
```r
#         #                va <- getvalue(probinit)[nonNAs]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:439:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L439) *style:* **Commented code should be removed.**
```r
#         va <- getValues(probinit)[nonNAs]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:440:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L440) *style:* **Commented code should be removed.**
```r
#         ran <- runif(length(va), 0, 1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:441:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L441) *style:* **Commented code should be removed.**
```r
#         fI2 <- wh.nonNAs[ran<va]
          ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:443:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L443) *style:* **Commented code should be removed.**
```r
#         last.ran <- runif(length(fI2), 0, 1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:444:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L444) *style:* **Commented code should be removed.**
```r
#         last.fI <- findInterval(last.ran, ProbInit.v) + 1
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:445:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L445) *style:* **Commented code should be removed.**
```r
#         last.fI2 <- wh.nonNAs[last.fI]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:447:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L447) *style:* **Commented code should be removed.**
```r
#         #                last.ran <- runif(length(fI2),0,1)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:448:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L448) *style:* **Commented code should be removed.**
```r
#         #                last.fI2 <- wh.nonNAs[last.ran<va]
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:451:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L451) *style:* **Commented code should be removed.**
```r
#         position <- xyFromCell(agentlocation,fI2,spatial = TRUE)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:453:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L453) *style:* **Commented code should be removed.**
```r
#         position <- coordinates(agentlocation)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:455:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L455) *style:* **Commented code should be removed.**
```r
#         stop("need raster layer or Spatial Points object")
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:457:9:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L457) *style:* **Commented code should be removed.**
```r
#       numagents <- length(position)
        ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:465:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L465) *style:* **Commented code should be removed.**
```r
#           colnames(xy) = c("x", "y")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:466:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L466) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(xy)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:467:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L467) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(sampleRandom(agentlocation, numagents, xy = TRUE, sp = TRUE))
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:469:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L469) *style:* **Commented code should be removed.**
```r
#           sam <- sample(1:length(agentlocation),numagents)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:470:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L470) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(agentlocation[sam,])
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:472:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L472) *style:* **Commented code should be removed.**
```r
#           stop("need raster layer or Spatial Points object")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:479:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L479) *style:* **Commented code should be removed.**
```r
#           position <- SpatialPoints(agentlocation)
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:481:13:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L481) *style:* **Commented code should be removed.**
```r
#           stop("need raster layer or Spatial Points object")
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:483:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L483) *style:* **Commented code should be removed.**
```r
#         numagents <- length(position)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:491:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L491) *style:* **Commented code should be removed.**
```r
#         numagents <- length(position)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:495:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L495) *style:* **Commented code should be removed.**
```r
#     stop("Need to provide agentlocation, which can be a map layer")
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:497:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L497) *style:* **Commented code should be removed.**
```r
#   heading1 <- runif(numagents, 0, 360)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:498:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L498) *style:* **Commented code should be removed.**
```r
#   distance <- runif(numagents, 0.1, 10)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:500:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L500) *style:* **Commented code should be removed.**
```r
#   .Object@ID <- as.character(1:numagents)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:501:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L501) *style:* **Commented code should be removed.**
```r
#   .Object@spatial <- position
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:502:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L502) *style:* **Commented code should be removed.**
```r
#   .Object@heading <- heading1
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:503:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L503) *style:* **Commented code should be removed.**
```r
#   .Object@distance <- distance
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/initialize.R:505:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L505) *style:* **Commented code should be removed.**
```r
#   return(.Object)
    ^~~~~~~~~~~~~~~
```
[R/initialize.R:510:32:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L510) *style:* **Commas should always have a space after.**
```r
  CRS(paste("+proj=utm +zone=",zone," ellps=WGS84",sep=''))
                               ^
```
[R/initialize.R:510:37:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L510) *style:* **Commas should always have a space after.**
```r
  CRS(paste("+proj=utm +zone=",zone," ellps=WGS84",sep=''))
                                    ^
```
[R/initialize.R:510:52:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L510) *style:* **Commas should always have a space after.**
```r
  CRS(paste("+proj=utm +zone=",zone," ellps=WGS84",sep=''))
                                                   ^
```
[R/initialize.R:510:55:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L510) *style:* **Put spaces around all infix operators.**
```r
  CRS(paste("+proj=utm +zone=",zone," ellps=WGS84",sep=''))
                                                     ~^~
```
[R/initialize.R:510:56:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L510) *style:* **Only use double-quotes.**
```r
  CRS(paste("+proj=utm +zone=",zone," ellps=WGS84",sep=''))
                                                       ^~
```
[R/initialize.R:514:22:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/initialize.R#L514) *style:* **Put spaces around all infix operators.**
```r
  (floor((long + 180)/6) %% 60) + 1
                    ~^~
```
[R/mapReduce.R:53:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/mapReduce.R#L53) *style:* **Variable or function name should be lowerCamelCase.**
```r
  BsumVec <- reduced[fullRasterVals] # join
  ^~~~~~~
```
[R/neighbourhood.R:114:21:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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:806:29:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L806) *style:* **Variable or function name should be lowerCamelCase.**
```r
setGeneric("wrap", function(X, bounds, withHeading) {
                            ^
```
[R/neighbourhood.R:815:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L815) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:832:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L832) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:842:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L842) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:843:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L843) *style:* **Variable or function name should be lowerCamelCase.**
```r
    X <- wrap(X, bounds = extent(bounds))
    ^
```
[R/neighbourhood.R:852:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L852) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:853:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L853) *style:* **Variable or function name should be lowerCamelCase.**
```r
    X <- wrap(X, bounds = extent(bounds))
    ^
```
[R/neighbourhood.R:862:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L862) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds) {
                        ^
```
[R/neighbourhood.R:865:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L865) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds))
      ^
```
[R/neighbourhood.R:877:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L877) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:902:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L902) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:903:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L903) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds), withHeading = withHeading)
      ^
```
[R/neighbourhood.R:912:25:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L912) *style:* **Variable or function name should be lowerCamelCase.**
```r
  definition = function(X, bounds, withHeading) {
                        ^
```
[R/neighbourhood.R:915:7:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L915) *style:* **Variable or function name should be lowerCamelCase.**
```r
      X <- wrap(X, bounds = extent(bounds), withHeading = withHeading)
      ^
```
[R/neighbourhood.R:1052:40:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/neighbourhood.R#L1052) *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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/RcppExports.R#L71) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/SELES.R:53:23:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/SELES.R#L53) *style:* **Variable or function name should be lowerCamelCase.**
```r
numAgents <- function(N, probInit) {
                      ^
```
[R/splitRaster.R:116:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/R/spread2.R#L848) *style:* **Commented code should be removed.**
```r
        #successCells <- na.omit(successCells[!dupsWithinDtPotential]) # remove the dupsWithinDtPotential
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-examples.R:6:11:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-examples.R#L6) *style:* **Commented code should be removed.**
```r
    cat("#START##############\n", file = tmpExFile, append = FALSE)
          ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-examples.R:17:5:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-examples.R#L17) *style:* **Commas should never have a space before.**
```r
  } , add = TRUE)
   ~^
```
[tests/testthat/test-mapReduce.R:23:4:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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-mergeRaster.R:4:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L4) *style:* **Use <-, not =, for assignment.**
```r
  nx = 3
     ^
```
[tests/testthat/test-mergeRaster.R:5:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L5) *style:* **Use <-, not =, for assignment.**
```r
  ny = 3
     ^
```
[tests/testthat/test-mergeRaster.R:10:54:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L10) *style:* **Commas should never have a space before.**
```r
                        vals = round(runif(n = 14400 , min = 1, max = 10)))
                                                    ~^
```
[tests/testthat/test-mergeRaster.R:13:29:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L13) *style:* **Put spaces around all infix operators.**
```r
  expect_length(splitted, nx*ny)
                           ~^~
```
[tests/testthat/test-mergeRaster.R:33:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L33) *style:* **Use <-, not =, for assignment.**
```r
  nx = 3
     ^
```
[tests/testthat/test-mergeRaster.R:34:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L34) *style:* **Use <-, not =, for assignment.**
```r
  ny = 3
     ^
```
[tests/testthat/test-mergeRaster.R:39:54:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L39) *style:* **Commas should never have a space before.**
```r
                        vals = round(runif(n = 14400 , min = 1, max = 10)))
                                                    ~^
```
[tests/testthat/test-mergeRaster.R:42:29:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L42) *style:* **Put spaces around all infix operators.**
```r
  expect_length(splitted, nx*ny)
                           ~^~
```
[tests/testthat/test-mergeRaster.R:52:54:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L52) *style:* **Commas should never have a space before.**
```r
                        vals = round(runif(n = 14400 , min = 1, max = 10)))
                                                    ~^
```
[tests/testthat/test-mergeRaster.R:55:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L55) *style:* **Lines should not be more than 100 characters.**
```r
test_that("mergeRaster will use mosaic with default mean if rasters are resampled and fun if passed", {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-mergeRaster.R:58:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L58) *style:* **Use <-, not =, for assignment.**
```r
  nx = 3
     ^
```
[tests/testthat/test-mergeRaster.R:59:6:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L59) *style:* **Use <-, not =, for assignment.**
```r
  ny = 3
     ^
```
[tests/testthat/test-mergeRaster.R:64:54:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L64) *style:* **Commas should never have a space before.**
```r
                        vals = round(runif(n = 14400 , min = 1, max = 10)))
                                                    ~^
```
[tests/testthat/test-mergeRaster.R:67:29:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-mergeRaster.R#L67) *style:* **Put spaces around all infix operators.**
```r
  expect_length(splitted, nx*ny)
                           ~^~
```
[tests/testthat/test-randomPolygon.R:24:60:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-randomPolygon.R#L24) *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-randomPolygon.R:28:3:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-randomPolygon.R#L28) *style:* **Variable or function name should be lowerCamelCase.**
```r
  centerSP_UTM <- sp::spTransform(centerSP, CRSobj = raster::crs(poly1InUTM))
  ^~~~~~~~~~~~
```
[tests/testthat/test-randomPolygon.R:30:1:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-randomPolygon.R#L30) *style:* **Lines should not be more than 100 characters.**
```r
  expect_true(raster::pointDistance(centerSP_UTM, polyCenter, lonlat = FALSE) < 100) ## TODO: appropriate test?
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-splitRaster.R:148:38:](https://github.com/PredictiveEcology/SpaDES.tools/blob/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/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/3cc18e9b00184acb4aa33ce18e4106e5b227c863/tests/testthat/test-spread2.R#L918) *style:* **Commas should always have a space after.**
```r
  expect_silent(spread2(landscape = landscape, spreadProb = spreadProb,start = start,
                                                                       ^
```


Copy the first `got` elements of `smpl` into `samples`. But since `smpl` contains `float` and `samples` contains `int16_t`, you need to copy it via a `for` loop and do the type conversion for each element, e.g.```
for( int i = 0; i < got; i++ ) {
    samples[i]=(int16_t) smpl[i];
}
```
or similar.


ty


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


Моя версия: первая строка это просто исходные данные:
List<Integer> integers = Arrays.asList(2, 3, 4, 5, 6);
        double asDouble = integers.stream().mapToInt(v -> v).average().getAsDouble();
        System.out.println(asDouble);


Но идея правильная.


Created multidev environment [rescue-x#jan-19](https://dashboard.pantheon.io/sites/c8430b75-4272-4aca-bfcd-206b12279315#jan-19).

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


Thanks @sentriz


Nice Commit!


@ryanbr


Hi! This is the friendly automated conda-forge-webservice.

I updated the Github team because of this commit.

- @mikaem was added to this feedstock maintenance team.

You should get push access to this feedstock and CI services.

Feel free to join the community [chat room](https://gitter.im/conda-forge/conda-forge.github.io).

NOTE: Please make sure to not push to the repository directly.
      Use branches in your fork for any changes and send a PR.
      More details [here](https://conda-forge.org/docs/conda-forge_gotchas.html#using-a-fork-vs-a-branch-when-updating-a-recipe)


changes in AddContainerContributionItems are for showing the items sorted in the Add submenu for root(elements)


I just noticed that there is another unnecessary cast involved: why not write directly into `frame->buf`:
```
for( int i = 0; i < got; i++ ) {
    frame->buf[i]=(pj_int16_t) smpl[i];
}
```
(Once it works, you can improve the performance of the loop by doing pointer arithmetic, but this comes second.)


Done


Interestingly, aggregated API servers route at the group/version boundary, so `acme.com/v1 Widget` and `acme.com/v2 Widget` could be handled by different servers. However, if those two versions are colocated in storage, both API servers must be aware of and able to convert between those versions.


Doing a `static_cast` in this function seems dangerous. This only converts the pointer type, but does not convert the values between different formats. You should probably do the same kind of conversion I proposed in `mediaPortGetFrame`.


У вас используется неэффективный алгоритм с двумя вложными циклами. Достаточно одного цикла и мапы Map<String, Integer> в которой ключ . - слово, а значение - счетчик количества


Successfully aliased the URL <https://project-number-1-3fu2uzsbp.now.sh> to the following aliases.

* https://mossystonenursery.ca
* https://www.mossystonenursery.ca


Created multidev environment [cms1b-drupal#ci-46](https://dashboard.pantheon.io/sites/b6bcbc0c-228f-47f2-9b4f-130be4f16f49#ci-46).

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


@hardikrakholiya You should be watching for if one or more of those services goes away too. In which case you'll want to stop the cibridge.


Тут не нужен вложный цикл; Можно сделать всего одним циклом.


Successfully aliased the URL <https://project-number-1-dkechmd2c.now.sh> to the following aliases.

* https://mossystonenursery.ca
* https://www.mossystonenursery.ca


appcompat-orig:appcompat


Added a comment.


QUIC team will need a function to return the stacktrace in the form of a std::string, is it possible to add it in this PR?


queue is executed after the for loop has finished. so need iife to cache the var i value. Will try to use let instead of iife.


Update pause & resume commands, add reaction as response to command


stratified_tank_refactor (nmerket) - x86_64-Linux-Ubuntu-18.04-gcc-7.3: OK (3105 of 3115 tests passed, 0 test warnings)

Messages:

 * 6 tests had: EIO diffs.
 * 6 tests had: ERR diffs.
 * 7 tests had: ESO big diffs.
 * 2 tests had: MTR big diffs.
 * 6 tests had: Table big diffs.
 * 1 test had: Table small diffs.

Failures:

EnergyPlusFixture Test Summary
 * Passed: 724
 * Failed: 1

integration Test Summary
 * Passed: 636
 * Failed: 2

regression Test Summary
 * Passed: 646
 * Failed: 7

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.png) ![Test Badge](http://img.shields.io/badge/tests%20passed-99.68%25-yellow.png)


iife to save i as k


Change initial volume value


Is this intentional (replacing markdown with html)?


`nav__main-menu ` - у тебя нет блока `nav`


@IlyaSergeyev could you please comment?


Congratulations!


This branch is in response to the links growing too large and filling the background with blue or red.
https://github.com/NetLogo/NetLogo/issues/1704#issue-405513365
I'm thinking of providing a bound for the value, but I need some input because it might not serve the models purpose.


LTC test there (rebased on current master): http://tests.stockfishchess.org/tests/view/5c54721b0ebc592fc7bb029d


I'll put out a release today, version bump to 2.5    I havent had time to keep up with the various gyrations of NetFx NetCore NetStandard and I see its still a bit of a mess.

Thankfully you guys have it covered.  Thanks so much to @moh-hassan and @ravenpride for this.


LTC test for mstembera, STC was there: http://tests.stockfishchess.org/tests/view/5c5414d00ebc592fc7bafa83


Э, а как же мой PR? 😯


stratified_tank_refactor (nmerket) - x86_64-Linux-Ubuntu-18.04-cppcheck-1.82: OK (0 of 0 tests passed, 0 test warnings)

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


typo


Cant be a blanket true, the only way to know now is to inspect the type and if it is ValueTuple then its true


Такой способ эквивалентен двум вложенным циклам. То что вы делаете через стримы, по факту цикл по всем элементам массива


My access


You are pushing commits at a very fast pace (accross the whole organization).
Due to that, we cannot deploy the commit 1b3000457af433c7e0bcd2f3142ff41fe7bbe6a5.

You can try again later or [upgrade](https://zeit.co/account/plan) your plan.


Click on slit to see the file side-by-side with changes.


I'm not sure that this is a simplification at all tbh.
we have 5 constants instead of 3 so in which way it's simplier?


LGTM


Hi,

Thanks for this, it didn't seem to shift it for Quasar 0.17.23... I'm still getting:

```
[Intervention] Ignored attempt to cancel a touchmove event with cancelable=false, for example because scrolling is in progress and cannot be interrupted.
```

Did you have any further joy?


Deployed at: https://alva-commits-d936a.surge.sh


update the FAQ command example for './tools/embeddings_to_torch.py', which now take '-emb_file_enc' and '-emb_file_dec' instead of a single '-emb_file' in previous version


good job


PrepFor910 (Myoldmopar) - x86_64-MacOS-10.13-clang: Tests Failed (2539 of 3075 tests passed, 100 test warnings)

Messages:

 * 633 tests had: EIO diffs.
 * 533 tests had: Table big diffs.
 * 5 tests had: ESO small diffs.
 * 1 test had: MTR small diffs.

Failures:

EnergyPlusFixture Test Summary
 * Passed: 722
 * Failed: 3

regression Test Summary
 * Passed: 100
 * Failed: 533

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.png) ![Test Badge](http://img.shields.io/badge/tests%20passed-82.57%25-red.png)


运行了一下 感觉有问题


Wouldn't that result in issue on openSUSE again?


Ahaha! Tu fais ton coming out vscode toi aussi ? 😋


Except in my PR for [endless-sky](https://github.com/endless-sky/endless-sky) it's 3 and 4 for Heliarchs, for obvious reasons.


You are right. . let me try again. . just a min.


<img src="https://i.imgur.com/WnPzklJ.jpg" />


What is the purpose of this line?


develop (Myoldmopar) - x86_64-MacOS-10.13-clang: OK (2442 of 2442 tests passed, 0 test warnings)

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


@bherr2 I am working on that currently.


Should this be changed to `allowedSHAFingerprints`? This matches with the fact that it's a List and removes the `1` since you're allowing SHA1 and SHA256.


Maybe change to `allowedSHAFingerprints` to show that it's a `List`?


google image


pour la vérification de l'offset j'ai pas trop le choix parce qu'il me faut une valeur de txt au départ qui dépend de la requête / par contre j'ai split en deux fonctions pour la lisibilité


for view to whoever has link


removed now


@ryanbr


3rd Commit


TeamCity Identity and Access Management / Build IdAM [Build 89-IDAM-24-Application-](https://teamcity.nice.org.uk/viewLog.html?buildId=49152&buildTypeId=IdentityandAccessManagement_BuildIdAM) outcome was **FAILURE**
Summary: Tests failed: 1 (1 new), passed: 1 Build time: 00:01:13
### Failed tests
```
src/App.test.js: Generic test suite failure: <no details avaliable>

```


Privet


This comment to the code below - we have only one  and the same `WindowingStrategy` for all output tags


TeamCity Identity and Access Management / Build IdAM [Build 90-IDAM-24-Application-](https://teamcity.nice.org.uk/viewLog.html?buildId=49153&buildTypeId=IdentityandAccessManagement_BuildIdAM) outcome was **FAILURE**
Summary: Tests failed: 1, passed: 1 Build time: 00:01:03
### Failed tests
```
src/App.test.js: Generic test suite failure: <no details avaliable>

```


Related to  #1395


IBM Cloud [toolchain](https://console.bluemix.net/devops/toolchains/26b97092-a63b-44f0-b975-5c72ad830eec?env_id=ibm%3Ayp%3Aus-south "CommunityDayTC"): [Delivery Pipeline](https://console.bluemix.net/devops/pipelines/df3ca16a-4f87-41af-8ab4-7c9f52863506?env_id=ibm%3Ayp%3Aus-south "BuildModel") deployed [CommunityDayML](https://github.com/tonye1/CommunityDayML/releases/tag/deploy-ibm-yp-us-south-tonye1-dev-20190201-164751 "deploy-ibm-yp-us-south-tonye1-dev-20190201-164751") to [dev](https://console.bluemix.net/apps/4308c60a-9be7-49d2-b51c-3aff3385c61e?env_id=ibm:yp:us-south "ibm:yp:us-south:tonye1:dev"), including this commit


This is a test for the tutorial.


Successfully aliased the URL <https://melbourne-dibzvdn1p.now.sh> to the following alias.

* https://fresh-as.now.sh


Hi,
I just updated my Dafang.
Anyway position is reset after a powercycle so that I'm obliged to recalibrate on each powercycle.

How to solve the issue?

Thanks
Armando

P.s. What do you mean by PTZ presets? I'm currently using just TinyCamMonitor to control the camera.


EZAZ!


Created multidev environment [rescue-x#jan-19](https://dashboard.pantheon.io/sites/c8430b75-4272-4aca-bfcd-206b12279315#jan-19).

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


Coucou,
J'ai pas accès a mon pc de tout le weekend.
Qu'as tu fais ?

Le ven. 1 févr. 2019 à 17:26, Geraud-Vercasson <notifications@github.com> a
écrit :

> N'y voir aucun jugement ;)
>
> —
> You are receiving this because you commented.
> Reply to this email directly, view it on GitHub
> <https://github.com/cmerjm/cmerjm.github.io/commit/05d746abd9cd3afcdcd9d2dabdf9920fe008e397#commitcomment-32148947>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/As-I-vrUM6uvVvBin11kz4us9IesZmpvks5vJGrLgaJpZM4acL6b>
> .
>


TeamCity Identity and Access Management / Build IdAM [Build 91-IDAM-24-Application-](https://teamcity.nice.org.uk/viewLog.html?buildId=49155&buildTypeId=IdentityandAccessManagement_BuildIdAM) outcome was **FAILURE**
Summary: Tests failed: 3 (3 new), passed: 2; unable to create or deploy release. Please check the build log for details on the error. (new) Build time: 00:01:58
### Failed tests
```
Test collection for NICE.Identity.Test.IntegrationTests.AuditTests (1): NICE.Identity.Test.IntegrationTests.AuditTests.GetAudit: <no details avaliable>

Test collection for NICE.Identity.Test.IntegrationTests.HomeTests (1): NICE.Identity.Test.IntegrationTests.HomeTests.GetHomepage: <no details avaliable>

Test collection for NICE.Identity.Test.IntegrationTests.DatabaseTests (1): NICE.Identity.Test.IntegrationTests.DatabaseTests.WriteEntry: <no details avaliable>

```


Successfully aliased the URL <https://hush-hush-27j0r1uj8.now.sh> to the following alias.

* https://hush-hush.now.sh


I think your correct with the switiching time idea, i removed it as it seemed to be covered by the whole midcycle check that it is part of, and the delay would only delay the hoppers reaction time. I'll add it commented out at the end of the act function.


![](https://github.trello.services/images/mini-trello-icon.png) [ETQJ j'aimerais interagir avec les points de ressources pour collecter des ressources](https://trello.com/c/aXglyl4V/10-etqj-jaimerais-interagir-avec-les-points-de-ressources-pour-collecter-des-ressources)


TeamCity Identity and Access Management / Build IdAM [Build 92-IDAM-24-Application-](https://teamcity.nice.org.uk/viewLog.html?buildId=49156&buildTypeId=IdentityandAccessManagement_BuildIdAM) outcome was **FAILURE**
Summary: Tests failed: 3, passed: 2; unable to create or deploy release. Please check the build log for details on the error. Build time: 00:01:36
### Failed tests
```
Test collection for NICE.Identity.Test.IntegrationTests.AuditTests (1): NICE.Identity.Test.IntegrationTests.AuditTests.GetAudit: <no details avaliable>

Test collection for NICE.Identity.Test.IntegrationTests.DatabaseTests (1): NICE.Identity.Test.IntegrationTests.DatabaseTests.WriteEntry: <no details avaliable>

Test collection for NICE.Identity.Test.IntegrationTests.HomeTests (1): NICE.Identity.Test.IntegrationTests.HomeTests.GetHomepage: <no details avaliable>

```


Yeah i agree, I'll add it.


k


sf commit. 2019.2.1