[R/boxPlots.R:2:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
  utils::globalVariables(c("ageClass", "group", "proportionCC", "totalPixels", "vegCover", "zone"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:8:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L8) *style:* **Lines should not be more than 80 characters.**
```r
.doPlotBoxplot <- function(data, CCpnts = NULL, authStatus, fname = NULL, ageClasses, ...) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:8:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L8) *style:* **Variable or function name should be snake_case.**
```r
.doPlotBoxplot <- function(data, CCpnts = NULL, authStatus, fname = NULL, ageClasses, ...) {
^~~~~~~~~~~~~~
```
[R/boxPlots.R:8:34:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L8) *style:* **Variable or function name should be snake_case.**
```r
.doPlotBoxplot <- function(data, CCpnts = NULL, authStatus, fname = NULL, ageClasses, ...) {
                                 ^~~~~~
```
[R/boxPlots.R:8:49:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L8) *style:* **Variable or function name should be snake_case.**
```r
.doPlotBoxplot <- function(data, CCpnts = NULL, authStatus, fname = NULL, ageClasses, ...) {
                                                ^~~~~~~~~~
```
[R/boxPlots.R:8:75:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L8) *style:* **Variable or function name should be snake_case.**
```r
.doPlotBoxplot <- function(data, CCpnts = NULL, authStatus, fname = NULL, ageClasses, ...) {
                                                                          ^~~~~~~~~~
```
[R/boxPlots.R:13:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L13) *style:* **Lines should not be more than 80 characters.**
```r
    if (length(CCpnts) == 4) warning("length(CCpnts) != 4; only the first 4 will be used")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:35:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L35) *style:* **Variable or function name should be snake_case.**
```r
runBoxPlotsVegCover <- function(map, functionName, analysisGroups, dPath) {
^~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:35:38:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L35) *style:* **Variable or function name should be snake_case.**
```r
runBoxPlotsVegCover <- function(map, functionName, analysisGroups, dPath) {
                                     ^~~~~~~~~~~~
```
[R/boxPlots.R:35:52:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L35) *style:* **Variable or function name should be snake_case.**
```r
runBoxPlotsVegCover <- function(map, functionName, analysisGroups, dPath) {
                                                   ^~~~~~~~~~~~~~
```
[R/boxPlots.R:35:68:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L35) *style:* **Variable or function name should be snake_case.**
```r
runBoxPlotsVegCover <- function(map, functionName, analysisGroups, dPath) {
                                                                   ^~~~~
```
[R/boxPlots.R:36:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L36) *style:* **Variable or function name should be snake_case.**
```r
  ageClasses <- c("Young", "Immature", "Mature", "Old")
  ^~~~~~~~~~
```
[R/boxPlots.R:37:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L37) *style:* **Variable or function name should be snake_case.**
```r
  allRepPolys <- na.omit(map@metadata[[analysisGroups]])
  ^~~~~~~~~~~
```
[R/boxPlots.R:41:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L41) *style:* **Lines should not be more than 80 characters.**
```r
    allData <- map@analysesData[[functionName]][["LeadingVegTypeByAgeClass"]][[poly]]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:41:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L41) *style:* **Variable or function name should be snake_case.**
```r
    allData <- map@analysesData[[functionName]][["LeadingVegTypeByAgeClass"]][[poly]]
    ^~~~~~~
```
[R/boxPlots.R:43:7:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L43) *style:* **Variable or function name should be snake_case.**
```r
      allData <- map@analysesData[[functionName]][[poly]] ## TODO: fix upstream
      ^~~~~~~
```
[R/boxPlots.R:44:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L44) *style:* **Variable or function name should be snake_case.**
```r
    allData <- unique(allData) ## remove duplicates; with LandWeb#89
    ^~~~~~~
```
[R/boxPlots.R:45:13:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L45) *style:* **Variable or function name should be snake_case.**
```r
    allData$vegCover <- gsub(" leading", "", allData$vegCover) %>%
            ^~~~~~~~
```
[R/boxPlots.R:48:13:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L48) *style:* **Variable or function name should be snake_case.**
```r
    allData$ageClass <- factor(allData$ageClass, ageClasses)
            ^~~~~~~~
```
[R/boxPlots.R:50:34:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L50) *warning:* **no visible binding for global variable ‘group’, Did you mean 'drop'?**
```r
    data <- allData[!grepl("CC", group)]
                                 ^~~~~
```
[R/boxPlots.R:52:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L52) *style:* **Variable or function name should be snake_case.**
```r
    dataCC <- allData[grepl("CC", group)]
    ^~~~~~
```
[R/boxPlots.R:52:35:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L52) *warning:* **no visible binding for global variable ‘group’, Did you mean 'drop'?**
```r
    dataCC <- allData[grepl("CC", group)]
                                  ^~~~~
```
[R/boxPlots.R:53:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L53) *style:* **Lines should not be more than 80 characters.**
```r
    setnames(dataCC, "proportion", "proportionCC") ## rename the column to proportionCC
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:53:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L53) *warning:* **no visible global function definition for ‘setnames’, Did you mean 'setNames'?**
```r
    setnames(dataCC, "proportion", "proportionCC") ## rename the column to proportionCC
    ^~~~~~~~
```
[R/boxPlots.R:54:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L54) *style:* **Variable or function name should be snake_case.**
```r
    dataCC <- dataCC[, c("group", "label", "NPixels") := list(NULL, NULL, NULL)]
    ^~~~~~
```
[R/boxPlots.R:54:55:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L54) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
    dataCC <- dataCC[, c("group", "label", "NPixels") := list(NULL, NULL, NULL)]
                                                      ^~
```
[R/boxPlots.R:56:32:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L56) *warning:* **no visible global function definition for ‘.’, Did you mean 'C'?**
```r
    data2 <- dataCC[data, on = .(zone, vegCover, ageClass)]
                               ^
```
[R/boxPlots.R:56:34:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L56) *warning:* **no visible binding for global variable ‘zone’, Did you mean 'line'?**
```r
    data2 <- dataCC[data, on = .(zone, vegCover, ageClass)]
                                 ^~~~
```
[R/boxPlots.R:56:40:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L56) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    data2 <- dataCC[data, on = .(zone, vegCover, ageClass)]
                                       ^~~~~~~~
```
[R/boxPlots.R:56:50:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L56) *warning:* **no visible binding for global variable ‘ageClass’, Did you mean 'ageClasses'?**
```r
    data2 <- dataCC[data, on = .(zone, vegCover, ageClass)]
                                                 ^~~~~~~~
```
[R/boxPlots.R:59:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L59) *style:* **Lines should not be more than 80 characters.**
```r
    ## NOTE: this is number of TREED pixels, which is likely smaller than the polygon area
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:60:13:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L60) *style:* **Variable or function name should be snake_case.**
```r
    data2[, totalPixels := base::sum(.SD, na.rm = TRUE) / 2,
            ^~~~~~~~~~~
```
[R/boxPlots.R:63:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L63) *style:* **Lines should not be more than 80 characters.**
```r
    try(write.csv(data2, file.path(dPath, paste0("leading_", gsub(" ", "_", poly), ".csv"))))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:64:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L64) *style:* **Variable or function name should be snake_case.**
```r
    saveDir <- checkPath(file.path(dPath, poly), create = TRUE)
    ^~~~~~~
```
[R/boxPlots.R:64:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L64) *warning:* **local variable ‘saveDir’ assigned but may not be used**
```r
    saveDir <- checkPath(file.path(dPath, poly), create = TRUE)
    ^~~~~~~
```
[R/boxPlots.R:64:16:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L64) *warning:* **no visible global function definition for ‘checkPath’**
```r
    saveDir <- checkPath(file.path(dPath, poly), create = TRUE)
               ^~~~~~~~~
```
[R/boxPlots.R:65:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L65) *style:* **Lines should not be more than 80 characters.**
```r
    savePng <- quote(file.path(saveDir, paste0(unique(paste(zone, vegCover, collapse = " ")), ".png")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:65:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L65) *style:* **Variable or function name should be snake_case.**
```r
    savePng <- quote(file.path(saveDir, paste0(unique(paste(zone, vegCover, collapse = " ")), ".png")))
    ^~~~~~~
```
[R/boxPlots.R:74:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L74) *style:* **Lines should not be more than 80 characters.**
```r
                                    main = unique(paste(zone, vegCover, collapse = "_")),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:75:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L75) *style:* **Lines should not be more than 80 characters.**
```r
                                    xlab = paste0("Proportion of of forest area (total ",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:78:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L78) *style:* **Lines should not be more than 80 characters.**
```r
                                                    res(rasterToMatch(map))[2] / 1e4,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxPlots.R:84:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/boxPlots.R#L84) *style:* **Lines should not be more than 80 characters.**
```r
      .SDcols = c("ageClass", "proportion", "proportionCC", "NPixels"), by = slices]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:5:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L5) *style:* **Lines should not be more than 80 characters.**
```r
#' @param isRasterToMatch Logical. Is this(these) layer(s) the \code{rasterToMatch} layers.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:6:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L6) *style:* **Lines should not be more than 80 characters.**
```r
#'        If \code{TRUE}, then this layer can be accessed by \code{rasterToMatch(map)}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:16:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L16) *style:* **Lines should not be more than 80 characters.**
```r
buildMetadata <- function(metadata, isStudyArea, isRasterToMatch, layerName, obj,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:16:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L16) *style:* **Variable or function name should be snake_case.**
```r
buildMetadata <- function(metadata, isStudyArea, isRasterToMatch, layerName, obj,
^~~~~~~~~~~~~
```
[R/buildMetadata.R:16:37:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L16) *style:* **Variable or function name should be snake_case.**
```r
buildMetadata <- function(metadata, isStudyArea, isRasterToMatch, layerName, obj,
                                    ^~~~~~~~~~~
```
[R/buildMetadata.R:16:50:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L16) *style:* **Variable or function name should be snake_case.**
```r
buildMetadata <- function(metadata, isStudyArea, isRasterToMatch, layerName, obj,
                                                 ^~~~~~~~~~~~~~~
```
[R/buildMetadata.R:16:67:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L16) *style:* **Variable or function name should be snake_case.**
```r
buildMetadata <- function(metadata, isStudyArea, isRasterToMatch, layerName, obj,
                                                                  ^~~~~~~~~
```
[R/buildMetadata.R:17:27:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L17) *style:* **Variable or function name should be snake_case.**
```r
                          columnNameForLabels, objHash, leaflet, envir, ...) {
                          ^~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:17:48:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L17) *style:* **Variable or function name should be snake_case.**
```r
                          columnNameForLabels, objHash, leaflet, envir, ...) {
                                               ^~~~~~~
```
[R/buildMetadata.R:19:8:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L19) *warning:* **no visible global function definition for ‘copy’, Did you mean 'coef'?**
```r
  b <- copy(.singleMetadataNAEntry)
       ^~~~
```
[R/buildMetadata.R:19:13:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L19) *warning:* **no visible binding for global variable ‘.singleMetadataNAEntry’**
```r
  b <- copy(.singleMetadataNAEntry)
            ^~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:25:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L25) *style:* **Variable or function name should be snake_case.**
```r
    studyAreaNumber <- 1 + NROW(metadata[compareNA(studyArea, TRUE) |
    ^~~~~~~~~~~~~~~
```
[R/buildMetadata.R:26:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L26) *style:* **Lines should not be more than 80 characters.**
```r
                                               (is.numeric(studyArea) & studyArea > 0)])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:27:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L27) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
    set(b, NULL, "studyArea", studyAreaNumber)
    ^~~
```
[R/buildMetadata.R:28:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L28) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
    set(b, NULL, "area", area)
    ^~~
```
[R/buildMetadata.R:31:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L31) *style:* **Variable or function name should be snake_case.**
```r
    rasterToMatchNumber <- 1 + NROW(metadata[compareNA(rasterToMatch, TRUE) |
    ^~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:32:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L32) *style:* **Lines should not be more than 80 characters.**
```r
                                           (is.numeric(rasterToMatch) & rasterToMatch > 0)])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:33:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L33) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
    set(b, NULL, "rasterToMatch", rasterToMatchNumber)
    ^~~
```
[R/buildMetadata.R:38:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L38) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
  set(b, NULL, "layerName", layerName)
  ^~~
```
[R/buildMetadata.R:39:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L39) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
  set(b, NULL, "layerType", class(obj))
  ^~~
```
[R/buildMetadata.R:42:7:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L42) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
      set(b, NULL, "columnNameForLabels", columnNameForLabels)
      ^~~
```
[R/buildMetadata.R:45:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L45) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
  set(b, NULL, "objectHash", objHash)
  ^~~
```
[R/buildMetadata.R:48:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L48) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
    set(b, NULL, "leaflet", leaflet)
    ^~~
```
[R/buildMetadata.R:50:14:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L50) *warning:* **no visible global function definition for ‘.robustDigest’**
```r
      dig <- .robustDigest(obj)
             ^~~~~~~~~~~~~
```
[R/buildMetadata.R:51:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L51) *style:* **Lines should not be more than 80 characters.**
```r
      tilePath <- asPath(file.path(leaflet, paste0("tiles_", layerName, "_", substr(dig, 1,6))))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:51:7:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L51) *style:* **Variable or function name should be snake_case.**
```r
      tilePath <- asPath(file.path(leaflet, paste0("tiles_", layerName, "_", substr(dig, 1,6))))
      ^~~~~~~~
```
[R/buildMetadata.R:51:19:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L51) *warning:* **no visible global function definition for ‘asPath’**
```r
      tilePath <- asPath(file.path(leaflet, paste0("tiles_", layerName, "_", substr(dig, 1,6))))
                  ^~~~~~
```
[R/buildMetadata.R:51:92:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L51) *style:* **Commas should always have a space after.**
```r
      tilePath <- asPath(file.path(leaflet, paste0("tiles_", layerName, "_", substr(dig, 1,6))))
                                                                                ^
```
[R/buildMetadata.R:52:7:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L52) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
      set(b, NULL, "leafletTiles", tilePath)
      ^~~
```
[R/buildMetadata.R:56:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L56) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
  set(b, NULL, "envir", list(list(envir)))
  ^~~
```
[R/buildMetadata.R:60:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L60) *style:* **Lines should not be more than 80 characters.**
```r
    dots <- dots[!unlist(lapply(dots, is.null))] # remove NULL because that isn't added to data.table anyway
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/buildMetadata.R:73:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L73) *style:* **Variable or function name should be snake_case.**
```r
  columnsToAdd <- dots
  ^~~~~~~~~~~~
```
[R/buildMetadata.R:81:9:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L81) *style:* **Variable or function name should be snake_case.**
```r
        needToSet <- TRUE
        ^~~~~~~~~
```
[R/buildMetadata.R:84:11:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/buildMetadata.R#L84) *style:* **Variable or function name should be snake_case.**
```r
          needToSet <- tryCatch(set(b, NULL, nta, cta), silent = TRUE,
          ^~~~~~~~~
```
[R/largePatches.R:21:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L21) *style:* **Lines should not be more than 80 characters.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:21:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L21) *style:* **Variable or function name should be snake_case.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses) {
^~~~~~~~~~~~
```
[R/largePatches.R:21:42:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L21) *style:* **Variable or function name should be snake_case.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses) {
                                         ^~~~~~~~~~~
```
[R/largePatches.R:21:59:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L21) *style:* **Variable or function name should be snake_case.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses) {
                                                          ^~~~~~~~~~~~~~~
```
[R/largePatches.R:21:76:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L21) *style:* **Variable or function name should be snake_case.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses) {
                                                                           ^~~~~~~~~~
```
[R/largePatches.R:27:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L27) *style:* **Variable or function name should be snake_case.**
```r
  timeSinceFireFilesRast <- Cache(.rasterToMemory, tsf[1])
  ^~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:27:29:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L27) *warning:* **no visible global function definition for ‘Cache’**
```r
  timeSinceFireFilesRast <- Cache(.rasterToMemory, tsf[1])
                            ^~~~~
```
[R/largePatches.R:27:35:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L27) *warning:* **no visible binding for global variable ‘.rasterToMemory’**
```r
  timeSinceFireFilesRast <- Cache(.rasterToMemory, tsf[1])
                                  ^~~~~~~~~~~~~~~
```
[R/largePatches.R:36:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L36) *style:* **Variable or function name should be snake_case.**
```r
  rasRepPoly <- Cache(
  ^~~~~~~~~~
```
[R/largePatches.R:39:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L39) *style:* **Lines should not be more than 80 characters.**
```r
    emptyRaster = raster(timeSinceFireFilesRast), # doesn't need to the data -- makes Caching more effective
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:44:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L44) *style:* **Variable or function name should be snake_case.**
```r
  rasVeg <- Cache(.rasterToMemory, vtm)
  ^~~~~~
```
[R/largePatches.R:44:13:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L44) *warning:* **no visible global function definition for ‘Cache’**
```r
  rasVeg <- Cache(.rasterToMemory, vtm)
            ^~~~~
```
[R/largePatches.R:44:19:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L44) *warning:* **no visible binding for global variable ‘.rasterToMemory’**
```r
  rasVeg <- Cache(.rasterToMemory, vtm)
                  ^~~~~~~~~~~~~~~
```
[R/largePatches.R:46:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L46) *style:* **Lines should not be more than 80 characters.**
```r
  splitVal <- paste0("_", 75757575, "_") # unlikely to occur for any other reason
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:46:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L46) *style:* **Variable or function name should be snake_case.**
```r
  splitVal <- paste0("_", 75757575, "_") # unlikely to occur for any other reason
  ^~~~~~~~
```
[R/largePatches.R:57:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L57) *style:* **Lines should not be more than 80 characters.**
```r
    colID <- which(colnames(raster::levels(rasVeg)[[1]]) %in% c("category", "Factor", "VALUE"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:57:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L57) *style:* **Variable or function name should be snake_case.**
```r
    colID <- which(colnames(raster::levels(rasVeg)[[1]]) %in% c("category", "Factor", "VALUE"))
    ^~~~~
```
[R/largePatches.R:64:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L64) *style:* **Lines should not be more than 80 characters.**
```r
    if (!identical(length(name1), length(name2)) || !identical(length(name1), length(name3)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:65:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L65) *style:* **Lines should not be more than 80 characters.**
```r
      stop("There is something wrong with tsf or rasVeg or rasRepPoly inside LargePatches")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:68:12:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L68) *warning:* **no visible global function definition for ‘raster’, Did you mean 'rasVeg'?**
```r
    ras <- raster(rasVeg)
           ^~~~~~
```
[R/largePatches.R:69:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L69) *style:* **Variable or function name should be snake_case.**
```r
    ffFactor <- factor(ff)
    ^~~~~~~~
```
[R/largePatches.R:72:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L72) *style:* **Lines should not be more than 80 characters.**
```r
    areaAndPolyOut <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:72:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L72) *style:* **Variable or function name should be snake_case.**
```r
    areaAndPolyOut <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
    ^~~~~~~~~~~~~~
```
[R/largePatches.R:72:23:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L72) *warning:* **no visible global function definition for ‘Cache’**
```r
    areaAndPolyOut <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
                      ^~~~~
```
[R/largePatches.R:72:29:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L72) *warning:* **no visible binding for global variable ‘areaAndPolyValue’**
```r
    areaAndPolyOut <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
                            ^~~~~~~~~~~~~~~~
```
[R/largePatches.R:73:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L73) *style:* **Lines should not be more than 80 characters.**
```r
    eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:73:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L73) *style:* **Variable or function name should be snake_case.**
```r
    eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
    ^~~~~~
```
[R/largePatches.R:77:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L77) *style:* **Variable or function name should be snake_case.**
```r
    facPolygonID <- factor(types[areaAndPolyOut$polyID,3])
    ^~~~~~~~~~~~
```
[R/largePatches.R:77:56:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L77) *style:* **Commas should always have a space after.**
```r
    facPolygonID <- factor(types[areaAndPolyOut$polyID,3])
                                                       ^
```
[R/largePatches.R:79:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L79) *style:* **Variable or function name should be snake_case.**
```r
    outBySpecies <- data.table(polygonID = as.numeric(facPolygonID),
    ^~~~~~~~~~~~
```
[R/largePatches.R:89:12:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L89) *warning:* **no visible global function definition for ‘raster’, Did you mean 'rasVeg'?**
```r
    ras <- raster(rasVeg)
           ^~~~~~
```
[R/largePatches.R:90:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L90) *style:* **Variable or function name should be snake_case.**
```r
    ffFactor <- factor(ff)
    ^~~~~~~~
```
[R/largePatches.R:94:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L94) *style:* **Lines should not be more than 80 characters.**
```r
    areaAndPolyOut2 <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:94:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L94) *style:* **Variable or function name should be snake_case.**
```r
    areaAndPolyOut2 <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
    ^~~~~~~~~~~~~~~
```
[R/largePatches.R:94:24:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L94) *warning:* **no visible global function definition for ‘Cache’**
```r
    areaAndPolyOut2 <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
                       ^~~~~
```
[R/largePatches.R:94:30:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L94) *warning:* **no visible binding for global variable ‘areaAndPolyValue’**
```r
    areaAndPolyOut2 <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
                             ^~~~~~~~~~~~~~~~
```
[R/largePatches.R:96:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L96) *style:* **Lines should not be more than 80 characters.**
```r
    eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:96:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L96) *style:* **Variable or function name should be snake_case.**
```r
    eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
    ^~~~~~
```
[R/largePatches.R:100:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L100) *style:* **Variable or function name should be snake_case.**
```r
    facPolygonID <- factor(types[areaAndPolyOut2$polyID, 2])
    ^~~~~~~~~~~~
```
[R/largePatches.R:102:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L102) *style:* **Variable or function name should be snake_case.**
```r
    outAllSpecies <- data.table(polygonID = as.numeric(facPolygonID),
    ^~~~~~~~~~~~~
```
[R/largePatches.R:109:12:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L109) *warning:* **no visible global function definition for ‘rbindlist’**
```r
    out <- rbindlist(list(outBySpecies, outAllSpecies))
           ^~~~~~~~~
```
[R/largePatches.R:110:16:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L110) *warning:* **no visible binding for global variable ‘sizeInHa’**
```r
    out <- out[sizeInHa >= 100] # never will need patches smaller than 100 ha
               ^~~~~~~~
```
[R/largePatches.R:113:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L113) *style:* **Lines should not be more than 80 characters.**
```r
    #f <- file.path(Paths$outputPath, "boxplots", paste0("largePatches_", STUDYAREA, ".csv"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:113:6:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L113) *style:* **Commented code should be removed.**
```r
    #f <- file.path(Paths$outputPath, "boxplots", paste0("largePatches_", STUDYAREA, ".csv"))
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:114:6:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L114) *style:* **Commented code should be removed.**
```r
    #write.csv(out, f)
     ^~~~~~~~~~~~~~~~~
```
[R/largePatches.R:116:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L116) *style:* **Lines should not be more than 80 characters.**
```r
    out <- data.table(polygonID = character(), sizeInHa = numeric(), vegCover = character(),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:117:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L117) *style:* **Lines should not be more than 80 characters.**
```r
                      rep = numeric(), ageClass = numeric(), polygonName = numeric())
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:123:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L123) *style:* **Variable or function name should be snake_case.**
```r
areaAndPolyValue <- function(ras) {
^~~~~~~~~~~~~~~~
```
[R/largePatches.R:124:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L124) *style:* **Variable or function name should be snake_case.**
```r
  polyIndivSpecies <- gdal_polygonizeR(ras) # 99 seconds with full ras
  ^~~~~~~~~~~~~~~~
```
[R/largePatches.R:124:23:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L124) *warning:* **no visible global function definition for ‘gdal_polygonizeR’**
```r
  polyIndivSpecies <- gdal_polygonizeR(ras) # 99 seconds with full ras
                      ^~~~~~~~~~~~~~~~
```
[R/largePatches.R:125:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L125) *style:* **Variable or function name should be snake_case.**
```r
  pArea <- as.numeric(sf::st_area(polyIndivSpecies) / 1e4)
  ^~~~~
```
[R/largePatches.R:131:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L131) *style:* **Lines should not be more than 80 characters.**
```r
#' Copied from https://johnbaumgartner.wordpress.com/2012/07/26/getting-rasters-into-shape-from-r/
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:144:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L144) *style:* **Variable or function name should be snake_case.**
```r
gdal_polygonizeR <- function(x, outshape = NULL, gdalformat = "ESRI Shapefile",
^~~~~~~~~~~~~~~~
```
[R/largePatches.R:159:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L159) *style:* **Lines should not be more than 80 characters.**
```r
  if (!file.exists(pypath)) stop("Can't find gdal_polygonize.py on your system.")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:167:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L167) *style:* **Variable or function name should be snake_case.**
