Successfully aliased the URL <https://eusy-onudw6w0i.now.sh> to the following aliases:

* https://eusy.briandombrowski.now.sh
* https://eusy-git-master.briandombrowski.now.sh


i'm using python 3, so i don't need to specify the

> Within the class, you can declare and initialize the global variables in the `__init__()` function using `self`.

I'm using python 3, so instead of making the underscore based method, i just made a variable directly, that should work too right, or does it look neater to put it in a method, which is why you want me to put it in a method?


*.test.ds-ultimate.de???
solltest hier nicht *.ds-ultimate.de sein?


dito mit clanmember drunter


To distinguish: this is **not** `ClubCenterData = b5a1d1c616ee3ee203def69ccfeed6d7` which comes in when opening the _HC Center_


Hi, so I have an angular 8 application I am working on that's still getting the security message from npm. Has this been released? I may need to delete a directory or something?


see https://github.com/wtolson/pysis/issues/25 for making the ISIS3 conda env work while in other conda envs, similar to what Ross does in his package.


ich änder das gerade sowiso nur für den live jetzt, da es für den test unsinnig ist


@RadoRado I think that using [`issubclass()`](https://docs.python.org/3/library/functions.html#issubclass) is more pythonic than checking the `__mro__`.


Looks like the casing is fixed on the README.


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

Created multidev environment [v0-15](https://dashboard.pantheon.io/sites/39804e8f-253e-474e-82cf-725b36fddde0#v0-15) for rescue-x-base.


My reason for doing this within load_aug is that it allows us to use the same behaviors  as we already use without duplication of code (i.e.,  optional/auto_select/params arguments, autodetection of optional params, soon --input-aliases). And load_aug already has a code path (that you wrote) for spotting non-indexed parameters and loading a non-indexed (wide) csv. So it would just require a minor change to that code path (read the file and generate data values instead of reading it directly).

One point though is that we can't just use .load() to read the vertical csv because the "name" and "value" columns may conflict with other param names (or just other singleton parameter files). So we need to be careful to use exactly the same parsing rules as other csv files (e.g. support similar quoting and treatment of null values) while loading it some other way. But that's not insurmountable, and there's not really an argument for doing that in a separate function instead of in the singleton path in load_aug.

So if we are going to keep the behaviors we already have in load_aug, it seems to me to make sense to  just use load_aug for these singleton files.

On the other hand, I don't like a lot of aspects of our current arguments to load_aug: I think `optional_params` should be similar to `param`, listing components rather than names (e.g., hydro_system currently has `optional_params=['mod.wnode_constant_inflow', 'mod.wnode_constant_consumption']` due to this kind of confusion. Further, `param` should probably be called `params`, or maybe `mandatory_params`, and any particular param should probably only appear in `params` or `optional_params`, not both (again to avoid duplication and maintenance problems). And `auto_select` should be the default/only behavior for all calls. And really, all of this should actually be handled by tagging the param or set with its filename at creation time (along with tagging it with documentation info), and any column should be optional if and only if a default is defined. Then we could automate the load_aug calls and the user wouldn't have to learn or memorize any arguments. This would minimize duplication and enhance readability and maintainability. It would also support use of automatic tools to generate documentation, including cross-references between component names, the module where they're defined and the table where the values are read from.

So, with that in mind, it may not matter much how we handle reading the csv files for non-indexed parameters for now. But since we don't know how soon that transition will come, we might as well keep it logical, which probably means reusing load_aug (or at least most of its behavior).


Successfully aliased the URL <https://ui-8xm6nq43a.now.sh> to the following aliases:

* https://ui.manifold.now.sh
* https://ui-git-master.manifold.now.sh


@timneutkens can we get new canary to npm?


Successfully aliased the URL <https://docs-jmzws3om2.zeit.sh> to the following aliases:

* https://docs.zeit.sh
* https://docs-git-master.zeit.sh


I'm noticing this commit adds `quiet` to the gzip redirect profiles. As the main gzip.profile already has this option I'm wondering what the impact is of having it `twice`, if any.

On a side-note, comparing with our other archivers, it turns out there are some inconsistencies in how archiver redirect profiles deal with `quiet`. Some (e.g. bsdtar and tar) redirectors don't offer any `include foo.local` support and redirect straight to the parent profile. Hence this type of profile is inherently safe from including any option more than once. Others (e.g. 7z, atool, cpio, gzip) do support `include foo.local` functionality, and those might be vulnerable to having `quiet` twice. The latter currently only have it in the parent profile, never in the redirector itself, contrary to what this MR does. I always assumed the `quiet` option needed to be enabled as soon as possible, so it makes sense to place it before any include foo.local statement. **Just mentioning all this here to gather input on how we best deal with this consistently**.


Successfully aliased the URL <https://eusy-ate5tckz5.now.sh> to the following aliases:

* https://eusy.briandombrowski.now.sh
* https://eusy-git-master.briandombrowski.now.sh


[R/boxplots.R:2:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L2) *style:* **Lines should not be more than 80 characters.**
```r
  utils::globalVariables(c(".", ":=", ".SD", "ageClass", "group", "proportionCC",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:11:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L11) *style:* **Variable or function name should be snake_case.**
```r
.doPlotBoxplot <- function(data, authStatus, fname = NULL, ageClasses,
^~~~~~~~~~~~~~
```
[R/boxplots.R:11:34:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L11) *style:* **Variable or function name should be snake_case.**
```r
.doPlotBoxplot <- function(data, authStatus, fname = NULL, ageClasses,
                                 ^~~~~~~~~~
```
[R/boxplots.R:11:60:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L11) *style:* **Variable or function name should be snake_case.**
```r
.doPlotBoxplot <- function(data, authStatus, fname = NULL, ageClasses,
                                                           ^~~~~~~~~~
```
[R/boxplots.R:12:41:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L12) *style:* **Variable or function name should be snake_case.**
```r
                           fout = NULL, vegCover, zone, ...) {
                                        ^~~~~~~~
```
[R/boxplots.R:16:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L16) *style:* **Variable or function name should be snake_case.**
```r
  boxplotData <- data.table(zone = rep(zone, 4),
  ^~~~~~~~~~~
```
[R/boxplots.R:32:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L32) *style:* **Lines should not be more than 80 characters.**
```r
    points(data$proportionCC[ids], factor(data$ageClass[1:4]), col = "red", pch = 20, cex = 3)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:54:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L54) *style:* **Variable or function name should be snake_case.**
```r
runBoxPlotsVegCover <- function(map, functionName, analysisGroups, dPath) {
^~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:54:38:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L54) *style:* **Variable or function name should be snake_case.**
```r
runBoxPlotsVegCover <- function(map, functionName, analysisGroups, dPath) {
                                     ^~~~~~~~~~~~
```
[R/boxplots.R:54:52:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L54) *style:* **Variable or function name should be snake_case.**
```r
runBoxPlotsVegCover <- function(map, functionName, analysisGroups, dPath) {
                                                   ^~~~~~~~~~~~~~
```
[R/boxplots.R:54:68:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L54) *style:* **Variable or function name should be snake_case.**
```r
runBoxPlotsVegCover <- function(map, functionName, analysisGroups, dPath) {
                                                                   ^~~~~
```
[R/boxplots.R:55:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L55) *style:* **Variable or function name should be snake_case.**
```r
  ageClasses <- c("Young", "Immature", "Mature", "Old")
  ^~~~~~~~~~
```
[R/boxplots.R:56:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L56) *style:* **Variable or function name should be snake_case.**
```r
  allRepPolys <- na.omit(map@metadata[[analysisGroups]])
  ^~~~~~~~~~~
```
[R/boxplots.R:60:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L60) *style:* **Lines should not be more than 80 characters.**
```r
    allData <- map@analysesData[[functionName]][["LeadingVegTypeByAgeClass"]][[poly]]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:60:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L60) *style:* **Variable or function name should be snake_case.**
```r
    allData <- map@analysesData[[functionName]][["LeadingVegTypeByAgeClass"]][[poly]]
    ^~~~~~~
```
[R/boxplots.R:62:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L62) *style:* **Variable or function name should be snake_case.**
```r
      allData <- map@analysesData[[functionName]][[poly]] ## TODO: fix upstream
      ^~~~~~~
```
[R/boxplots.R:63:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L63) *style:* **Variable or function name should be snake_case.**
```r
    allData <- unique(allData) ## remove duplicates; with LandWeb#89
    ^~~~~~~
```
[R/boxplots.R:66:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L66) *style:* **Lines should not be more than 80 characters.**
```r
    allData[["vegCover"]] <- gsub(" leading", "", allData[["vegCover"]]) %>% ## no longer needed?
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:69:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L69) *style:* **Lines should not be more than 80 characters.**
```r
    allData[vegCover == "Fir", vegCover := "Abie_sp"] ## so far, rep01 is the only one needing fixing
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:69:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L69) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Fir", vegCover := "Abie_sp"] ## so far, rep01 is the only one needing fixing
            ^~~~~~~~
```
[R/boxplots.R:69:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L69) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Fir", vegCover := "Abie_sp"] ## so far, rep01 is the only one needing fixing
            ^~~~~~~~
```
[R/boxplots.R:69:32:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L69) *style:* **Variable or function name should be snake_case.**
```r
    allData[vegCover == "Fir", vegCover := "Abie_sp"] ## so far, rep01 is the only one needing fixing
                               ^~~~~~~~
```
[R/boxplots.R:69:41:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L69) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
    allData[vegCover == "Fir", vegCover := "Abie_sp"] ## so far, rep01 is the only one needing fixing
                                        ^~
```
[R/boxplots.R:70:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L70) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Wh Spruce", vegCover := "Pice_gla"]
            ^~~~~~~~
```
[R/boxplots.R:70:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L70) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Wh Spruce", vegCover := "Pice_gla"]
            ^~~~~~~~
```
[R/boxplots.R:70:38:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L70) *style:* **Variable or function name should be snake_case.**
```r
    allData[vegCover == "Wh Spruce", vegCover := "Pice_gla"]
                                     ^~~~~~~~
```
[R/boxplots.R:70:47:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L70) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
    allData[vegCover == "Wh Spruce", vegCover := "Pice_gla"]
                                              ^~
```
[R/boxplots.R:71:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L71) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Bl Spruce", vegCover := "Pice_mar"]
            ^~~~~~~~
```
[R/boxplots.R:71:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L71) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Bl Spruce", vegCover := "Pice_mar"]
            ^~~~~~~~
```
[R/boxplots.R:71:38:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L71) *style:* **Variable or function name should be snake_case.**
```r
    allData[vegCover == "Bl Spruce", vegCover := "Pice_mar"]
                                     ^~~~~~~~
```
[R/boxplots.R:71:47:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L71) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
    allData[vegCover == "Bl Spruce", vegCover := "Pice_mar"]
                                              ^~
```
[R/boxplots.R:72:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L72) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Pine", vegCover := "Pinu_sp"]
            ^~~~~~~~
```
[R/boxplots.R:72:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L72) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Pine", vegCover := "Pinu_sp"]
            ^~~~~~~~
```
[R/boxplots.R:72:33:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L72) *style:* **Variable or function name should be snake_case.**
```r
    allData[vegCover == "Pine", vegCover := "Pinu_sp"]
                                ^~~~~~~~
```
[R/boxplots.R:72:42:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L72) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
    allData[vegCover == "Pine", vegCover := "Pinu_sp"]
                                         ^~
```
[R/boxplots.R:73:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L73) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Decid", vegCover := "Popu_sp"]
            ^~~~~~~~
```
[R/boxplots.R:73:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L73) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    allData[vegCover == "Decid", vegCover := "Popu_sp"]
            ^~~~~~~~
```
[R/boxplots.R:73:34:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L73) *style:* **Variable or function name should be snake_case.**
```r
    allData[vegCover == "Decid", vegCover := "Popu_sp"]
                                 ^~~~~~~~
```
[R/boxplots.R:73:43:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L73) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
    allData[vegCover == "Decid", vegCover := "Popu_sp"]
                                          ^~
```
[R/boxplots.R:75:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L75) *style:* **Variable or function name should be snake_case.**
```r
    allData$ageClass <- factor(allData$ageClass, ageClasses)
            ^~~~~~~~
```
[R/boxplots.R:77:34:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L77) *warning:* **no visible binding for global variable ‘group’, Did you mean 'drop'?**
```r
    data <- allData[!grepl("CC", group)]
                                 ^~~~~
```
[R/boxplots.R:79:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L79) *style:* **Variable or function name should be snake_case.**
```r
    dataCC <- allData[grepl("CC", group)]
    ^~~~~~
```
[R/boxplots.R:79:35:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L79) *warning:* **no visible binding for global variable ‘group’, Did you mean 'drop'?**
```r
    dataCC <- allData[grepl("CC", group)]
                                  ^~~~~
```
[R/boxplots.R:80:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L80) *style:* **Lines should not be more than 80 characters.**
```r
    setnames(dataCC, "proportion", "proportionCC") ## rename the column to proportionCC
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:80:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L80) *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:81:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L81) *style:* **Variable or function name should be snake_case.**
```r
    dataCC <- dataCC[, c("group", "label", "NPixels") := list(NULL, NULL, NULL)]
    ^~~~~~
```
[R/boxplots.R:81:55:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L81) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
    dataCC <- dataCC[, c("group", "label", "NPixels") := list(NULL, NULL, NULL)]
                                                      ^~
```
[R/boxplots.R:83:32:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L83) *warning:* **no visible global function definition for ‘.’, Did you mean 'C'?**
```r
    data2 <- dataCC[data, on = .(zone, vegCover, ageClass)]
                               ^
```
[R/boxplots.R:83:34:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L83) *warning:* **no visible binding for global variable ‘zone’, Did you mean 'line'?**
```r
    data2 <- dataCC[data, on = .(zone, vegCover, ageClass)]
                                 ^~~~
```
[R/boxplots.R:83:40:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L83) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    data2 <- dataCC[data, on = .(zone, vegCover, ageClass)]
                                       ^~~~~~~~
```
[R/boxplots.R:83:50:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L83) *warning:* **no visible binding for global variable ‘ageClass’, Did you mean 'ageClasses'?**
```r
    data2 <- dataCC[data, on = .(zone, vegCover, ageClass)]
                                                 ^~~~~~~~
```
[R/boxplots.R:84:17:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L84) *warning:* **no visible binding for global variable ‘NPixels’**
```r
    data2[is.na(NPixels), NPixels := 0]
                ^~~~~~~
```
[R/boxplots.R:84:17:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L84) *warning:* **no visible binding for global variable ‘NPixels’**
```r
    data2[is.na(NPixels), NPixels := 0]
                ^~~~~~~
```
[R/boxplots.R:84:27:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L84) *style:* **Variable or function name should be snake_case.**
```r
    data2[is.na(NPixels), NPixels := 0]
                          ^~~~~~~
```
[R/boxplots.R:84:35:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L84) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
    data2[is.na(NPixels), NPixels := 0]
                                  ^~
```
[R/boxplots.R:87:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L87) *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:88:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L88) *style:* **Variable or function name should be snake_case.**
```r
    data2[, totalPixels := as.double(base::sum(NPixels, na.rm = TRUE)),
            ^~~~~~~~~~~
```
[R/boxplots.R:90:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L90) *style:* **Variable or function name should be snake_case.**
```r
    data2[, totalPixels2 := as.double(base::mean(totalPixels, na.rm = TRUE)),
            ^~~~~~~~~~~~
```
[R/boxplots.R:92:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L92) *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:99:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L99) *style:* **Lines should not be more than 80 characters.**
```r
    fout <- file.path(dPath, paste0("leading_boxplots_", gsub(" ", "_", poly), ".csv"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:102:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L102) *style:* **Variable or function name should be snake_case.**
```r
    saveDir <- checkPath(file.path(dPath, poly), create = TRUE)
    ^~~~~~~
```
[R/boxplots.R:102:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L102) *warning:* **local variable ‘saveDir’ assigned but may not be used**
```r
    saveDir <- checkPath(file.path(dPath, poly), create = TRUE)
    ^~~~~~~
```
[R/boxplots.R:102:16:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L102) *warning:* **no visible global function definition for ‘checkPath’**
```r
    saveDir <- checkPath(file.path(dPath, poly), create = TRUE)
               ^~~~~~~~~
```
[R/boxplots.R:103:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L103) *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:103:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L103) *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:114:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L114) *style:* **Lines should not be more than 80 characters.**
```r
                                    main = unique(paste(zone, vegCover, collapse = "_")),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:115:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L115) *style:* **Lines should not be more than 80 characters.**
```r
                                    xlab = paste0("Proportion of forest area (total ",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:117:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L117) *style:* **Lines should not be more than 80 characters.**
```r
                                                           prod(res(rasterToMatch(map))) / 1e4,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/boxplots.R:123:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/boxplots.R#L123) *style:* **Lines should not be more than 80 characters.**
```r
          .SDcols = c("ageClass", "proportion", "proportionCC", "NPixels"), by = slices]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:8:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L8) *style:* **Variable or function name should be snake_case.**
```r
.doPlotHistogram <- function(data, xlim, fname = NULL, ...) {
^~~~~~~~~~~~~~~~
```
[R/histograms.R:9:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L9) *style:* **Variable or function name should be snake_case.**
```r
  minNumBars <- 6
  ^~~~~~~~~~
```
[R/histograms.R:10:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L10) *style:* **Variable or function name should be snake_case.**
```r
  maxNumBars <- 30
  ^~~~~~~~~~
```
[R/histograms.R:11:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L11) *style:* **Variable or function name should be snake_case.**
```r
  rangeNClusters <- range(c(0, xlim, minNumBars)) ## TODO: verify
  ^~~~~~~~~~~~~~
```
[R/histograms.R:12:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L12) *style:* **Variable or function name should be snake_case.**
```r
  attemptedNumBars <- max(minNumBars, min(maxNumBars, diff(rangeNClusters)))
  ^~~~~~~~~~~~~~~~
```
[R/histograms.R:14:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L14) *style:* **Lines should not be more than 80 characters.**
```r
  breaksRaw <- seq(rangeNClusters[1], rangeNClusters[2], length.out = attemptedNumBars)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:14:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L14) *style:* **Variable or function name should be snake_case.**
```r
  breaksRaw <- seq(rangeNClusters[1], rangeNClusters[2], length.out = attemptedNumBars)
  ^~~~~~~~~
```
[R/histograms.R:15:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L15) *style:* **Lines should not be more than 80 characters.**
```r
  prettyBreaks <- pretty(breaksRaw, n = attemptedNumBars, min.n = min(attemptedNumBars, minNumBars))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:15:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L15) *style:* **Variable or function name should be snake_case.**
```r
  prettyBreaks <- pretty(breaksRaw, n = attemptedNumBars, min.n = min(attemptedNumBars, minNumBars))
  ^~~~~~~~~~~~
```
[R/histograms.R:17:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L17) *style:* **Variable or function name should be snake_case.**
```r
  dataForBreaks <- dataForHistogram <- if (NROW(data) == 0) {
  ^~~~~~~~~~~~~
```
[R/histograms.R:17:20:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L17) *style:* **Variable or function name should be snake_case.**
```r
  dataForBreaks <- dataForHistogram <- if (NROW(data) == 0) {
                   ^~~~~~~~~~~~~~~~
```
[R/histograms.R:24:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L24) *style:* **Variable or function name should be snake_case.**
```r
  breaksLabels <- dataForBreaks$breaks
  ^~~~~~~~~~~~
```
[R/histograms.R:25:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L25) *style:* **Variable or function name should be snake_case.**
```r
  breaksInterval <- diff(breaksLabels)[1]
  ^~~~~~~~~~~~~~
```
[R/histograms.R:27:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L27) *style:* **Lines should not be more than 80 characters.**
```r
  histogramData <- dataForHistogram$counts / sum(dataForHistogram$counts) ## use proportion
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:27:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L27) *style:* **Variable or function name should be snake_case.**
```r
  histogramData <- dataForHistogram$counts / sum(dataForHistogram$counts) ## use proportion
  ^~~~~~~~~~~~~
```
[R/histograms.R:28:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L28) *style:* **Lines should not be more than 80 characters.**
```r
  histogramData[is.na(histogramData)] <- 0 # NA means that there were no large patches in dt
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:30:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L30) *style:* **Variable or function name should be snake_case.**
```r
  barplotBreaks <- seq_along(breaksLabels) - 0.5
  ^~~~~~~~~~~~~
```
[R/histograms.R:31:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L31) *style:* **Lines should not be more than 80 characters.**
```r
  addAxisParams <- list(side = 1, labels = breaksLabels, at = barplotBreaks - min(breaksLabels))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:31:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L31) *style:* **Variable or function name should be snake_case.**
```r
  addAxisParams <- list(side = 1, labels = breaksLabels, at = barplotBreaks - min(breaksLabels))
  ^~~~~~~~~~~~~
```
[R/histograms.R:32:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L32) *style:* **Lines should not be more than 80 characters.**
```r
  verticalLineAtX <- unique(data$NCC)[1] / breaksInterval + 0.5 # The barplot xaxis is 1/2 a barwidth off
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:32:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L32) *style:* **Variable or function name should be snake_case.**
```r
  verticalLineAtX <- unique(data$NCC)[1] / breaksInterval + 0.5 # The barplot xaxis is 1/2 a barwidth off
  ^~~~~~~~~~~~~~~
```
[R/histograms.R:37:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L37) *style:* **Lines should not be more than 80 characters.**
```r
  if (!is.null(verticalLineAtX)) abline(v = verticalLineAtX, col = "red", lwd = 3)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:57:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L57) *style:* **Variable or function name should be snake_case.**
```r
runHistsLargePatches <- function(map, functionName, analysisGroups, dPath) {
^~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:57:39:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L57) *style:* **Variable or function name should be snake_case.**
```r
runHistsLargePatches <- function(map, functionName, analysisGroups, dPath) {
                                      ^~~~~~~~~~~~
```
[R/histograms.R:57:53:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L57) *style:* **Variable or function name should be snake_case.**
```r
runHistsLargePatches <- function(map, functionName, analysisGroups, dPath) {
                                                    ^~~~~~~~~~~~~~
```
[R/histograms.R:57:69:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L57) *style:* **Variable or function name should be snake_case.**
```r
runHistsLargePatches <- function(map, functionName, analysisGroups, dPath) {
                                                                    ^~~~~
```
[R/histograms.R:58:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L58) *style:* **Variable or function name should be snake_case.**
```r
  allRepPolys <- na.omit(map@metadata[[analysisGroups]])
  ^~~~~~~~~~~
```
[R/histograms.R:62:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L62) *style:* **Variable or function name should be snake_case.**
```r
    allData <- map@analysesData[[functionName]][["LargePatches"]][[poly]]
    ^~~~~~~
```
[R/histograms.R:64:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L64) *style:* **Variable or function name should be snake_case.**
```r
      allData <- map@analysesData[[functionName]][[poly]] ## TODO: fix upstream
      ^~~~~~~
```
[R/histograms.R:66:34:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L66) *warning:* **no visible binding for global variable ‘group’, Did you mean 'drop'?**
```r
    data <- allData[!grepl("CC", group)]
                                 ^~~~~
```
[R/histograms.R:67:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L67) *style:* **Variable or function name should be snake_case.**
```r
    dataCC <- allData[grepl("CC", group)]
    ^~~~~~
```
[R/histograms.R:67:35:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L67) *warning:* **no visible binding for global variable ‘group’, Did you mean 'drop'?**
```r
    dataCC <- allData[grepl("CC", group)]
                                  ^~~~~
```
[R/histograms.R:69:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L69) *style:* **Lines should not be more than 80 characters.**
```r
    data$rep <- as.numeric(factor(data$group)) ## TODO: workaround for incorrect rep values from LargePatches
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:72:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L72) *style:* **Variable or function name should be snake_case.**
```r
    slicesNoRep <- slices[slices != "rep"]
    ^~~~~~~~~~~
