[R/chooseName.R:11:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/chooseName.R#L11) *style:* **Variable or function name should be snake_case.**
```r
equivalentName <- function(value, df, column) {
^~~~~~~~~~~~~~
```
[R/chooseName.R:13:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/chooseName.R#L13) *style:* **Variable or function name should be snake_case.**
```r
  likelyMatch <- which.max(unlist(lapply(out, function(x) sum(!is.na(x)))))
  ^~~~~~~~~~~
```
[R/cleanLandWebStudyArea.R:10:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/cleanLandWebStudyArea.R#L10) *style:* **Variable or function name should be snake_case.**
```r
.cleanLandWebStudyArea <- function(poly, minFRI = 40) {
^~~~~~~~~~~~~~~~~~~~~~
```
[R/cleanLandWebStudyArea.R:10:42:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/cleanLandWebStudyArea.R#L10) *style:* **Variable or function name should be snake_case.**
```r
.cleanLandWebStudyArea <- function(poly, minFRI = 40) {
                                         ^~~~~~
```
[R/cleanLandWebStudyArea.R:12:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/cleanLandWebStudyArea.R#L12) *warning:* **no visible global function definition for ‘createPrjFile’**
```r
    createPrjFile(poly)
    ^~~~~~~~~~~~~
```
[R/cleanLandWebStudyArea.R:19:10:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/cleanLandWebStudyArea.R#L19) *style:* **Variable or function name should be snake_case.**
```r
    poly$LTHRC <- poly$LTHFC
         ^~~~~
```
[R/cleanLandWebStudyArea.R:20:10:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/cleanLandWebStudyArea.R#L20) *style:* **Variable or function name should be snake_case.**
```r
    poly$LTHFC <- NULL
         ^~~~~
```
[R/cleanLandWebStudyArea.R:24:10:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/cleanLandWebStudyArea.R#L24) *style:* **Variable or function name should be snake_case.**
```r
    poly$fireReturnInterval <- poly$LTHRC
         ^~~~~~~~~~~~~~~~~~
```
[R/cleanLandWebStudyArea.R:25:10:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/cleanLandWebStudyArea.R#L25) *style:* **Variable or function name should be snake_case.**
```r
    poly$LTHRC <- NULL
         ^~~~~
```
[R/gis.R:12:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L12) *style:* **Variable or function name should be snake_case.**
```r
createPrjFile <- function(shpFile,
^~~~~~~~~~~~~
```
[R/gis.R:12:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L12) *style:* **Variable or function name should be snake_case.**
```r
createPrjFile <- function(shpFile,
                          ^~~~~~~
```
[R/gis.R:13:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L13) *style:* **Lines should not be more than 80 characters.**
```r
                          urlForProj = "http://spatialreference.org/ref/epsg/nad83-utm-zone-11n/prj/") {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/gis.R:13:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L13) *style:* **Variable or function name should be snake_case.**
```r
                          urlForProj = "http://spatialreference.org/ref/epsg/nad83-utm-zone-11n/prj/") {
                          ^~~~~~~~~~
```
[R/gis.R:14:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L14) *style:* **Variable or function name should be snake_case.**
```r
  basenameWithoutExt <- file_path_sans_ext(shpFile)
  ^~~~~~~~~~~~~~~~~~
```
[R/gis.R:14:25:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L14) *warning:* **no visible global function definition for ‘file_path_sans_ext’**
```r
  basenameWithoutExt <- file_path_sans_ext(shpFile)
                        ^~~~~~~~~~~~~~~~~~
```
[R/gis.R:15:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L15) *style:* **Variable or function name should be snake_case.**
```r
  basenameWithoutExt <- basenameWithoutExt[-length(basenameWithoutExt)]
  ^~~~~~~~~~~~~~~~~~
```
[R/gis.R:16:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L16) *style:* **Variable or function name should be snake_case.**
```r
  prjFile <- paste0(basenameWithoutExt, ".prj")
  ^~~~~~~
```
[R/gis.R:34:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L34) *style:* **Variable or function name should be snake_case.**
```r
polygonClean <- function(poly, fn = NULL, type = NULL, ...) {
^~~~~~~~~~~~
```
[R/gis.R:59:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L59) *style:* **Variable or function name should be snake_case.**
```r
factorValues2 <- function(x, v, layer, att, append.names, na.rm = FALSE) {
^~~~~~~~~~~~~
```
[R/gis.R:59:45:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L59) *style:* **Variable or function name should be snake_case.**
```r
factorValues2 <- function(x, v, layer, att, append.names, na.rm = FALSE) {
                                            ^~~~~~~~~~~~
```
[R/gis.R:59:59:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L59) *style:* **Variable or function name should be snake_case.**
```r
factorValues2 <- function(x, v, layer, att, append.names, na.rm = FALSE) {
                                                          ^~~~~
```
[R/gis.R:94:36:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L94) *style:* **Variable or function name should be snake_case.**
```r
          definition = function(x, studyArea, ...) {
                                   ^~~~~~~~~
```
[R/gis.R:107:36:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L107) *style:* **Variable or function name should be snake_case.**
```r
          definition = function(x, studyArea, rasterToMatch, ...) {
                                   ^~~~~~~~~
```
[R/gis.R:107:47:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L107) *style:* **Variable or function name should be snake_case.**
```r
          definition = function(x, studyArea, rasterToMatch, ...) {
                                              ^~~~~~~~~~~~~
```
[R/gis.R:108:13:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L108) *style:* **Variable or function name should be snake_case.**
```r
            numPolys <- length(x)
            ^~~~~~~~
```
[R/gis.R:109:13:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L109) *style:* **Variable or function name should be snake_case.**
```r
            xDF <- as.data.frame(x)
            ^~~
```
[R/gis.R:110:15:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L110) *style:* **Variable or function name should be snake_case.**
```r
            x$numPolys <- seq_len(numPolys)
              ^~~~~~~~
```
[R/gis.R:111:13:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/gis.R#L111) *style:* **Variable or function name should be snake_case.**
```r
            xDF <- data.frame(ID = x$numPolys, xDF)
            ^~~
```
[R/helpers.R:6:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/helpers.R#L6) *style:* **Variable or function name should be snake_case.**
```r
toSentenceCase <- function(x) {
^~~~~~~~~~~~~~
```
[R/helpers.R:7:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/helpers.R#L7) *style:* **Variable or function name should be snake_case.**
```r
  newNames <- tolower(x)
  ^~~~~~~~
```
[R/MapOrDoCall.R:10:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L10) *style:* **Variable or function name should be snake_case.**
```r
optimalClusterNum <- function(memRequiredMB = 500, maxNumClusters = 1) {
^~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:10:31:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L10) *style:* **Variable or function name should be snake_case.**
```r
optimalClusterNum <- function(memRequiredMB = 500, maxNumClusters = 1) {
                              ^~~~~~~~~~~~~
```
[R/MapOrDoCall.R:10:52:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L10) *style:* **Variable or function name should be snake_case.**
```r
optimalClusterNum <- function(memRequiredMB = 500, maxNumClusters = 1) {
                                                   ^~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:12:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L12) *style:* **Variable or function name should be snake_case.**
```r
    detectedNumCores <- parallel::detectCores()
    ^~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:13:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L13) *style:* **Variable or function name should be snake_case.**
```r
    shouldUseCluster <- (maxNumClusters > 0)
    ^~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:20:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L20) *style:* **Variable or function name should be snake_case.**
```r
        availMem <- as.numeric(bb[[1]][nzchar(bb[[1]])][7]) # 'available' column
        ^~~~~~~~
```
[R/MapOrDoCall.R:21:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L21) *style:* **Variable or function name should be snake_case.**
```r
        numClusters <- floor(min(detectedNumCores, availMem / memRequiredMB))
        ^~~~~~~~~~~
```
[R/MapOrDoCall.R:24:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L24) *style:* **Variable or function name should be snake_case.**
```r
        numClusters <- 1
        ^~~~~~~~~~~
```
[R/MapOrDoCall.R:26:7:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L26) *style:* **Variable or function name should be snake_case.**
```r
      numClusters <- min(maxNumClusters, numClusters, detectedNumCores)
      ^~~~~~~~~~~
```
[R/MapOrDoCall.R:28:7:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L28) *style:* **Variable or function name should be snake_case.**
```r
      numClusters <- 1
      ^~~~~~~~~~~
```
[R/MapOrDoCall.R:32:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L32) *style:* **Variable or function name should be snake_case.**
```r
    numClusters <- 1
    ^~~~~~~~~~~
```
[R/MapOrDoCall.R:54:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L54) *style:* **Lines should not be more than 80 characters.**
```r
makeOptimalCluster <- function(useParallel = getOption("pemisc.useParallel", FALSE),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:54:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L54) *style:* **Variable or function name should be snake_case.**
```r
makeOptimalCluster <- function(useParallel = getOption("pemisc.useParallel", FALSE),
^~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:54:32:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L54) *style:* **Variable or function name should be snake_case.**
```r
makeOptimalCluster <- function(useParallel = getOption("pemisc.useParallel", FALSE),
                               ^~~~~~~~~~~
```
[R/MapOrDoCall.R:55:32:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L55) *style:* **Variable or function name should be snake_case.**
```r
                               MBper = 5e2,
                               ^~~~~
```
[R/MapOrDoCall.R:56:32:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L56) *style:* **Variable or function name should be snake_case.**
```r
                               maxNumClusters = parallel::detectCores(), ...) {
                               ^~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:58:32:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L58) *style:* **Variable or function name should be snake_case.**
```r
  if (is.null(maxNumClusters)) maxNumClusters = parallel::detectCores()
                               ^~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:58:47:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L58) *style:* **Use <-, not =, for assignment.**
```r
  if (is.null(maxNumClusters)) maxNumClusters = parallel::detectCores()
                                              ^
```
[R/MapOrDoCall.R:61:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L61) *style:* **Variable or function name should be snake_case.**
```r
    numClus <- if (isTRUE(useParallel)) {
    ^~~~~~~
```
[R/MapOrDoCall.R:62:7:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L62) *style:* **Variable or function name should be snake_case.**
```r
      numClus <- optimalClusterNum(MBper, maxNumClusters = maxNumClusters)
      ^~~~~~~
```
[R/MapOrDoCall.R:62:18:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L62) *warning:* **no visible global function definition for ‘optimalClusterNum’**
```r
      numClus <- optimalClusterNum(MBper, maxNumClusters = maxNumClusters)
                 ^~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:64:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L64) *style:* **Variable or function name should be snake_case.**
```r
        numClus <- NULL
        ^~~~~~~
```
[R/MapOrDoCall.R:72:13:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L72) *warning:* **no visible global function definition for ‘makeForkClusterRandom’**
```r
      cl <- makeForkClusterRandom(numClus, ...)
            ^~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:91:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L91) *style:* **Variable or function name should be snake_case.**
```r
makeForkClusterRandom <- function(..., iseed = NULL) {
^~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:96:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L96) *warning:* **no visible global function definition for ‘checkPath’**
```r
  checkPath(dirname(dots$outfile), create = TRUE)
  ^~~~~~~~~
```
[R/MapOrDoCall.R:98:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L98) *style:* **Lines should not be more than 80 characters.**
```r
    cat(file = dots$outfile, "------------------------------------------------------------")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:99:17:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L99) *warning:* **no visible binding for global variable ‘makeForkCluster’**
```r
  cl <- do.call(makeForkCluster, args = dots)
                ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:100:52:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L100) *style:* **Commas should always have a space after.**
```r
  message("  Starting a cluster with ", length(cl)," threads")
                                                   ^
```
[R/MapOrDoCall.R:101:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L101) *style:* **Lines should not be more than 80 characters.**
```r
  message("    Log file is ", dots$outfile, ". To prevent log file, pass outfile = ''")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:102:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L102) *warning:* **no visible global function definition for ‘clusterSetRNGStream’**
```r
  clusterSetRNGStream(cl, iseed = iseed)
  ^~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:128:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L128) *style:* **Variable or function name should be snake_case.**
```r
getLocalArgsFor <- function(fn, localFormalArgs, envir, dots) {
^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:128:33:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L128) *style:* **Variable or function name should be snake_case.**
```r
getLocalArgsFor <- function(fn, localFormalArgs, envir, dots) {
                                ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:133:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L133) *style:* **Variable or function name should be snake_case.**
```r
    localFormalArgs <- ls(envir = envir)
    ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:145:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L145) *style:* **Variable or function name should be snake_case.**
```r
  localFormals <- if (length(fn) > 1) {
  ^~~~~~~~~~~~
```
[R/MapOrDoCall.R:153:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L153) *style:* **Variable or function name should be snake_case.**
```r
  objsFromLocal <- mget(localFormals, envir = envir)
  ^~~~~~~~~~~~~
```
[R/MapOrDoCall.R:182:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L182) *style:* **Variable or function name should be snake_case.**
```r
identifyVectorArgs <- function(fn, localFormalArgs, envir, dots) {
^~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:182:36:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L182) *style:* **Variable or function name should be snake_case.**
```r
identifyVectorArgs <- function(fn, localFormalArgs, envir, dots) {
                                   ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:183:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L183) *style:* **Variable or function name should be snake_case.**
```r
  allArgs <- getLocalArgsFor(fn, localFormalArgs, envir = envir, dots = dots)
  ^~~~~~~
```
[R/MapOrDoCall.R:183:14:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L183) *warning:* **no visible global function definition for ‘getLocalArgsFor’**
```r
  allArgs <- getLocalArgsFor(fn, localFormalArgs, envir = envir, dots = dots)
             ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:186:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L186) *style:* **Lines should not be more than 80 characters.**
```r
  specialTypes = c("environment", "SpatialPolygons", "RasterLayer", "RasterStack", "RasterBrick")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:186:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L186) *style:* **Variable or function name should be snake_case.**
```r
  specialTypes = c("environment", "SpatialPolygons", "RasterLayer", "RasterStack", "RasterBrick")
  ^~~~~~~~~~~~
```
[R/MapOrDoCall.R:186:16:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L186) *style:* **Use <-, not =, for assignment.**
```r
  specialTypes = c("environment", "SpatialPolygons", "RasterLayer", "RasterStack", "RasterBrick")
               ^
```
[R/MapOrDoCall.R:187:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L187) *style:* **Lines should not be more than 80 characters.**
```r
  lengthOne <- unlist(lapply(allArgs, is.null)) | unlist(lapply(allArgs, function(x) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:187:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L187) *style:* **Variable or function name should be snake_case.**
```r
  lengthOne <- unlist(lapply(allArgs, is.null)) | unlist(lapply(allArgs, function(x) {
  ^~~~~~~~~
```
[R/MapOrDoCall.R:194:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L194) *style:* **Variable or function name should be snake_case.**
```r
    argsSingle <- allArgs[lengthOne]
    ^~~~~~~~~~
```
[R/MapOrDoCall.R:195:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L195) *style:* **Variable or function name should be snake_case.**
```r
    argsMulti <- allArgs[!lengthOne]
    ^~~~~~~~~
```
[R/MapOrDoCall.R:197:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L197) *style:* **Variable or function name should be snake_case.**
```r
    argsSingle <- list()
    ^~~~~~~~~~
```
[R/MapOrDoCall.R:198:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L198) *style:* **Variable or function name should be snake_case.**
```r
    argsMulti <- allArgs
    ^~~~~~~~~
```
[R/MapOrDoCall.R:223:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L223) *style:* **Variable or function name should be snake_case.**
```r
MapOrDoCall <- function(fn, multiple, single, useCache, cl = NULL) {
^~~~~~~~~~~
```
[R/MapOrDoCall.R:223:47:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L223) *style:* **Variable or function name should be snake_case.**
```r
MapOrDoCall <- function(fn, multiple, single, useCache, cl = NULL) {
                                              ^~~~~~~~
```
[R/MapOrDoCall.R:232:20:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L232) *warning:* **no visible binding for global variable ‘Cache’**
```r
    obj <- do.call(Cache, args = append(list(fn), single))
                   ^~~~~
```
[R/MapOrDoCall.R:248:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L248) *style:* **Variable or function name should be snake_case.**
```r
Map2 <- function(..., cl = NULL) {
^~~~
```
[R/MapOrDoCall.R:250:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L250) *style:* **Variable or function name should be snake_case.**
```r
  formsMap <- fnicd(mapply, ...)
  ^~~~~~~~
```
[R/MapOrDoCall.R:251:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L251) *style:* **Variable or function name should be snake_case.**
```r
  formsClusterMap <- fnicd(clusterMap, ...)
  ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:251:28:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L251) *warning:* **no visible binding for global variable ‘clusterMap’**
```r
  formsClusterMap <- fnicd(clusterMap, ...)
                           ^~~~~~~~~~
```
[R/MapOrDoCall.R:253:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L253) *style:* **Variable or function name should be snake_case.**
```r
    argList <- list(...)
    ^~~~~~~
```
[R/MapOrDoCall.R:254:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L254) *style:* **Variable or function name should be snake_case.**
```r
    wrongFun1 <- "fun" %in% names(argList)
    ^~~~~~~~~
```
[R/MapOrDoCall.R:258:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L258) *style:* **Variable or function name should be snake_case.**
```r
    wrongFun2 <- "FUN" %in% names(argList)
    ^~~~~~~~~
```
[R/MapOrDoCall.R:268:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L268) *style:* **Variable or function name should be snake_case.**
```r
    argList <- list(...)
    ^~~~~~~
```
[R/MapOrDoCall.R:269:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L269) *style:* **Variable or function name should be snake_case.**
```r
    wrongFun1 <- "f" %in% names(argList)
    ^~~~~~~~~
```
[R/MapOrDoCall.R:273:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L273) *style:* **Variable or function name should be snake_case.**
```r
    wrongFun2 <- "FUN" %in% names(argList)
    ^~~~~~~~~
```
[R/MapOrDoCall.R:281:13:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/MapOrDoCall.R#L281) *warning:* **no visible binding for global variable ‘clusterMap’**
```r
    do.call(clusterMap, append(list(cl = cl), argList))
            ^~~~~~~~~~
```
[R/maps.R:20:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L20) *style:* **Variable or function name should be snake_case.**
```r
defineFlammable <- function(LandCoverClassifiedMap = NULL,
^~~~~~~~~~~~~~~
```
[R/maps.R:20:29:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L20) *style:* **Variable or function name should be snake_case.**
```r
defineFlammable <- function(LandCoverClassifiedMap = NULL,
                            ^~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:21:29:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L21) *style:* **Variable or function name should be snake_case.**
```r
                            nonFlammClasses = c(36L, 37L, 38L, 39L),
                            ^~~~~~~~~~~~~~~
```
[R/maps.R:31:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L31) *style:* **Lines should not be more than 80 characters.**
```r
    stop("Need nonFlammClasses, which are the classes that cannot burn in the LandCoverClassifiedMap")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:33:15:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L33) *warning:* **no visible global function definition for ‘minValue’**
```r
  oldClass <- minValue(LandCoverClassifiedMap):maxValue(LandCoverClassifiedMap)
              ^~~~~~~~
```
[R/maps.R:33:48:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L33) *warning:* **no visible global function definition for ‘maxValue’**
```r
  oldClass <- minValue(LandCoverClassifiedMap):maxValue(LandCoverClassifiedMap)
                                               ^~~~~~~~
```
[R/maps.R:34:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L34) *style:* **Lines should not be more than 80 characters.**
```r
  newClass <- ifelse(oldClass %in% nonFlammClasses, 0L, 1L) ## NOTE: 0 codes for NON-flammable
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:34:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L34) *style:* **Variable or function name should be snake_case.**
```r
  newClass <- ifelse(oldClass %in% nonFlammClasses, 0L, 1L) ## NOTE: 0 codes for NON-flammable
  ^~~~~~~~
```
[R/maps.R:36:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L36) *style:* **Variable or function name should be snake_case.**
```r
  flammableTable <- cbind(oldClass, newClass)
  ^~~~~~~~~~~~~~
```
[R/maps.R:38:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L38) *style:* **Variable or function name should be snake_case.**
```r
  rstFlammable <- ratify(reclassify(LandCoverClassifiedMap, flammableTable))
  ^~~~~~~~~~~~
```
[R/maps.R:38:19:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L38) *warning:* **no visible global function definition for ‘ratify’**
```r
  rstFlammable <- ratify(reclassify(LandCoverClassifiedMap, flammableTable))
                  ^~~~~~
```
[R/maps.R:38:26:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L38) *warning:* **no visible global function definition for ‘reclassify’**
```r
  rstFlammable <- ratify(reclassify(LandCoverClassifiedMap, flammableTable))
                         ^~~~~~~~~~
```
[R/maps.R:40:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L40) *style:* **Lines should not be more than 80 characters.**
```r
    rstFlammable <- writeRaster(rstFlammable, filename = filename2, overwrite = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:40:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L40) *style:* **Variable or function name should be snake_case.**
```r
    rstFlammable <- writeRaster(rstFlammable, filename = filename2, overwrite = TRUE)
    ^~~~~~~~~~~~
```
[R/maps.R:42:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L42) *warning:* **no visible global function definition for ‘setColors<-’**
```r
  setColors(rstFlammable, n = 2) <- colorRampPalette(c("blue", "red"))(2)
  ^~~~~~~~~
```
[R/maps.R:61:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L61) *style:* **Variable or function name should be snake_case.**
```r
prepInputsLCC <- function(year = 2005,
^~~~~~~~~~~~~
```
[R/maps.R:62:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L62) *style:* **Variable or function name should be snake_case.**
```r
                          destinationPath = ".",
                          ^~~~~~~~~~~~~~~
```
[R/maps.R:63:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L63) *style:* **Variable or function name should be snake_case.**
```r
                          studyArea = NULL,
                          ^~~~~~~~~
```
[R/maps.R:64:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L64) *style:* **Variable or function name should be snake_case.**
```r
                          rasterToMatch = NULL,
                          ^~~~~~~~~~~~~
```
[R/maps.R:70:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L70) *style:* **Lines should not be more than 80 characters.**
```r
      url <- "ftp://ftp.ccrs.nrcan.gc.ca/ad/NLCCLandCover/LandcoverCanada2005_250m/LandCoverOfCanada2005_V1_4.zip"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:71:7:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L71) *style:* **Variable or function name should be snake_case.**
```r
      LCCfilename <- asPath("LCC2005_V1_4a.tif")
      ^~~~~~~~~~~
```
[R/maps.R:71:22:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L71) *warning:* **no visible global function definition for ‘asPath’**
```r
      LCCfilename <- asPath("LCC2005_V1_4a.tif")
                     ^~~~~~
```
[R/maps.R:73:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L73) *style:* **Lines should not be more than 80 characters.**
```r
      stop("don't have the url for LCC2010 yet. Please find it and pass it as url = 'TheFTPAddress'")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:102:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L102) *style:* **Variable or function name should be snake_case.**
```r
makeVegTypeMap <- function(speciesStack, vegLeadingProportion, mixed = TRUE) {
^~~~~~~~~~~~~~
```
[R/maps.R:102:28:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L102) *style:* **Variable or function name should be snake_case.**
```r
makeVegTypeMap <- function(speciesStack, vegLeadingProportion, mixed = TRUE) {
                           ^~~~~~~~~~~~
```
[R/maps.R:102:42:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L102) *style:* **Variable or function name should be snake_case.**
```r
makeVegTypeMap <- function(speciesStack, vegLeadingProportion, mixed = TRUE) {
                                         ^~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:103:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L103) *style:* **Variable or function name should be snake_case.**
```r
  sumVegPct <- sum(speciesStack, na.rm = TRUE)
  ^~~~~~~~~
```
[R/maps.R:105:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L105) *style:* **Lines should not be more than 80 characters.**
```r
  # create "mixed" layer, which is given a value slightly higher than any other layer
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:107:16:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L107) *style:* **Variable or function name should be snake_case.**
```r
  speciesStack$Mixed <- all(speciesStack / sumVegPct < vegLeadingProportion) *
               ^~~~~
```
[R/maps.R:109:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L109) *style:* **Variable or function name should be snake_case.**
```r
  vegTypeMap <- raster::which.max(speciesStack)
  ^~~~~~~~~~
```
[R/maps.R:110:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L110) *style:* **Variable or function name should be snake_case.**
```r
  layerNames <- names(speciesStack)
  ^~~~~~~~~~
```
[R/maps.R:112:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L112) *style:* **Lines should not be more than 80 characters.**
```r
  levels(vegTypeMap) <- data.frame(ID = seq(layerNames), Species = names(layerNames))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:147:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L147) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea, sppNameVector,
^~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:147:34:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L147) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea, sppNameVector,
                                 ^~~~~
```
[R/maps.R:147:41:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L147) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea, sppNameVector,
                                        ^~~~~~~~~~~~~
```
[R/maps.R:147:56:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L147) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea, sppNameVector,
                                                       ^~~~~~~~~
```
[R/maps.R:147:67:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L147) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea, sppNameVector,
                                                                  ^~~~~~~~~~~~~
```
[R/maps.R:148:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L148) *style:* **Lines should not be more than 80 characters.**
```r
                                 speciesEquivalency, knnNamesCol, sppEndNamesCol,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:148:34:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L148) *style:* **Variable or function name should be snake_case.**
```r
                                 speciesEquivalency, knnNamesCol, sppEndNamesCol,
                                 ^~~~~~~~~~~~~~~~~~
```
[R/maps.R:148:54:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L148) *style:* **Variable or function name should be snake_case.**
```r
                                 speciesEquivalency, knnNamesCol, sppEndNamesCol,
                                                     ^~~~~~~~~~~
```
[R/maps.R:148:67:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L148) *style:* **Variable or function name should be snake_case.**
```r
                                 speciesEquivalency, knnNamesCol, sppEndNamesCol,
                                                                  ^~~~~~~~~~~~~~
```
[R/maps.R:149:34:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L149) *style:* **Variable or function name should be snake_case.**
```r
                                 sppMerge = NULL, thresh = 1, url, ...) {
                                 ^~~~~~~~
```
[R/maps.R:153:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L153) *style:* **Variable or function name should be snake_case.**
```r
    cachePath <- dots$cachePath
    ^~~~~~~~~
```
[R/maps.R:155:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L155) *style:* **Variable or function name should be snake_case.**
```r
    cachePath <- getOption("reproducible.cachePath")
    ^~~~~~~~~
```
[R/maps.R:159:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L159) *style:* **Variable or function name should be snake_case.**
```r
  outPreProcess <- preProcess(targetFile = file.path(dPath, "kNN-Species.tar"),
  ^~~~~~~~~~~~~
```
[R/maps.R:164:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L164) *style:* **Variable or function name should be snake_case.**
```r
  allSpp <- Cache(untar, tarfile = outPreProcess$targetFilePath, list = TRUE)
  ^~~~~~
```
[R/maps.R:164:13:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L164) *warning:* **no visible global function definition for ‘Cache’**
```r
  allSpp <- Cache(untar, tarfile = outPreProcess$targetFilePath, list = TRUE)
            ^~~~~
```
[R/maps.R:165:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L165) *style:* **Variable or function name should be snake_case.**
```r
  allSpp <- allSpp %>%
  ^~~~~~
```
[R/maps.R:173:7:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L173) *style:* **Variable or function name should be snake_case.**
```r
      sppNameVector <- allSpp
      ^~~~~~~~~~~~~
```
[R/maps.R:176:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L176) *style:* **Lines should not be more than 80 characters.**
```r
  kNNnames <- as.character(equivalentName(sppNameVector, speciesEquivalency, column = knnNamesCol))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:176:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L176) *style:* **Variable or function name should be snake_case.**
```r
  kNNnames <- as.character(equivalentName(sppNameVector, speciesEquivalency, column = knnNamesCol))
  ^~~~~~~~
```
[R/maps.R:176:28:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L176) *warning:* **no visible global function definition for ‘equivalentName’**
```r
  kNNnames <- as.character(equivalentName(sppNameVector, speciesEquivalency, column = knnNamesCol))
                           ^~~~~~~~~~~~~~
```
[R/maps.R:180:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L180) *style:* **Lines should not be more than 80 characters.**
```r
    warning(paste0("Can't find ", sppNameVector[is.na(kNNnames)], " in `speciesEquivalency$",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:181:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L181) *style:* **Lines should not be more than 80 characters.**
```r
            knnNamesCol, ".\n Will use remaining matching species, but check if this is correct"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:183:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L183) *style:* **Variable or function name should be snake_case.**
```r
    kNNnames <- kNNnames[!is.na(kNNnames)]
    ^~~~~~~~
```
[R/maps.R:184:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L184) *style:* **Variable or function name should be snake_case.**
```r
    sppNameVector <- sppNameVector[!is.na(kNNnames)]
    ^~~~~~~~~~~~~
```
[R/maps.R:189:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L189) *style:* **Lines should not be more than 80 characters.**
```r
    warning(paste0("Can't find ", sppNameVector[is.na(kNNnames)], " in kNN database.\n",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:190:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L190) *style:* **Lines should not be more than 80 characters.**
```r
                   "Will use remaining matching species, but check if this is correct."))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:191:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L191) *style:* **Variable or function name should be snake_case.**
```r
    kNNnames <- kNNnames[kNNnames %in% allSpp]
    ^~~~~~~~
```
[R/maps.R:192:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L192) *style:* **Variable or function name should be snake_case.**
```r
    sppNameVector <- sppNameVector[kNNnames %in% allSpp]
    ^~~~~~~~~~~~~
```
[R/maps.R:197:25:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L197) *warning:* **no visible global function definition for ‘ncell’, Did you mean 'call'?**
```r
    paste0(as.character(ncell(rasterToMatch)), "px")
                        ^~~~~
```
[R/maps.R:204:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L204) *style:* **Variable or function name should be snake_case.**
```r
  targetFiles <- paste0("NFI_MODIS250m_kNN_Species_", kNNnames, "_v0.tif")
  ^~~~~~~~~~~
```
[R/maps.R:207:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L207) *style:* **Lines should not be more than 80 characters.**
```r
                    archive2 = paste0("NFI_MODIS250m_kNN_Species_", kNNnames, "_v0.zip"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:210:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L210) *style:* **Variable or function name should be snake_case.**
```r
  postProcessedFilenames <- .suffix(targetFiles, suffix = suffix)
  ^~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:210:29:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L210) *warning:* **no visible global function definition for ‘.suffix’, Did you mean 'suffix'?**
```r
  postProcessedFilenames <- .suffix(targetFiles, suffix = suffix)
                            ^~~~~~~
```
[R/maps.R:212:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L212) *style:* **Variable or function name should be snake_case.**
```r
  speciesLayers <- Map(targetFile = targetFiles, archive = archives,
  ^~~~~~~~~~~~~
```
[R/maps.R:231:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L231) *style:* **Lines should not be more than 80 characters.**
```r
    sppMerge <- lapply(sppMerge, FUN = function(x) equivalentName(x, speciesEquivalency,  column = knnNamesCol))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:231:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L231) *style:* **Variable or function name should be snake_case.**
```r
    sppMerge <- lapply(sppMerge, FUN = function(x) equivalentName(x, speciesEquivalency,  column = knnNamesCol))
    ^~~~~~~~
```
[R/maps.R:231:52:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L231) *warning:* **no visible global function definition for ‘equivalentName’**
```r
    sppMerge <- lapply(sppMerge, FUN = function(x) equivalentName(x, speciesEquivalency,  column = knnNamesCol))
                                                   ^~~~~~~~~~~~~~
```
[R/maps.R:232:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L232) *style:* **Lines should not be more than 80 characters.**
```r
    names(sppMerge) <- equivalentName(names(sppMerge), speciesEquivalency,  column = sppEndNamesCol)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:232:24:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L232) *warning:* **no visible global function definition for ‘equivalentName’**
```r
    names(sppMerge) <- equivalentName(names(sppMerge), speciesEquivalency,  column = sppEndNamesCol)
                       ^~~~~~~~~~~~~~
```
[R/maps.R:235:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L235) *style:* **Lines should not be more than 80 characters.**
```r
    sppMerge <- sppMerge[sapply(sppMerge, FUN = function(x) all(x %in% names(speciesLayers)))]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:235:5:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L235) *style:* **Variable or function name should be snake_case.**
```r
    sppMerge <- sppMerge[sapply(sppMerge, FUN = function(x) all(x %in% names(speciesLayers)))]
    ^~~~~~~~
```
[R/maps.R:239:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L239) *style:* **Variable or function name should be snake_case.**
```r
        sumSpecies <- sppMerge[[i]]
        ^~~~~~~~~~
```
[R/maps.R:240:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L240) *style:* **Variable or function name should be snake_case.**
```r
        newLayerName <- names(sppMerge)[i]
        ^~~~~~~~~~~~
```
[R/maps.R:242:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L242) *style:* **Lines should not be more than 80 characters.**
```r
        fname <- .suffix(file.path(dPath, paste0("kNN", newLayerName, ".tif")), suffix)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:242:18:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L242) *warning:* **no visible global function definition for ‘.suffix’, Did you mean 'suffix'?**
```r
        fname <- .suffix(file.path(dPath, paste0("kNN", newLayerName, ".tif")), suffix)
                 ^~~~~~~
```
[R/maps.R:248:14:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L248) *warning:* **no visible global function definition for ‘raster’, Did you mean 'paste'?**
```r
        a <- raster(fname) ## ensure a gets a filename
             ^~~~~~
```
[R/maps.R:257:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L257) *style:* **Lines should not be more than 80 characters.**
```r
  ## Rename species layers - note: merged species were renamed already (these can appear as NAs)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:258:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L258) *style:* **Lines should not be more than 80 characters.**
```r
  nameChanges <- equivalentName(names(speciesLayers), speciesEquivalency, column = sppEndNamesCol)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:258:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L258) *style:* **Variable or function name should be snake_case.**
```r
  nameChanges <- equivalentName(names(speciesLayers), speciesEquivalency, column = sppEndNamesCol)
  ^~~~~~~~~~~
```
[R/maps.R:258:18:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L258) *warning:* **no visible global function definition for ‘equivalentName’**
```r
  nameChanges <- equivalentName(names(speciesLayers), speciesEquivalency, column = sppEndNamesCol)
                 ^~~~~~~~~~~~~~
```
[R/maps.R:261:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L261) *style:* **Lines should not be more than 80 characters.**
```r
  ## remove layers that have less data than thresh (i.e. spp absent in study area)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:263:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L263) *style:* **Lines should not be more than 80 characters.**
```r
  layerData <- Cache(sapply, X = speciesLayers, function(x) sum(x[] > 0, na.rm = TRUE))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:263:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L263) *style:* **Variable or function name should be snake_case.**
```r
  layerData <- Cache(sapply, X = speciesLayers, function(x) sum(x[] > 0, na.rm = TRUE))
  ^~~~~~~~~
```
[R/maps.R:263:16:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L263) *warning:* **no visible global function definition for ‘Cache’**
```r
  layerData <- Cache(sapply, X = speciesLayers, function(x) sum(x[] > 0, na.rm = TRUE))
               ^~~~~
```
[R/maps.R:266:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L266) *style:* **Variable or function name should be snake_case.**
```r
  belowThresh <- layerData < thresh
  ^~~~~~~~~~~
```
[R/maps.R:283:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L283) *style:* **Lines should not be more than 80 characters.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:283:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L283) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
^~~~~~~~~~~~~~~~~~~
```
[R/maps.R:283:33:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L283) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
                                ^~~~~~~~~~~~~
```
[R/maps.R:283:48:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L283) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
                                               ^~~~~~~~~~~
```
[R/maps.R:283:61:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L283) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
                                                            ^~~~~~~~~~~~~~
```
[R/maps.R:283:77:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L283) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
                                                                            ^~~~~~~~~~~~
```
[R/maps.R:286:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L286) *style:* **Lines should not be more than 80 characters.**
```r
  writeRaster(ras_out, filename = filenameToSave, datatype = "INT2U", overwrite = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:286:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L286) *warning:* **no visible global function definition for ‘writeRaster’**
```r
  writeRaster(ras_out, filename = filenameToSave, datatype = "INT2U", overwrite = TRUE)
  ^~~~~~~~~~~
```
[R/maps.R:307:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L307) *style:* **Lines should not be more than 80 characters.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, outputFilenameSuffix = "overlay",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:307:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L307) *style:* **Variable or function name should be snake_case.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, outputFilenameSuffix = "overlay",
^~~~~~~~~~~~~
```
[R/maps.R:307:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L307) *style:* **Variable or function name should be snake_case.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, outputFilenameSuffix = "overlay",
                          ^~~~~~~~~~~~~~~~
```
[R/maps.R:307:45:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L307) *style:* **Variable or function name should be snake_case.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, outputFilenameSuffix = "overlay",
                                            ^~~~~~~~~~~~~~~
```
[R/maps.R:307:62:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L307) *style:* **Variable or function name should be snake_case.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, outputFilenameSuffix = "overlay",
                                                             ^~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:308:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L308) *style:* **Variable or function name should be snake_case.**
```r
                          destinationPath) {
                          ^~~~~~~~~~~~~~~
```
[R/maps.R:310:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L310) *style:* **Variable or function name should be snake_case.**
```r
  hqLarger <- ncell(lowQualityStack) * prod(res(lowQualityStack)) <
  ^~~~~~~~
```
[R/maps.R:314:10:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L314) *warning:* **no visible global function definition for ‘data.table’**
```r
  dt1 <- data.table(SPP = layerNames(highQualityStack), HQ = NA)
         ^~~~~~~~~~
```
[R/maps.R:314:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L314) *warning:* **no visible global function definition for ‘layerNames’**
```r
  dt1 <- data.table(SPP = layerNames(highQualityStack), HQ = NA)
                          ^~~~~~~~~~
```
[R/maps.R:315:10:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L315) *warning:* **no visible global function definition for ‘data.table’**
```r
  dt2 <- data.table(SPP = layerNames(lowQualityStack), LQ = NA)
         ^~~~~~~~~~
```
[R/maps.R:315:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L315) *warning:* **no visible global function definition for ‘layerNames’**
```r
  dt2 <- data.table(SPP = layerNames(lowQualityStack), LQ = NA)
                          ^~~~~~~~~~
```
[R/maps.R:316:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L316) *warning:* **no visible global function definition for ‘setkey’**
```r
  setkey(dt1, SPP); setkey(dt2, SPP)
  ^~~~~~
```
[R/maps.R:316:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L316) *warning:* **no visible global function definition for ‘setkey’**
```r
  setkey(dt1, SPP); setkey(dt2, SPP)
  ^~~~~~
```
[R/maps.R:316:15:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L316) *warning:* **no visible binding for global variable ‘SPP’, Did you mean 'SSD'?**
```r
  setkey(dt1, SPP); setkey(dt2, SPP)
              ^~~
```
[R/maps.R:316:15:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L316) *warning:* **no visible binding for global variable ‘SPP’, Did you mean 'SSD'?**
```r
  setkey(dt1, SPP); setkey(dt2, SPP)
              ^~~
```
[R/maps.R:320:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L320) *style:* **Variable or function name should be snake_case.**
```r
  dtj[, HQ := any(!is.na(highQualityStack[[SPP]][])), by = 1:nrow(dtj)]
        ^~
```
[R/maps.R:320:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L320) *warning:* **no visible binding for global variable ‘HQ’, Did you mean 'x'?**
```r
  dtj[, HQ := any(!is.na(highQualityStack[[SPP]][])), by = 1:nrow(dtj)]
        ^~
```
[R/maps.R:320:12:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L320) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
  dtj[, HQ := any(!is.na(highQualityStack[[SPP]][])), by = 1:nrow(dtj)]
           ^~
```
[R/maps.R:320:44:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L320) *warning:* **no visible binding for global variable ‘SPP’, Did you mean 'SSD'?**
```r
  dtj[, HQ := any(!is.na(highQualityStack[[SPP]][])), by = 1:nrow(dtj)]
                                           ^~~
```
[R/maps.R:321:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L321) *style:* **Variable or function name should be snake_case.**
```r
  dtj[, LQ := any(!is.na(lowQualityStack[[SPP]][])), by = 1:nrow(dtj)]
        ^~
```
[R/maps.R:321:9:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L321) *warning:* **no visible binding for global variable ‘LQ’, Did you mean 'x'?**
```r
  dtj[, LQ := any(!is.na(lowQualityStack[[SPP]][])), by = 1:nrow(dtj)]
        ^~
```
[R/maps.R:321:12:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L321) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
  dtj[, LQ := any(!is.na(lowQualityStack[[SPP]][])), by = 1:nrow(dtj)]
           ^~
```
[R/maps.R:321:43:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L321) *warning:* **no visible binding for global variable ‘SPP’, Did you mean 'SSD'?**
```r
  dtj[, LQ := any(!is.na(lowQualityStack[[SPP]][])), by = 1:nrow(dtj)]
                                          ^~~
```
[R/maps.R:323:3:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L323) *style:* **Variable or function name should be snake_case.**
```r
  stackRas <- list()
  ^~~~~~~~
```
[R/maps.R:328:1:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L328) *style:* **Lines should not be more than 80 characters.**
```r
                                     outputFilenameSuffix = outputFilenameSuffix,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:331:19:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L331) *style:* **Use <-, not =, for assignment.**
```r
  names(stackRas) = dtj$SPP
                  ^
```
[R/maps.R:350:22:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L350) *style:* **Variable or function name should be snake_case.**
```r
.overlay <- function(SPP, HQ, LQ, hqLarger, highQualityStack, lowQualityStack,
                     ^~~
```
[R/maps.R:350:27:](https://github.com/PredictiveEcology/pemisc/blob/d43cf043f68aed89a8198d914c1b90235c888ddb/R/maps.R#L350) *style:* **Variable or function name should be snake_case.**
```r
.overlay <- function(SPP, HQ, LQ, hqLarger, highQualityStack, lowQualityStack,
                          ^~
```


return to previous theme


A scale of `1.0002994537353516` on that bone shouldn't cause an issue like that, are you sure that's what the issue is?


Sorry, I'm not sure.


Думаю это не единственная формула с использованием времени. Лучше сделать отдельный метод для валидации времени.


[R/RcppExports.R:53:1:](https://github.com/jackwasey/physiology/blob/939272bccd56dca1442f07996eaa6d322d2d2616/R/RcppExports.R#L53) *style:* **Trailing blank lines are superfluous.**
```r

^
```


Корректность шифрования/расшифрования не проверяется. Измеряется скорость работы этих двух функций.


Change the name sounisuam to souunisuam these name is deprecated


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

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


Nice patch @cvan!  Much  nicer.


DFDSFSF


Согласен, постараюсь оптимизировать


[R/cleanLandWebStudyArea.R:19:10:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/cleanLandWebStudyArea.R#L19) *style:* **Variable or function name should be lowerCamelCase.**
```r
    poly$LTHRC <- poly$LTHFC
         ^~~~~
```
[R/cleanLandWebStudyArea.R:20:10:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/cleanLandWebStudyArea.R#L20) *style:* **Variable or function name should be lowerCamelCase.**
```r
    poly$LTHFC <- NULL
         ^~~~~
```
[R/cleanLandWebStudyArea.R:25:10:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/cleanLandWebStudyArea.R#L25) *style:* **Variable or function name should be lowerCamelCase.**
```r
    poly$LTHRC <- NULL
         ^~~~~
```
[R/gis.R:13:1:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/gis.R#L13) *style:* **Lines should not be more than 100 characters.**
```r
                          urlForProj = "http://spatialreference.org/ref/epsg/nad83-utm-zone-11n/prj/") {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/gis.R:59:45:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/gis.R#L59) *style:* **Variable or function name should be lowerCamelCase.**
```r
factorValues2 <- function(x, v, layer, att, append.names, na.rm = FALSE) {
                                            ^~~~~~~~~~~~
```
[R/gis.R:59:59:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/gis.R#L59) *style:* **Variable or function name should be lowerCamelCase.**
```r
factorValues2 <- function(x, v, layer, att, append.names, na.rm = FALSE) {
                                                          ^~~~~
```
[R/MapOrDoCall.R:55:32:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/MapOrDoCall.R#L55) *style:* **Variable or function name should be lowerCamelCase.**
```r
                               MBper = 5e2,
                               ^~~~~
```
[R/maps.R:16:29:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L16) *style:* **Variable or function name should be lowerCamelCase.**
```r
defineFlammable <- function(LandCoverClassifiedMap = NULL,
                            ^~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:27:1:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L27) *style:* **Lines should not be more than 100 characters.**
```r
    stop("Need nonFlammClasses, which are the classes that cannot burn in the LandCoverClassifiedMap")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:66:1:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L66) *style:* **Lines should not be more than 100 characters.**
```r
      url <- "ftp://ftp.ccrs.nrcan.gc.ca/ad/NLCCLandCover/LandcoverCanada2005_250m/LandCoverOfCanada2005_V1_4.zip"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:67:7:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L67) *style:* **Variable or function name should be lowerCamelCase.**
```r
      LCCfilename <- asPath("LCC2005_V1_4a.tif")
      ^~~~~~~~~~~
```
[R/maps.R:69:1:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L69) *style:* **Lines should not be more than 100 characters.**
```r
      stop("don't have the url for LCC2010 yet. Please find it and pass it as url = 'TheFTPAddress'")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:103:16:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L103) *style:* **Variable or function name should be lowerCamelCase.**
```r
  speciesStack$Mixed <- all(speciesStack / sumVegPct < vegLeadingProportion) *
               ^~~~~
```
[R/maps.R:158:44:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L158) *style:* **Commas should always have a space after.**
```r
  kNNnames <- lapply(strsplit(speciesList[,1], "_"), function(x) {
                                           ^
```
[R/maps.R:175:14:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L175) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if (FALSE) { # TODO: This no longer does all species
             ^
```
[R/maps.R:184:27:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L184) *style:* **Commas should always have a space after.**
```r
    if (any(!speciesList[,1] %in% allSpp)) {
                          ^
```
[R/maps.R:186:63:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L186) *style:* **Commas should always have a space after.**
```r
      speciesList <- speciesList[speciesList[, 1] %in% allSpp,]
                                                              ^
```
[R/maps.R:332:8:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L332) *style:* **Commented code should be removed.**
```r
      #filename2 = postProcessedFilename
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:347:1:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L347) *style:* **Lines should not be more than 100 characters.**
```r
                      archive2 = paste0("NFI_MODIS250m_kNN_Species_", spp[, "speciesNamesRaw"], "_v0.zip"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:403:9:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L403) *style:* **Variable or function name should be lowerCamelCase.**
```r
        LQRastName <- basename(tempfile(fileext = ".tif"))
        ^~~~~~~~~~
```
[R/maps.R:405:11:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L405) *style:* **Variable or function name should be lowerCamelCase.**
```r
          LQCurName <- basename(tempfile(fileext = ".tif"))
          ^~~~~~~~~
```
[R/maps.R:412:9:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L412) *style:* **Variable or function name should be lowerCamelCase.**
```r
        LQRastInHQcrs <- projectExtent(lowQualityStack, crs = crs(highQualityStack))
        ^~~~~~~~~~~~~
```
[R/maps.R:425:9:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L425) *style:* **Variable or function name should be lowerCamelCase.**
```r
        LQRast <- raster(LQRastName)
        ^~~~~~
```
[R/maps.R:443:11:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L443) *style:* **Variable or function name should be lowerCamelCase.**
```r
          HQRast <- raster(tmpHQName)
          ^~~~~~
```
[R/maps.R:448:11:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L448) *style:* **Variable or function name should be lowerCamelCase.**
```r
          HQRast <- highQualityStack[[sp]]
          ^~~~~~
```
[R/maps.R:451:9:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L451) *style:* **Variable or function name should be lowerCamelCase.**
```r
        LQRast <- lowQualityStack[[sp]]
        ^~~~~~
```
[R/maps.R:452:9:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L452) *style:* **Variable or function name should be lowerCamelCase.**
```r
        HQRast <- highQualityStack[[sp]]
        ^~~~~~
```
[R/maps.R:460:7:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L460) *style:* **Variable or function name should be lowerCamelCase.**
```r
      HQRast <- writeRaster(HQRast, datatype = "INT2U",
      ^~~~~~
```
[R/maps.R:468:31:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/maps.R#L468) *style:* **Variable or function name should be lowerCamelCase.**
```r
      if (!exists("HQStack")) HQStack <- stack(HQRast) else HQStack[[sp]] <- HQRast
                              ^~~~~~~
```
[R/speciesTable.R:64:18:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/speciesTable.R#L64) *style:* **Only use double-quotes.**
```r
  speciesTable[, ':='(Area = NULL, hardsoft = NULL)] ## hardsoft used in fire model
                 ^~~~
```
[R/speciesTable.R:64:22:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/speciesTable.R#L64) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  speciesTable[, ':='(Area = NULL, hardsoft = NULL)] ## hardsoft used in fire model
                     ^
```
[R/speciesTable.R:68:18:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/speciesTable.R#L68) *style:* **Only use double-quotes.**
```r
  speciesTable[, ':='(species = paste(as.character(substring(species1, 1, 1)),
                 ^~~~
```
[R/speciesTable.R:68:22:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/speciesTable.R#L68) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  speciesTable[, ':='(species = paste(as.character(substring(species1, 1, 1)),
                     ^
```
[R/speciesTable.R:69:1:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/speciesTable.R#L69) *style:* **Lines should not be more than 100 characters.**
```r
                                      tolower(as.character(substring(species1, 2, nchar(species1)))),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/speciesTable.R:71:1:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/speciesTable.R#L71) *style:* **Lines should not be more than 100 characters.**
```r
                                      tolower(as.character(substring(species2, 2, nchar(species2)))),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/speciesTable.R:102:7:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/speciesTable.R#L102) *style:* **Only use double-quotes.**
```r
    , ':='(species1 = NULL, species2 = NULL)] %>%
      ^~~~
```
[R/speciesTable.R:102:11:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/speciesTable.R#L102) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    , ':='(species1 = NULL, species2 = NULL)] %>%
          ^
```
[R/vegTypeMap.R:18:1:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L18) *style:* **Lines should not be more than 100 characters.**
```r
  species[species == "Pinu_ban" | species == "Pinu_con" | species == "Pinu_sp", speciesGroup := "PINU"]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/vegTypeMap.R:21:33:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L21) *style:* **Commas should never have a space before.**
```r
  species[species == "Pice_mar" , speciesGroup := "PICE_MAR"]
                               ~^
```
[R/vegTypeMap.R:23:32:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L23) *style:* **Commas should never have a space before.**
```r
  species[species == "Abie_sp" , speciesGroup := "ABIE"]
                              ~^
```
[R/vegTypeMap.R:34:3:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L34) *style:* **Variable or function name should be lowerCamelCase.**
```r
  Factor <- NULL
  ^~~~~~
```
[R/vegTypeMap.R:35:3:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L35) *style:* **Variable or function name should be lowerCamelCase.**
```r
  ID <- NULL
  ^~
```
[R/vegTypeMap.R:41:3:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L41) *style:* **Variable or function name should be lowerCamelCase.**
```r
  B <- NULL
  ^
```
[R/vegTypeMap.R:57:23:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L57) *style:* **Variable or function name should be lowerCamelCase.**
```r
  attritable[ID == 1, Factor := "Pine leading"]
                      ^~~~~~
```
[R/vegTypeMap.R:58:23:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L58) *style:* **Variable or function name should be lowerCamelCase.**
```r
  attritable[ID == 2, Factor := "Deciduous leading"]
                      ^~~~~~
```
[R/vegTypeMap.R:59:23:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L59) *style:* **Variable or function name should be lowerCamelCase.**
```r
  attritable[ID == 3, Factor := "Black spruce leading"]
                      ^~~~~~
```
[R/vegTypeMap.R:60:23:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L60) *style:* **Variable or function name should be lowerCamelCase.**
```r
  attritable[ID == 4, Factor := "White spruce leading"]
                      ^~~~~~
```
[R/vegTypeMap.R:61:23:](https://github.com/PredictiveEcology/pemisc/blob/2f9eeae2ecdf73a9d2a7063526e05d7ff23e8dbb/R/vegTypeMap.R#L61) *style:* **Variable or function name should be lowerCamelCase.**
```r
  attritable[ID == 5, Factor := "Mixed"]
                      ^~~~~~
```


This fails in 2.8 (see issue #1907) because 2.8 does not support the settings.d directory.


You are right, please see follow up commit


I agree with this commit.


Pro názvy či holé věty se element `<p>` nehodí, neb značí spíše blok souvislého textu (odstavec). Tady jde o významný text, který by si zasloužil `<strong>` anebo rovnou `<h1>` jako hlavní nadpis stránky.


Now could not deploy this pull request since the `now.json` file does not contain valid JSON.

	Click here to see the contents of `now.json`

{
  "alias": "vault130.now.sh",
  "dotenv": ".env.production"
  "version": 2
}

For more information on now.json visit https://zeit.co/docs/features/configuration#now.json.


vkpurge(8) is the preferred formatting when referencing a manual page.


pyc files are generated on first run. if the file is located in a RO fs, pyc will not be saved. In our case, we would loose the pyc on reboot. I think we should reference the .py and let the python interpreter to use pyc if present and up to date. So, you should keep BR2_PACKAGE_PYTHON_PY_PYC=y.


you cant see here because the first commit uploaded the changes.  you can see it in #2c010cb


Successfully aliased the URL <https://mnist-web-xrumatcupa.now.sh> to the following alias.

* https://mait-mnist.now.sh


This app's `now.json` file explicitly sets `dotenv` to `.env.production`.
However, that file could not be found in your repo.

Try commiting the `.env.production` file.
You might also find [Now Secrets](https://zeit.co/docs/getting-started/secrets) useful.


Pro čistě grafické obrázky, které nepřidávají kontext k obsahu, se nedoporučuje uvádět `alt` atribut. Pro obsahové obrázky toto neplatí a čím lépe popisný text, tím lépe.


<text> is parsed as links in markdown. Please choose another formatting. Code would probably be most consistent with the rest of the docs.


Is this really true for `es5-cjs`? Wouldn’t other Node versions also be supported?


Added charity fair. Updated cfc. Removed sign language.


Este es mi villanp favorito


> Gimbals are easier to use, but if you get it right, glidecams show less of the up and down footstep motion that gimbals have.

Well I'm not completely agree. Gimbals like Ronin S with powerful and motors are very forgiving about tuning. And you will have more or less (depends on your skill) up and down footstep motion on both. Exception is if you use waist and the arm, it really makes big difference, saves you from fatigue, smoothes all vertical movement and can be used for both glide/steady cams and gimbals.


`<text>`, that is. we can see the problem is not limited to this formatter ;-)


lepší alt ala `Fotografie ruky držící bílý dotykový telefon, na kterém je spuštěna aplikace Super Appka`


will there be a release soon? Thanks!


this was not a typo, i just changed it


# Specs execution successful
:scroll: [View logs](http://bamboo.comnull)
### Plans updated

Bamboo specs have been successfully imported and the following plans have been updated.

Project | Plan | Build
---|---|---
[Test](http://bamboo.com/browse/TEST) | [Comment test](http://bamboo.com/browse/TEST-CTEST)  | :white_check_mark: [\#1](http://bamboo.com/browse/TEST-CTEST-1)
[New project](http://bamboo.com/browse/NEW) | [Disabled plan](http://bamboo.com/browse/NEW-DISABLED) **disabled** | :white_check_mark: [\#1](http://bamboo.com/browse/NEW-DISABLED-1)

### Deployments updated

Bamboo specs have been successfully imported and the following deployment projects have been updated.

|Deployment project |
----|
[Deployment test](http://bamboo.com/deploy/viewDeploymentProjectVersions.action?id=2162689)|


For a player/party member, the combat difficulty value is always 100.


FILS DE PUTE


aktivni/neaktivni by nemělo být pomocí tříd, ale pseudo tříd `:hover` či `:focus`. Pro rozlišení podbarvení pozadí se hodí lepší označení na způsob *primary* a *secondary* apod.


comment


@mlshapiro @mpu-creare @drc-creare @dsully1992 I've updated the documentation example in the developer docs.

There is an issue with Sphinx + traitlets. The docstrings of inherited traits are not inherited. This is the best solution Marc and I have come up with so far. Node subclasses will need to be updated in order to document the inherited traits, and you can do so relatively safely this way. You can see the `Coordinates1d` (parent class) and `ArrayCoordinates1d` / `UniformCoordinates1d` (subclasses) for a complete example.


super použití stejných tříd pro stejný, opakující se obsah


# Entiendo por que agregaste a **deadshot** lo neceitaremos 👍


Successfully aliased the URL <https://mnist-web-xhjqerbnyl.now.sh> to the following alias.

* https://mait-mnist.now.sh


[R/age.R:34:14:](https://github.com/jackwasey/physiology/blob/b1a8b39c9ed985a78562f41ff02bec8f8bea14c0/R/age.R#L34) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  if (age < 0 )
             ^
```
[R/RcppExports.R:53:1:](https://github.com/jackwasey/physiology/blob/b1a8b39c9ed985a78562f41ff02bec8f8bea14c0/R/RcppExports.R#L53) *style:* **Trailing blank lines are superfluous.**
```r

^
```


Removing it from the struct completely in this case would make the binary layout match, and the presence of that global is an implementation detail that only the C++ care about.

In the absence of other static members like that that are of any use to the end-user you can remove them for now. If I end up with a static member that the end user needs to be access, perhaps you can write a custom C acessor to it.