```r
    f.exists <- file.exists(paste(outshape, c("shp", "shx", "dbf"), sep = "."))
    ^~~~~~~~
```
[R/largePatches.R:170:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L170) *style:* **Lines should not be more than 80 characters.**
```r
                   toString(paste(outshape, c("shp", "shx", "dbf"), sep = ".")[f.exists])),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:176:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L176) *warning:* **no visible global function definition for ‘writeRaster’**
```r
    writeRaster(x, rastpath, datatype = assessDataType(x))
    ^~~~~~~~~~~
```
[R/largePatches.R:176:41:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L176) *warning:* **no visible global function definition for ‘assessDataType’**
```r
    writeRaster(x, rastpath, datatype = assessDataType(x))
                                        ^~~~~~~~~~~~~~
```
[R/largePatches.R:184:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L184) *style:* **Lines should not be more than 80 characters.**
```r
    shp <- sf::read_sf(dsn = dirname(outshape), layer = basename(file_path_sans_ext(outshape)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:184:66:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L184) *warning:* **no visible global function definition for ‘file_path_sans_ext’**
```r
    shp <- sf::read_sf(dsn = dirname(outshape), layer = basename(file_path_sans_ext(outshape)))
                                                                 ^~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:185:22:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L185) *warning:* **no visible global function definition for ‘extent’, Did you mean 'extends'?**
```r
    sf::st_bbox(shp, extent(x))
                     ^~~~~~
```
[R/largePatches.R:192:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L192) *style:* **Variable or function name should be snake_case.**
```r
.rasterToMemory <- function(x, ...) {
^~~~~~~~~~~~~~~
```
[R/largePatches.R:193:8:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/largePatches.R#L193) *warning:* **no visible global function definition for ‘raster’, Did you mean 'paste'?**
```r
  r <- raster(x, ...)
       ^~~~~~
```
[R/leading.R:11:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L11) *style:* **Lines should not be more than 80 characters.**
```r
#' It is also recursive of passed a vector of filenames for \code{tsf} and \code{vtm}.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:13:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L13) *style:* **Lines should not be more than 80 characters.**
```r
#' @param tsf A single filename, relative or absolute, pointing to a Time Since Fire raster.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:15:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L15) *style:* **Lines should not be more than 80 characters.**
```r
#' @param vtm A single filename, relative or absolute, pointing to a Vegetation Type Map raster.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:17:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L17) *style:* **Lines should not be more than 80 characters.**
```r
#' @param poly A single \code{SpatialPolygonsDataFrame} object or a factor \code{RasterLayer}.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:19:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L19) *style:* **Lines should not be more than 80 characters.**
```r
#' @param ageClasses A character vector with labels for age classes to bin the \code{tsf} times,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:21:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L21) *style:* **Lines should not be more than 80 characters.**
```r
#' @param ageClassCutOffs A numeric vector with the endpoints for the \code{ageClasses}.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:24:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L24) *style:* **Lines should not be more than 80 characters.**
```r
#' @return A \code{data.table} with proportion of the pixels in each vegetation class,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:32:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L32) *style:* **Lines should not be more than 80 characters.**
```r
LeadingVegTypeByAgeClass <- function(tsf, vtm, poly, ageClassCutOffs, ageClasses) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:32:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L32) *style:* **Variable or function name should be snake_case.**
```r
LeadingVegTypeByAgeClass <- function(tsf, vtm, poly, ageClassCutOffs, ageClasses) {
^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:32:54:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L32) *style:* **Variable or function name should be snake_case.**
```r
LeadingVegTypeByAgeClass <- function(tsf, vtm, poly, ageClassCutOffs, ageClasses) {
                                                     ^~~~~~~~~~~~~~~
```
[R/leading.R:32:71:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L32) *style:* **Variable or function name should be snake_case.**
```r
LeadingVegTypeByAgeClass <- function(tsf, vtm, poly, ageClassCutOffs, ageClasses) {
                                                                      ^~~~~~~~~~
```
[R/leading.R:34:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L34) *style:* **Variable or function name should be snake_case.**
```r
  startTime <- Sys.time()
  ^~~~~~~~~
```
[R/leading.R:36:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L36) *style:* **Variable or function name should be snake_case.**
```r
    ageClassCutOffs <- c(ageClassCutOffs, Inf)
    ^~~~~~~~~~~~~~~
```
[R/leading.R:42:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L42) *style:* **Variable or function name should be snake_case.**
```r
  timeSinceFireFilesRast <- raster(tsf[1])
  ^~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:42:29:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L42) *warning:* **no visible global function definition for ‘raster’, Did you mean 'rasVeg'?**
```r
  timeSinceFireFilesRast <- raster(tsf[1])
                            ^~~~~~
```
[R/leading.R:46:4:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L46) *style:* **Commented code should be removed.**
```r
  #timeSinceFireFilesRast <- Cache(rasterToMemory, tsf[1])
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:48:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L48) *style:* **Variable or function name should be snake_case.**
```r
  rasTsf <- reclassify(
  ^~~~~~
```
[R/leading.R:60:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L60) *style:* **Variable or function name should be snake_case.**
```r
  rasVeg <- raster(vtm[1])
  ^~~~~~
```
[R/leading.R:60:13:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L60) *warning:* **no visible global function definition for ‘raster’, Did you mean 'rasVeg'?**
```r
  rasVeg <- raster(vtm[1])
            ^~~~~~
```
[R/leading.R:63:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L63) *style:* **Lines should not be more than 80 characters.**
```r
  splitVal <- paste0("_", 75757575, "_") # unlikely to occur for any other reason
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:63:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L63) *style:* **Variable or function name should be snake_case.**
```r
  splitVal <- paste0("_", 75757575, "_") # unlikely to occur for any other reason
  ^~~~~~~~
```
[R/leading.R:69:25:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L69) *warning:* **no visible global function definition for ‘factorValues’**
```r
  name1 <- as.character(factorValues(rasTsf, rasTsf[][!nas])[, 1])
                        ^~~~~~~~~~~~
```
[R/leading.R:70:4:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L70) *style:* **Commented code should be removed.**
```r
  #as.character(raster::levels(rasTsf)[[1]]$Factor)[rasTsf[][!nas]]
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:71:25:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L71) *warning:* **no visible global function definition for ‘factorValues’**
```r
  name3 <- as.character(factorValues(rasVeg, rasVeg[][!nas])[, 1])
                        ^~~~~~~~~~~~
```
[R/leading.R:72:4:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L72) *style:* **Commented code should be removed.**
```r
  #as.character(raster::levels(rasVeg)[[1]]$Factor)[rasVeg[][!nas]]
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:75:10:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L75) *warning:* **no visible global function definition for ‘raster’, Did you mean 'rasVeg'?**
```r
  ras <- raster(rasVeg)
         ^~~~~~