```
[R/histograms.R:74:19:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L74) *warning:* **no visible binding for global variable ‘ageClass’, Did you mean 'getClass'?**
```r
    data <- data[!ageClass == "NA" | !vegCover == "NA"]
                  ^~~~~~~~
```
[R/histograms.R:74:39:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L74) *warning:* **no visible binding for global variable ‘vegCover’**
```r
    data <- data[!ageClass == "NA" | !vegCover == "NA"]
                                      ^~~~~~~~
```
[R/histograms.R:75:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L75) *style:* **Variable or function name should be snake_case.**
```r
    emptyDT <- data.table(expand.grid(ageClass = unique(data$ageClass),
    ^~~~~~~
```
[R/histograms.R:80:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L80) *style:* **Variable or function name should be snake_case.**
```r
    patchSizes <- c(100, 500, 1000, 5000) ## minPatchSize <- 100
    ^~~~~~~~~~
```
[R/histograms.R:80:46:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L80) *style:* **Commented code should be removed.**
```r
    patchSizes <- c(100, 500, 1000, 5000) ## minPatchSize <- 100
                                             ^~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:82:41:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L82) *style:* **Variable or function name should be snake_case.**
```r
    fout <- lapply(patchSizes, function(minPatchSize) {
                                        ^~~~~~~~~~~~
```
[R/histograms.R:83:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L83) *style:* **Variable or function name should be snake_case.**
```r
      nClustersDT <- data[sizeInHa >= minPatchSize, .N, by = slices]
      ^~~~~~~~~~~
```
[R/histograms.R:83:27:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L83) *warning:* **no visible binding for global variable ‘sizeInHa’**
```r
      nClustersDT <- data[sizeInHa >= minPatchSize, .N, by = slices]
                          ^~~~~~~~
```
[R/histograms.R:83:53:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L83) *warning:* **no visible binding for global variable ‘.N’, Did you mean 'ar'?**
```r
      nClustersDT <- data[sizeInHa >= minPatchSize, .N, by = slices]
                                                    ^~
```
[R/histograms.R:84:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L84) *style:* **Variable or function name should be snake_case.**
```r
      nClustersDT <- nClustersDT[emptyDT, on = slices, nomatch = NA]
      ^~~~~~~~~~~
```
[R/histograms.R:85:25:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L85) *warning:* **no visible binding for global variable ‘N’, Did you mean 'C'?**
```r
      nClustersDT[is.na(N), N := 0]
                        ^
```
[R/histograms.R:85:25:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L85) *warning:* **no visible binding for global variable ‘N’, Did you mean 'C'?**
```r
      nClustersDT[is.na(N), N := 0]
                        ^
```
[R/histograms.R:85:29:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L85) *style:* **Variable or function name should be snake_case.**
```r
      nClustersDT[is.na(N), N := 0]
                            ^
```
[R/histograms.R:85:31:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L85) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
      nClustersDT[is.na(N), N := 0]
                              ^~
```
[R/histograms.R:87:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L87) *style:* **Variable or function name should be snake_case.**
```r
      nClustersDT_CC <- dataCC[sizeInHa >= minPatchSize, .N, by = slicesNoRep]
      ^~~~~~~~~~~~~~
```
[R/histograms.R:87:32:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L87) *warning:* **no visible binding for global variable ‘sizeInHa’**
```r
      nClustersDT_CC <- dataCC[sizeInHa >= minPatchSize, .N, by = slicesNoRep]
                               ^~~~~~~~
```
[R/histograms.R:87:58:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L87) *warning:* **no visible binding for global variable ‘.N’, Did you mean 'ar'?**
```r
      nClustersDT_CC <- dataCC[sizeInHa >= minPatchSize, .N, by = slicesNoRep]
                                                         ^~
```
[R/histograms.R:88:8:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L88) *style:* **Commented code should be removed.**
```r
      #nClustersDT_CC$rep <- as.numeric(nClustersDT_CC$rep)
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:89:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L89) *warning:* **no visible global function definition for ‘setnames’, Did you mean 'setNames'?**
```r
      setnames(nClustersDT_CC, "N", "NCC")
      ^~~~~~~~
```
[R/histograms.R:90:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L90) *style:* **Variable or function name should be snake_case.**
```r
      nClustersDT_CC <- nClustersDT_CC[emptyDT, on = slicesNoRep, nomatch = NA]
      ^~~~~~~~~~~~~~
```
[R/histograms.R:91:28:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L91) *warning:* **no visible binding for global variable ‘NCC’, Did you mean 'AIC'?**
```r
      nClustersDT_CC[is.na(NCC), NCC := 0]
                           ^~~
```
[R/histograms.R:91:28:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L91) *warning:* **no visible binding for global variable ‘NCC’, Did you mean 'AIC'?**
```r
      nClustersDT_CC[is.na(NCC), NCC := 0]
                           ^~~
```
[R/histograms.R:91:34:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L91) *style:* **Variable or function name should be snake_case.**
```r
      nClustersDT_CC[is.na(NCC), NCC := 0]
                                 ^~~
```
[R/histograms.R:91:38:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L91) *warning:* **no visible global function definition for ‘:=’, Did you mean ':'?**
```r
      nClustersDT_CC[is.na(NCC), NCC := 0]
                                     ^~
```
[R/histograms.R:93:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L93) *style:* **Variable or function name should be snake_case.**
```r
      nClustersDT <- nClustersDT[nClustersDT_CC, on = slices]
      ^~~~~~~~~~~
```
[R/histograms.R:97:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L97) *style:* **Lines should not be more than 80 characters.**
```r
                                                         "_", minPatchSize, ".csv"))))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:99:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L99) *style:* **Lines should not be more than 80 characters.**
```r
      saveDir <- checkPath(file.path(dPath, poly, "largePatches", minPatchSize), create = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:99:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L99) *style:* **Variable or function name should be snake_case.**