```
[R/leading.R:76:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L76) *style:* **Variable or function name should be snake_case.**
```r
  ffFactor <- factor(ff)
  ^~~~~~~~
```
[R/leading.R:79:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L79) *style:* **Lines should not be more than 80 characters.**
```r
  eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:79:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L79) *style:* **Variable or function name should be snake_case.**
```r
  eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
  ^~~~~~
```
[R/leading.R:83:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L83) *style:* **Lines should not be more than 80 characters.**
```r
  levels(ras) <- data.frame(eTable, ageClass = types[, 1], vegCover = types[, 2])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:90:13:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L90) *warning:* **no visible global function definition for ‘Cache’**
```r
    poly <- Cache(fasterize2, rasTsf, poly, field = "polygonNum")
            ^~~~~
```
[R/leading.R:90:19:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L90) *warning:* **no visible binding for global variable ‘fasterize2’**
```r
    poly <- Cache(fasterize2, rasTsf, poly, field = "polygonNum")
                  ^~~~~~~~~~
```
[R/leading.R:96:11:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L96) *warning:* **no visible global function definition for ‘factorValues’**
```r
  levs <- factorValues(poly, levs$ID)
          ^~~~~~~~~~~~
```
[R/leading.R:97:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L97) *style:* **Variable or function name should be snake_case.**
```r
  facVals <- factorValues(
  ^~~~~~~
```
[R/leading.R:110:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L110) *style:* **Lines should not be more than 80 characters.**
```r
  bb[, c("ageClass", "vegCover") := factorValues(ras, ras[][bb$cell], att = c("ageClass", "vegCover"))]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:110:34:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L110) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
  bb[, c("ageClass", "vegCover") := factorValues(ras, ras[][bb$cell], att = c("ageClass", "vegCover"))]
                                 ^~