```r
      saveDir <- checkPath(file.path(dPath, poly, "largePatches", minPatchSize), create = TRUE)
      ^~~~~~~
```
[R/histograms.R:99:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L99) *warning:* **local variable ‘saveDir’ assigned but may not be used**
```r
      saveDir <- checkPath(file.path(dPath, poly, "largePatches", minPatchSize), create = TRUE)
      ^~~~~~~
```
[R/histograms.R:99:18:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L99) *warning:* **no visible global function definition for ‘checkPath’**
```r
      saveDir <- checkPath(file.path(dPath, poly, "largePatches", minPatchSize), create = TRUE)
                 ^~~~~~~~~
```
[R/histograms.R:100:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L100) *style:* **Variable or function name should be snake_case.**
```r
      savePng <- quote(file.path(saveDir, paste0(paste(unique(polygonName),
      ^~~~~~~
```
[R/histograms.R:103:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L103) *style:* **Lines should not be more than 80 characters.**
```r
                                                       collapse = " "), ".png")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:105:8:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L105) *style:* **Commented code should be removed.**
```r
      #browser()
       ^~~~~~~~~
```
[R/histograms.R:117:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L117) *style:* **Lines should not be more than 80 characters.**
```r
                                              xlab = paste0("Number of patches greater than ",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/histograms.R:118:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/histograms.R#L118) *style:* **Lines should not be more than 80 characters.**
```r
                                                            minPatchSize, " ha"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:25:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L25) *style:* **Lines should not be more than 80 characters.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses,
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:25:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L25) *style:* **Variable or function name should be snake_case.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses,
^~~~~~~~~~~~
```
[R/largePatches.R:25:42:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L25) *style:* **Variable or function name should be snake_case.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses,
                                         ^~~~~~~~~~~
```
[R/largePatches.R:25:59:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L25) *style:* **Variable or function name should be snake_case.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses,
                                                          ^~~~~~~~~~~~~~~
```
[R/largePatches.R:25:76:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L25) *style:* **Variable or function name should be snake_case.**
```r
LargePatches <- function(tsf, vtm, poly, labelColumn, id, ageClassCutOffs, ageClasses,
                                                                           ^~~~~~~~~~
```
[R/largePatches.R:26:26:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L26) *style:* **Variable or function name should be snake_case.**
```r
                         sppEquivCol, sppEquiv) {
                         ^~~~~~~~~~~
```
[R/largePatches.R:26:39:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L26) *style:* **Variable or function name should be snake_case.**
```r
                         sppEquivCol, sppEquiv) {
                                      ^~~~~~~~
```
[R/largePatches.R:32:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L32) *style:* **Variable or function name should be snake_case.**
```r
  timeSinceFireFilesRast <- Cache(.rasterToMemory, tsf[1])
  ^~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:32:29:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L32) *warning:* **no visible global function definition for ‘Cache’**
```r
  timeSinceFireFilesRast <- Cache(.rasterToMemory, tsf[1])
                            ^~~~~
```
[R/largePatches.R:32:35:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L32) *warning:* **no visible binding for global variable ‘.rasterToMemory’**
```r
  timeSinceFireFilesRast <- Cache(.rasterToMemory, tsf[1])
                                  ^~~~~~~~~~~~~~~
```
[R/largePatches.R:41:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L41) *style:* **Variable or function name should be snake_case.**
```r
  rasRepPoly <- Cache(
  ^~~~~~~~~~
```
[R/largePatches.R:44:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L44) *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:49:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L49) *style:* **Variable or function name should be snake_case.**
```r
  rasVeg <- Cache(.rasterToMemory, vtm)
  ^~~~~~
```
[R/largePatches.R:49:13:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L49) *warning:* **no visible global function definition for ‘Cache’**
```r
  rasVeg <- Cache(.rasterToMemory, vtm)
            ^~~~~
```
[R/largePatches.R:49:19:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L49) *warning:* **no visible binding for global variable ‘.rasterToMemory’**
```r
  rasVeg <- Cache(.rasterToMemory, vtm)
                  ^~~~~~~~~~~~~~~
```
[R/largePatches.R:51:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L51) *style:* **Lines should not be more than 80 characters.**
```r
  splitVal <- paste0("_", 75757575, "_") # unlikely to occur for any other reason
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:51:3:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L51) *style:* **Variable or function name should be snake_case.**
```r
  splitVal <- paste0("_", 75757575, "_") # unlikely to occur for any other reason
  ^~~~~~~~
```
[R/largePatches.R:55:35:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L55) *warning:* **no visible global function definition for ‘factorValues2’**
```r
  nas2 <- is.na(rasVeg[]) | is.na(factorValues2(rasVeg, rasVeg[], att = 1))
                                  ^~~~~~~~~~~~~
```
[R/largePatches.R:60:6:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L60) *style:* **Commented code should be removed.**
```r
    #name1a <- as.character(raster::levels(tsf)[[1]]$Factor)[tsf[][!nas]]
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:61:27:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L61) *warning:* **no visible global function definition for ‘factorValues2’**
```r
    name1 <- as.character(factorValues2(tsf, tsf[], att = 2)[!nas])
                          ^~~~~~~~~~~~~
```
[R/largePatches.R:63:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L63) *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:63:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L63) *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:65:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L65) *style:* **Lines should not be more than 80 characters.**
```r
    #name2a <- as.character(raster::levels(rasVeg)[[1]][[colID]])[rasVeg[][!nas]]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:65:6:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L65) *style:* **Commented code should be removed.**
```r
    #name2a <- as.character(raster::levels(rasVeg)[[1]][[colID]])[rasVeg[][!nas]]
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:66:27:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L66) *warning:* **no visible global function definition for ‘factorValues2’**
```r
    name2 <- as.character(factorValues2(rasVeg, rasVeg[], att = colID)[!nas])
                          ^~~~~~~~~~~~~
```
[R/largePatches.R:72:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L72) *style:* **Lines should not be more than 80 characters.**
```r
    if (!identical(length(name1), length(name2)) || !identical(length(name1), length(name3)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:73:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L73) *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:76:12:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L76) *warning:* **no visible global function definition for ‘raster’, Did you mean 'rasVeg'?**
```r
    ras <- raster(rasVeg)
           ^~~~~~
```
[R/largePatches.R:77:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L77) *style:* **Variable or function name should be snake_case.**
```r
    ffFactor <- factor(ff)
    ^~~~~~~~
```
[R/largePatches.R:78:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L78) *style:* **Lines should not be more than 80 characters.**
```r
    ras[!nas] <- ffFactor # 2 seconds ## note: sum(!nas, na.rm = TRUE) should equal length(ffFactor)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:80:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L80) *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:80:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L80) *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:80:23:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L80) *warning:* **no visible global function definition for ‘Cache’**
```r
    areaAndPolyOut <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
                      ^~~~~
```
[R/largePatches.R:80:29:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L80) *warning:* **no visible binding for global variable ‘areaAndPolyValue’**
```r
    areaAndPolyOut <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
                            ^~~~~~~~~~~~~~~~
```
[R/largePatches.R:81:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L81) *style:* **Lines should not be more than 80 characters.**
```r
    eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:81:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L81) *style:* **Variable or function name should be snake_case.**