```
[R/leading.R:110:37:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L110) *warning:* **no visible global function definition for ‘factorValues’**
```r
  bb[, c("ageClass", "vegCover") := factorValues(ras, ras[][bb$cell], att = c("ageClass", "vegCover"))]
                                    ^~~~~~~~~~~~
```
[R/leading.R:114:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L114) *style:* **Lines should not be more than 80 characters.**
```r
  #tabulated <- bb[, list(NPixels = .N), by = c("zone", "polygonID", "ageClass", "vegCover")] ## keeps polyID
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:114:4:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L114) *style:* **Commented code should be removed.**
```r
  #tabulated <- bb[, list(NPixels = .N), by = c("zone", "polygonID", "ageClass", "vegCover")] ## keeps polyID
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:115:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L115) *style:* **Lines should not be more than 80 characters.**
```r
  tabulated <- bb[, list(NPixels = .N), by = c("zone", "ageClass", "vegCover")] ## dedupes the zones
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:115:36:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L115) *warning:* **no visible binding for global variable ‘.N’, Did you mean 'bb'?**
```r
  tabulated <- bb[, list(NPixels = .N), by = c("zone", "ageClass", "vegCover")] ## dedupes the zones
                                   ^~
```
[R/leading.R:116:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L116) *style:* **Lines should not be more than 80 characters.**
```r
  tabulated[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone", "vegCover")]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:116:15:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L116) *warning:* **no visible binding for global variable ‘proportion’**
```r
  tabulated[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone", "vegCover")]
              ^~~~~~~~~~
```
[R/leading.R:116:26:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L116) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
  tabulated[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone", "vegCover")]
                         ^~
```
[R/leading.R:116:35:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L116) *warning:* **no visible binding for global variable ‘NPixels’**
```r
  tabulated[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone", "vegCover")]
                                  ^~~~~~~
```
[R/leading.R:116:35:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L116) *warning:* **no visible binding for global variable ‘NPixels’**
```r
  tabulated[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone", "vegCover")]
                                  ^~~~~~~
```
[R/leading.R:119:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L119) *style:* **Lines should not be more than 80 characters.**
```r
  #tabulated2 <- bb[, list(NPixels = .N), by = c("zone", "polygonID", "ageClass")] ## keeps polyID
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:119:4:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L119) *style:* **Commented code should be removed.**
```r
  #tabulated2 <- bb[, list(NPixels = .N), by = c("zone", "polygonID", "ageClass")] ## keeps polyID
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:120:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L120) *style:* **Lines should not be more than 80 characters.**
```r
  tabulated2 <- bb[, list(NPixels = .N), by = c("zone", "ageClass")] ## dedupes the zones
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:120:37:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L120) *warning:* **no visible binding for global variable ‘.N’, Did you mean 'bb'?**
```r
  tabulated2 <- bb[, list(NPixels = .N), by = c("zone", "ageClass")] ## dedupes the zones
                                    ^~