```r
    eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
    ^~~~~~
```
[R/largePatches.R:85:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L85) *style:* **Variable or function name should be snake_case.**
```r
    facPolygonID <- factor(types[areaAndPolyOut$polyID,3])
    ^~~~~~~~~~~~
```
[R/largePatches.R:85:56:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L85) *style:* **Commas should always have a space after.**
```r
    facPolygonID <- factor(types[areaAndPolyOut$polyID,3])
                                                       ^
```
[R/largePatches.R:86:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L86) *style:* **Variable or function name should be snake_case.**
```r
    outBySpecies <- data.table(polygonID = as.numeric(facPolygonID),
    ^~~~~~~~~~~~
```
[R/largePatches.R:96:12:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L96) *warning:* **no visible global function definition for ‘raster’, Did you mean 'rasVeg'?**
```r
    ras <- raster(rasVeg)
           ^~~~~~
```
[R/largePatches.R:97:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L97) *style:* **Variable or function name should be snake_case.**
```r
    ffFactor <- factor(ff)
    ^~~~~~~~
```
[R/largePatches.R:101:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L101) *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:101:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L101) *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:101:24:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L101) *warning:* **no visible global function definition for ‘Cache’**
```r
    areaAndPolyOut2 <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
                       ^~~~~
```
[R/largePatches.R:101:30:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L101) *warning:* **no visible binding for global variable ‘areaAndPolyValue’**
```r
    areaAndPolyOut2 <- Cache(areaAndPolyValue, ras, length = Inf) # maybe lots of NAs on edge
                             ^~~~~~~~~~~~~~~~
```
[R/largePatches.R:103:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L103) *style:* **Lines should not be more than 80 characters.**
```r
    eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:103:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L103) *style:* **Variable or function name should be snake_case.**
```r
    eTable <- data.frame(ID = seq_along(levels(ffFactor)), VALUE = levels(ffFactor))
    ^~~~~~