```
[R/leading.R:121:16:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L121) *warning:* **no visible binding for global variable ‘proportion’**
```r
  tabulated2[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone")]
               ^~~~~~~~~~
```
[R/leading.R:121:27:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L121) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
  tabulated2[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone")]
                          ^~
```
[R/leading.R:121:36:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L121) *warning:* **no visible binding for global variable ‘NPixels’**
```r
  tabulated2[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone")]
                                   ^~~~~~~
```
[R/leading.R:121:36:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L121) *warning:* **no visible binding for global variable ‘NPixels’**
```r
  tabulated2[, proportion := round(NPixels / sum(NPixels), 4), by = c("zone")]
                                   ^~~~~~~
```
[R/leading.R:122:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L122) *warning:* **no visible global function definition for ‘set’, Did you mean 'det'?**
```r
  set(tabulated2, NULL, "vegCover", "All species")
  ^~~
```
[R/leading.R:124:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L124) *style:* **Lines should not be more than 80 characters.**
```r
  tabulated <- rbindlist(list(tabulated, tabulated2), use.names = TRUE, fill = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:124:16:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L124) *warning:* **no visible global function definition for ‘rbindlist’**
```r
  tabulated <- rbindlist(list(tabulated, tabulated2), use.names = TRUE, fill = TRUE)
               ^~~~~~~~~
```
[R/leading.R:126:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L126) *style:* **Lines should not be more than 80 characters.**
```r
  ## column containing the factor names varies, so we need to search for the right one
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:127:1:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L127) *style:* **Lines should not be more than 80 characters.**
```r
  colID <- which(colnames(raster::levels(rasVeg)[[1]]) %in% c("category", "Factor", "VALUE"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/leading.R:127:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L127) *style:* **Variable or function name should be snake_case.**
```r
  colID <- which(colnames(raster::levels(rasVeg)[[1]]) %in% c("category", "Factor", "VALUE"))
  ^~~~~
```
[R/leading.R:128:3:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L128) *style:* **Variable or function name should be snake_case.**
```r
  coverClasses <- raster::levels(rasVeg)[[1]][[colID]]
  ^~~~~~~~~~~~
```
[R/leading.R:130:5:](https://github.com/PredictiveEcology/map/blob/2b70ce0da0d3ed1fd16cb0c52f67b782932a4f2d/R/leading.R#L130) *style:* **Variable or function name should be snake_case.**
```r
    coverClasses <- levels(coverClasses)
    ^~~~~~~~~~~~
```


double findMedianSortedArrays(vector<int>& v1, vector<int>& v2) {
    int n = v1.size();
    int m = v2.size();
    if (m < n)
    {
        return findMedianSortedArrays(v2, v1); //保证v1的大小小于v2
    }

    int l1 = 0, l2 = 0, r1 = 0, r2 = 0, c1 = 0, c2 = 0;
    int ls = 0, le = 2 * n;

    //通过虚拟在每个数组中添加空格，保证数组始终为偶数
   //虚拟位为偶数，真实位为奇数，l1 = (c1 - 1) / 2,r1 = c1 / 2;
   // n为偶数,分割在虚拟位，使l1,r1为数组中间的两个数
   // 如果n为奇数, 分割在数字位置,(n-1) / 2 == n / 2
   //保证了l1,r1始终是数组的中间数(中间一位数或者两位数)
    while (ls <= le)
    {
        //由c来确定中间数l1,r1的值
        c1 = (le + ls) / 2; //a数组的割，ls + （le - ls）/ 2
        c2 = m + n - c1; //保证c1左侧和c2左侧的数字个数之和为k，c1 + k = (2m + 2n) / 2

         //l1>r2,持续执行会造成c1= 0
        //l1<r2,持续执行会造成c1 = 2n
        //l2<r1,持续执行会造成c2 = 0
        //l2<r1,持续执行会造成c2 = 2m
        l1 = (c1 == 0) ? INT_MIN : v1[(c1 - 1) / 2];
        r1 = (c1 == 2 * n) ? INT_MAX : v1[c1 / 2];
        l2 = (c2 == 0) ? INT_MIN : v2[(c2 - 1) / 2];//m==n的时候会执行到这，不做处理,会越界
        r2 = (c2 == 2 * m) ? INT_MAX : v2[c2 / 2];

        if (l1 > r2) //l1 < r2,l2 < r1时，l1,l2才满足中位数
        {
            le = c1 - 1;
        }
        else if (l2 > r1) //r1需要变大
        {
            ls = c1 + 1;
        }
        else
        {
            break;
        }
    }
    return (std::max(l1, l2) + std::min(r1, r2)) / 2.0;
    }


That's good to know; I was thinking of asking if it was on your short-term tasklist.

An idea occurred to me while reading through the code. If a unique "slot index" (from `0` to `_max-1`) could be generated when a new physical connection was created, then `Release` could just put an idle connector back into `_idle[connector.PoolSlotIndex]` (instead of looping through the array looking for `null`). Not sure if this would be a significant performance improvement or not.

I'm also interested in knowing how you handle the case of a `NpgsqlConnection` being GCed without being disposed (i.e., by malformed client code). How does a connector transition from Busy to Idle when the client just "throws it away" (no `using` block)?


@gargol Would be cool to introduce

> localUtils.API.checkResponse(jsonResponse.errors[0], 'error')

🤸🏾♀


Is there a performance improvement on any platform, or is this just for legacy runtime compatibility?


ah yes that makes sense


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

Created multidev environment [ci-2](https://dashboard.pantheon.io/sites/b51e6a88-c1cd-41ef-9f3a-7b0431955fad#ci-2) for build-tools-1201.


Meaning something generic that would expand to all of those fields?


i used autopep8 command for indent so it indent according to pep8 standard for calling function but it hurts readability.


Similar to

> localUtils.API.checkResponse(jsonResponse.posts[0], 'post')


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

Created multidev environment [ci-2](https://dashboard.pantheon.io/sites/d4e7cc91-eec0-44c0-bb2e-53483bab0662#ci-2) for build-tools-1202.


Successfully aliased the URL <https://thatslack-7jc7z2vw5.now.sh> to the following alias.

* https://thatslack.thatconference.com


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

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

{
  "name": "package",
  "version": "1.0.0",
  "description": "",
  "main": "index.js",
  "scripts": {
    "start": "node index.js",
    "lint": "eslint",
    "deploy": "echo $TRAVIS_BRANCH && now alias --token=$SECRET_KEY "Node"",
    "build": "echo builded",
    "test": "echo \"Error: no test specified\""
  },
  "repository": {
    "type": "git",
    "url": "git+https://github.com/Mamontenokk/NodeLabs.git"
  },
  "author": "Vladyslav Shemchuk",
  "license": "ISC",
  "bugs": {
    "url": "https://github.com/Mamontenokk/NodeLabs/issues"
  },
  "homepage": "https://github.com/Mamontenokk/NodeLabs#readme",
  "devDependencies": {
    "eslint": "^5.14.1",
    "now": "^14.0.0"
  },
  "dependencies": {}
}


How do I use `configure` with patch applied?
If I run now `./configure` it would generate an incomplete `CONFIG` file even I set all flags provided by `configure` and then exit with an error that some `CONFIG_` options i.e. `CONFIG_IPSEC_MB` or `CONFIG_PMDK_DIR` were not provided.


@kuanfandevops looks like there are a lot of code references to 'frs' that may need to be updated to 'tfrs'.


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`