```
[R/largePatches.R:107:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L107) *style:* **Variable or function name should be snake_case.**
```r
    facPolygonID <- factor(types[areaAndPolyOut2$polyID, 2])
    ^~~~~~~~~~~~
```
[R/largePatches.R:109:5:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L109) *style:* **Variable or function name should be snake_case.**
```r
    outAllSpecies <- data.table(polygonID = as.numeric(facPolygonID),
    ^~~~~~~~~~~~~
```
[R/largePatches.R:116:12:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L116) *warning:* **no visible global function definition for ‘rbindlist’**
```r
    out <- rbindlist(list(outBySpecies, outAllSpecies))
           ^~~~~~~~~
```
[R/largePatches.R:117:16:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L117) *warning:* **no visible binding for global variable ‘sizeInHa’**
```r
    out <- out[sizeInHa >= 100] # never will need patches smaller than 100 ha
               ^~~~~~~~
```
[R/largePatches.R:119:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L119) *style:* **Lines should not be more than 80 characters.**
```r
    out <- data.table(polygonID = character(), sizeInHa = numeric(), vegCover = character(),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:120:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L120) *style:* **Lines should not be more than 80 characters.**
```r
                      rep = numeric(), ageClass = numeric(), polygonName = numeric())
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/largePatches.R:124:7:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/largePatches.R#L124) *style:* **Variable or function name should be snake_case.**
```r
      vegCover := equivalentName(vegCover, sppEquiv, sppEquivCol)]
      ^~~~~~~~