{
  "version": 2,
  "name": "pcy3",
  "builds": [
 { "src": "nodejs/*.js", "use": "@now/node" }
    ]

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


I do not know, apparently the processor checks something regardless of the condition (z flag)


Eens een keer wat veranderen voor de eerste keer.


Eens een tweede keer iets anders veranderen.


They didn't test😂


Deployment failed with the following error:

~~~
You defined 1 build that did not match any source files (please ensure they are NOT defined in .nowignore):
~~~


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

Created multidev environment [ci-2](https://dashboard.pantheon.io/sites/cb8464d0-07f5-432c-8ef6-d0c3eaffb5d2#ci-2) for build-tools-1208.


I just finished Linux CLI and Networking, so I am following you step by step


Fixes #1


Successfully aliased the URL <https://voisey-website-f8pmojpnn.now.sh> to the following alias.

* https://www.voisey.app


👍 Yay!


Сам смержил пулл реквест))
Все гуд единственное я уже точно такое же решение видел раньше у другого человека, возможно нагуглено но что уж))


I took you up on the offer to help on the project. I've done like the commit message says. Updated based on latest technical features. Readability and tidy up. Let me know if you want anything.


Good job you


La selezione del conto non viene permessa al di fuori della fattura però...


TeamCity Identity and Access Management / identity-hostedpages [Build 115](https://teamcity.nice.org.uk/viewLog.html?buildId=50251&buildTypeId=IdentityandAccessManagement_IdentityHostedpages) is now running


about time ... Thx for your patience


HTML CAN GET YOU THE MOST


### Visual regression report:

[![Visual report](https://circleci.com/gh/stevector/nerdologues-d8/2591/artifacts/0/artifact/backstop_data/bitmaps_test/20190225-154000/0600294051_Nerd_videos_2_0_document_0_desktop.png)](https://circleci.com/gh/stevector/nerdologues-d8/2591/artifacts/0/artifact/backstop_data/html_report/index.html)


Version 1 - Original Code:
```
2019-02-25 15:02:20.274 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent INSTALLED - org.openhab.binding.openweathermap
2019-02-25 15:02:20.292 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent RESOLVED - org.openhab.binding.openweathermap
2019-02-25 15:02:20.296 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent [unknown:512] - org.openhab.binding.openweathermap
2019-02-25 15:02:20.300 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent STARTING - org.openhab.binding.openweathermap
2019-02-25 15:02:20.301 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent STARTED - org.openhab.binding.openweathermap
2019-02-25 15:02:20.322 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent REGISTERED - {org.eclipse.smarthome.core.thing.binding.ThingHandlerFactory}={service.id=380, service.bundleid=247, service.scope=bundle, component.name=org.openhab.binding.openweathermap.internal.factory.OpenWeatherMapHandlerFactory, component.id=226} - org.openhab.binding.openweathermap
2019-02-25 15:02:20.335 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent REGISTERED - {org.eclipse.smarthome.config.discovery.DiscoveryService}={service.id=381, service.bundleid=247, service.scope=singleton} - org.openhab.binding.openweathermap
2019-02-25 15:02:20.340 [DEBUG] [overy.OpenWeatherMapDiscoveryService] - Activate OpenWeatherMap DiscoveryService.
2019-02-25 15:02:20.340 [DEBUG] [overy.OpenWeatherMapDiscoveryService] - Start OpenWeatherMap Location background discovery job at interval 60 s.
2019-02-25 15:02:20.342 [DEBUG] [overy.OpenWeatherMapDiscoveryService] - Location has been changed from null to 52.2923672,8.9113163,10 -> Creating new discovery results.
2019-02-25 15:02:20.349 [INFO ] [g.discovery.internal.PersistentInbox] - Added new thing 'openweathermap:weather-and-forecast:api:local' to inbox.
2019-02-25 15:02:20.361 [INFO ] [g.discovery.internal.PersistentInbox] - Added new thing 'openweathermap:uvindex:api:local' to inbox.
2019-02-25 15:02:20.374 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent REGISTERED - {org.eclipse.smarthome.core.thing.binding.ThingActions}={service.id=382, service.bundleid=247, service.scope=singleton} - org.openhab.binding.openweathermap
2019-02-25 15:02:20.374 [DEBUG] [ternal.actions.OpenWeatherMapActions] - Activate OpenWeatherMap ThingActions.
2019-02-25 15:02:20.384 [DEBUG] [nal.handler.OpenWeatherMapAPIHandler] - Initialize OpenWeatherMap API handler 'openweathermap:weather-api:api'.
2019-02-25 15:02:20.399 [DEBUG] [ap.internal.utils.ByteArrayFileCache] - Using cache folder '/var/lib/openhab2/cache/org.eclipse.smarthome.binding.openweathermap'
2019-02-25 15:02:20.406 [DEBUG] [nal.handler.OpenWeatherMapAPIHandler] - Start refresh job at interval 15 min.
2019-02-25 15:03:10.330 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent STOPPING - org.openhab.binding.openweathermap
2019-02-25 15:03:10.331 [DEBUG] [nal.handler.OpenWeatherMapAPIHandler] - Dispose OpenWeatherMap API handler 'openweathermap:weather-api:api'.
2019-02-25 15:03:10.331 [DEBUG] [nal.handler.OpenWeatherMapAPIHandler] - Stop refresh job.
2019-02-25 15:03:10.332 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent UNREGISTERING - {org.eclipse.smarthome.config.discovery.DiscoveryService}={service.id=381, service.bundleid=247, service.scope=singleton} - org.openhab.binding.openweathermap
2019-02-25 15:03:10.333 [DEBUG] [overy.OpenWeatherMapDiscoveryService] - Deactivate OpenWeatherMap DiscoveryService.
2019-02-25 15:03:10.334 [DEBUG] [overy.OpenWeatherMapDiscoveryService] - Stop OpenWeatherMap Location background discovery job.
2019-02-25 15:03:10.334 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent UNREGISTERING - {org.eclipse.smarthome.core.thing.binding.ThingActions}={service.id=382, service.bundleid=247, service.scope=singleton} - org.openhab.binding.openweathermap
2019-02-25 15:03:10.335 [DEBUG] [ternal.actions.OpenWeatherMapActions] - Deactivate OpenWeatherMap ThingActions.
2019-02-25 15:03:10.337 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent UNREGISTERING - {org.eclipse.smarthome.core.thing.binding.ThingHandlerFactory}={service.id=380, service.bundleid=247, service.scope=bundle, component.name=org.openhab.binding.openweathermap.internal.factory.OpenWeatherMapHandlerFactory, component.id=226} - org.openhab.binding.openweathermap
2019-02-25 15:03:10.345 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent STOPPED - org.openhab.binding.openweathermap
2019-02-25 15:03:10.346 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent UNRESOLVED - org.openhab.binding.openweathermap
2019-02-25 15:03:10.348 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent UNINSTALLED - org.openhab.binding.openweathermap
```

Version 2 - discovery via `getServices()`:
```
2019-02-25 14:42:00.121 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent INSTALLED - org.openhab.binding.openweathermap
2019-02-25 14:42:00.147 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent RESOLVED - org.openhab.binding.openweathermap
2019-02-25 14:42:00.152 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent [unknown:512] - org.openhab.binding.openweathermap
2019-02-25 14:42:00.159 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent STARTING - org.openhab.binding.openweathermap
2019-02-25 14:42:00.160 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent STARTED - org.openhab.binding.openweathermap
2019-02-25 14:42:00.194 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent REGISTERED - {org.eclipse.smarthome.core.thing.binding.ThingHandlerFactory}={service.id=378, service.bundleid=246, service.scope=bundle, component.name=org.openhab.binding.openweathermap.internal.factory.OpenWeatherMapHandlerFactory, component.id=225} - org.openhab.binding.openweathermap
2019-02-25 14:42:00.224 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent REGISTERED - {org.eclipse.smarthome.core.thing.binding.ThingActions}={service.id=379, service.bundleid=246, service.scope=singleton} - org.openhab.binding.openweathermap
2019-02-25 14:42:00.235 [DEBUG] [ternal.actions.OpenWeatherMapActions] - Activate OpenWeatherMap ThingActions.
2019-02-25 14:42:00.251 [DEBUG] [nal.handler.OpenWeatherMapAPIHandler] - Initialize OpenWeatherMap API handler 'openweathermap:weather-api:api'.
2019-02-25 14:42:00.254 [DEBUG] [ap.internal.utils.ByteArrayFileCache] - Using cache folder '/var/lib/openhab2/cache/org.eclipse.smarthome.binding.openweathermap'
2019-02-25 14:42:00.256 [DEBUG] [nal.handler.OpenWeatherMapAPIHandler] - Start refresh job at interval 15 min.
2019-02-25 14:51:40.214 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent STOPPING - org.openhab.binding.openweathermap
2019-02-25 14:51:40.215 [DEBUG] [nal.handler.OpenWeatherMapAPIHandler] - Dispose OpenWeatherMap API handler 'openweathermap:weather-api:api'.
2019-02-25 14:51:40.216 [DEBUG] [nal.handler.OpenWeatherMapAPIHandler] - Stop refresh job.
2019-02-25 14:51:40.219 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent UNREGISTERING - {org.eclipse.smarthome.core.thing.binding.ThingActions}={service.id=379, service.bundleid=246, service.scope=singleton} - org.openhab.binding.openweathermap
2019-02-25 14:51:40.221 [DEBUG] [ternal.actions.OpenWeatherMapActions] - Deactivate OpenWeatherMap ThingActions.
2019-02-25 14:51:40.222 [DEBUG] [org.openhab.binding.openweathermap  ] - ServiceEvent UNREGISTERING - {org.eclipse.smarthome.core.thing.binding.ThingHandlerFactory}={service.id=378, service.bundleid=246, service.scope=bundle, component.name=org.openhab.binding.openweathermap.internal.factory.OpenWeatherMapHandlerFactory, component.id=225} - org.openhab.binding.openweathermap
2019-02-25 14:51:40.242 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent STOPPED - org.openhab.binding.openweathermap
2019-02-25 14:51:40.242 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent UNRESOLVED - org.openhab.binding.openweathermap
2019-02-25 14:51:40.244 [DEBUG] [org.openhab.binding.openweathermap  ] - BundleEvent UNINSTALLED - org.openhab.binding.openweathermap
```

The `DiscoveryService` has not been activated properly whereas the `ThingActions` service works fine in both solutions.


Hi @rauhs,

Hicada is pretty cool and I'm giving it a shot after reading @SevereOverfl0w 's article. I have a problem however.

The following code works fine when I add an empty props map:
```
;; works ok
(html [:> BrowserRouter {}
  [:div "la la la"]])
```

But renders nothing when I remove the empty map. Instead it passes the children as props list to BrowserRouter component:
```
;; renders nothing, no warnings on console, div, la la la passed as props
(html [:> BrowserRouter
          [:div "la la la"]])
```
![screenshot 2019-02-25 at 9 09 19 pm](https://user-images.githubusercontent.com/1925158/53348744-a840fe80-3941-11e9-9e27-3d66a674eb70.png)

Is this the expected behaviour?


TeamCity Identity and Access Management / identity-hostedpages [Build 115-IDAM-112-Scaffold-cu](https://teamcity.nice.org.uk/viewLog.html?buildId=50251&buildTypeId=IdentityandAccessManagement_IdentityHostedpages) outcome was **SUCCESS**
Summary: Running Build time: 00:04:15


Collaborator: Review for this commit was created. [Link to review](https://epicsoftwa.smartbeartrial.com/ui#review:id=6)


Collaborator cannot find remote user mapping for author


Dmatics Website(A computer coaching for students)


This was only just merged, I don't think there's been a merge since.

You can try overriding `:>` to this version though.


@mapx- this generic hide rule whitelisted an annoyance:

![ivox](https://user-images.githubusercontent.com/35470489/53349085-14e4da80-38fb-11e9-9c11-5a4e48498ea2.png)


check the .h file for proto to see which public function to use the c++ tutorial for protobuf is not the correct one.


Corregido


Perhaps some of these headers like hash-list.h are not required anymore in this file?


just add `ivoox.com###gdpr-bottom`


Okay, Just realized this was merged only a few hours ago.

What config variable that I should change? I checked the docs & the blog post a few times but wasn't able to figure that out.


Successfully aliased the URL <https://sort-me-5ni0ikcb3.now.sh> to the following alias.

* https://sort-me.space


It is not ignore it is consider object as area to perform some shorter line navigation.


has_many :tasks needed on the user.


Bocs, beneztem, ott a \ref, de akkor nem pont, hanem alfejezet, vagy valami ilyesmi.


I think you want this to be XS_PERM_NONE since the first entry is special:
"The first element in the list specifies the owner of the list, plus the flags for every domain not explicitly specified subsequently."

from xenstore.h
>  * The perms array is a list of (domid, permissions) pairs. The first
>  * element in the list specifies the owner of the list, plus the flags
>  * for every domain not explicitly specified subsequently. The
>  * subsequent entries are normal capabilities.
>  *
>  * Example C code:
>  *
>  *  struct xs_permissions perms[2];
>  *
>  *  perms[0].id = dm_domid;
>  *  perms[0].perms = XS_PERM_NONE;
>  *  perms[1].id = guest_domid;
>  *  perms[1].perms = XS_PERM_READ;
>  *
>  * It means the owner of the path is domain $dm_domid (hence it always
>  * has read and write permission), all other domains (unless specified
>  * in subsequent pair) can neither read from nor write to that
>  * path. It then specifies domain $guest_domid can read from that
>  * path.

When it was left empty, it defaulted to XS_PERM_NONE since XS_PERM_NONE = 0.


Agree with @ccrs, I don't like the solution in the commit.

For the few cases where creatures actually walk instead of run for their running animation, they never have the need to toggle it on/off during a script?
A DB flag should be sufficient.


Да. А так нельзя?

пн, 25 февр. 2019 г., 14:00 Mikhail Chirich <notifications@github.com>:

> Как происходит добавление тегов к фото? Все в описании к фото нужно писать?
>
> —
> You are receiving this because you authored the thread.
> Reply to this email directly, view it on GitHub
> <https://github.com/ValeriaKudravec/MyRepository/commit/b218d5fb604fd0a43916d29610f1565481af1731#commitcomment-32457196>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/AtXZCgJ3dXVrps9cAehnIC8pdMYcGi8Cks5vQ8JYgaJpZM4bPnXJ>
> .
>


Sorry, may bad


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

* https://mindfully.now.sh


Okés


Комент


@jasperdenkers Shouldn't this `TODO` comment stay?


Closes #6


На одном уровне с `protected`

```
protected

def validate!
  ...
end
```


> @YOUR1 - could you send me a patch for the workaround you came up with, with the 10 ms delay or whatever it was?

Yeah will do, I'll submit it through Gerrit.


SnakeGame


Good. I was going to add these links.