```
[R/leading.R:11:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/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/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/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/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/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/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/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/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/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/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/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:28:1:](https://github.com/PredictiveEcology/LandWebUtils/blob/d22f8012623811e109cb4c979acf81ab30287e78/R/leading.R#L28) *style:* **Lines should not be more than 80 characters.**
```r
#' @return A \code{data.table} with proportion of the pixels in each vegetation class,


Successfully aliased the URL <https://botvoyagergithubio-grdf79qbw.now.sh> to the following aliases:

* https://botvoyagergithubio.cookiedevrbxl.now.sh
* https://botvoyagergithubio-git-master.cookiedevrbxl.now.sh


This commit may have broken IPv6 defaultrouter6 configuration:

root@nas /mnt/iocage]# iocage start auto
* Starting auto
  + Started OK
  + Using devfs_ruleset: 5
  + Configuring VNET FAILED
  route: 2603:abcd:abcd:e1::5%epair0b: hostname nor servname provided, or not known

Stopped auto due to VNET failure

rolling back to 1.2-RELEASE I don't see this issue


Die Methode, welche du suchst, nennt sich `JComponent#setPreferredSize(Dimension):void`. Die meisten Swing Elemente erben davon: [https://docs.oracle.com/en/java/javase/11/docs/api/java.desktop/javax/swing/JComponent.html#setPreferredSize(java.awt.Dimension)](url)

Tipp: Setze im Konstruktor von `Map` `panel2` mittels der Methode `setViewportView(JComponent):void`. Dadurch kannst du `panel2` als privates Klassenattribut definieren und deine `Main` Klasse wird übersichtlicher. Es genügt dort dann einmalig eine `Map` zu erzeugen und diese dem Fenster hinzuzufügen.


calculating variance, covariance and Pearson coefficient and doing simulation using random data from bernoulli distribution, binomial distribution using python


![](https://github.trello.services/images/mini-trello-icon.png) [Back button](https://trello.com/c/8eCbTbzJ/26-back-button)


Dear Poggit user,

This is an automatic message from Poggit-CI. Poggit-CI was triggered by this commit, but failed to create builds due to the following error:

```
Resend this delivery later. This commit is triggered by user note3crafter,
who has created 50 Poggit-CI builds in the past 168 hours.

Contact @SOF3 [on Discord](https://discord.gg/NgHf9jt) to request for extra
quota. We will increase your quota for free if you are really contributing
to open-source plugins actively without abusing Git commits.
```

As a result, no builds could be created from this commit. More details might be available for repo admins at [the webhook delivery response log](https://github.com/note3crafter/BedWars-German-Edition/settings/hooks) — see the webhook starting with `https://poggit.pmmp.io/webhooks.gh.repo` and look for the delivery with ID `bdb99c10-bd3d-11e9-8dde-ce1f1e977597`.

Shall you need any assistance, you may contact us on [on Discord](https://discord.gg/NgHf9jt), or more publicly, [on GitHub](https://github.com/poggit/support/issues). Commenting on this commit directly will **not** notify any Poggit staff.

Regards,
Poggit Bot (@poggit-bot)
The official Poggit automation account


![](https://github.trello.services/images/mini-trello-icon.png) [Category page](https://trello.com/c/TBcEEr22/4-category-page)


Successfully aliased the URL <https://garitma-obytz3yrt.now.sh> to the following aliases:

* https://garitma.com
* https://garitma.garitma.now.sh
* https://garitma-git-master.garitma.now.sh


![](https://github.trello.services/images/mini-trello-icon.png) [Implement ListView functionality](https://trello.com/c/dGJkffUb/3-implement-listview-functionality)


Successfully aliased the URL <https://serovaphoto-d4hmqm21i.now.sh> to the following aliases:

* https://serovaphoto.veshelchaku.now.sh
* https://serovaphoto-git-master.veshelchaku.now.sh


![](https://github.trello.services/images/mini-trello-icon.png) [Create ListView](https://trello.com/c/5m61YuKB/2-create-listview)