<details>

<summary>Submitting the task to Taskcluster failed. Details</summary>

Client ID project/taskcluster/tc-github/production does not have sufficient scopes and are missing the following scopes:

```
{
  "AllOf": [
    "secrets:get:project/focus/preview-key-store",
    "queue:route:index.project.focus.android.preview-builds"
  ]
}
```

You have the scopes:

```
[
  "assume:project:taskcluster:mozilla-github-repository",
  "assume:repo:github.com/mozilla-mobile/focus-android:branch:remove-x86-tests",
  "notify:email:*",
  "notify:irc-channel:*",
  "notify:irc-user:*",
  "queue:create-task:aws-provisioner-v1/github-worker",
  "queue:create-task:aws-provisioner-v1/github-worker-windows",
  "queue:create-task:aws-provisioner-v1/win2012r2",
  "queue:route:garbage.*",
  "queue:route:index.garbage.*",
  "queue:route:notify.email.*",
  "queue:route:notify.irc-channel.*",
  "queue:route:notify.irc-user.*",
  "queue:scheduler-id:taskcluster-github",
  "secrets:get:garbage/*",
  "secrets:get:project/focus/firebase",
  "secrets:get:project/focus/nimbledroid",
  "secrets:set:garbage/*"
]
```

This request requires you to satisfy this scope expression:

```
{
  "AllOf": [
    "queue:create-task:aws-provisioner-v1/github-worker",
    "queue:scheduler-id:taskcluster-github",
    "secrets:get:project/focus/preview-key-store",
    "queue:route:index.project.focus.android.preview-builds",
    "secrets:get:project/focus/firebase",
    "secrets:get:project/focus/nimbledroid",
    "queue:route:notify.irc-channel.#android-ci.on-any",
    {
      "AnyOf": [
        {
          "AllOf": [
            "queue:scheduler-id:taskcluster-github",
            {
              "AnyOf": [
                "queue:create-task:highest:aws-provisioner-v1/github-worker",
                "queue:create-task:very-high:aws-provisioner-v1/github-worker",
                "queue:create-task:high:aws-provisioner-v1/github-worker",
                "queue:create-task:medium:aws-provisioner-v1/github-worker",
                "queue:create-task:low:aws-provisioner-v1/github-worker",
                "queue:create-task:very-low:aws-provisioner-v1/github-worker",
                "queue:create-task:lowest:aws-provisioner-v1/github-worker"
              ]
            }
          ]
        },
        {
          "AnyOf": [
            "queue:create-task:aws-provisioner-v1/github-worker",
            {
              "AllOf": [
                "queue:define-task:aws-provisioner-v1/github-worker",
                "queue:task-group-id:taskcluster-github/erWpJ2zJR9uTr6yYVjIoCA",
                "queue:schedule-task:taskcluster-github/erWpJ2zJR9uTr6yYVjIoCA/erWpJ2zJR9uTr6yYVjIoCA"
              ]
            }
          ]
        }
      ]
    }
  ]
}
```

---

* method:     createTask
* errorCode:  InsufficientScopes
* statusCode: 403
* time:       2018-11-21T23:16:15.124Z

</details>


It's local, not hosted, it's downloadable.


这个Hex是ccs工程生成的吗？题给的hex文件不是标准的Intel hex文件，标准的hex文件行首以冒号开始这个格式是ida直接可以载入的。ti的工具不是很友好输出都是为自己一套工具链设计的


Added Githib pages link.


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

* https://pints.run


Thanks! Comes in handy 🥂


<details>

<summary>Submitting the task to Taskcluster failed. Details</summary>

end of the stream or a document separator is expected at line 70, column 2:
    	- 'notify.irc-channel.#android-c ...
     ^

</details>


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


Ese cambio esta incorrecto, de hecho, solo funciona con http, revisa de nuevo y me comentas:

- http://numbersapi.com/ ->si funciona
- https://numbersapi.com/ -> no funciona


[R/create_bd_tree.R:70:18:](https://github.com/richelbilderbeek/razzo/blob/b778e8afae3b3478c9d3939a2ed3b91c52322735/R/create_bd_tree.R#L70) *warning:* **no visible global function definition for ‘bd_phylo_2_l_table’**
```r
  bd_l_matrix <- bd_phylo_2_l_table(bd_tree)
                 ^~~~~~~~~~~~~~~~~~
```
[R/utils.R:65:10:](https://github.com/richelbilderbeek/razzo/blob/b778e8afae3b3478c9d3939a2ed3b91c52322735/R/utils.R#L65) *warning:* **no visible global function definition for ‘convert_tree2brts’**
```r
  brt <- convert_tree2brts(phylo)
         ^~~~~~~~~~~~~~~~~
```


not a good practice to pass in `record` because then this function relies on returned value of another as a parameter, so it's depending on something that's not explicitly stated


[R/chooseName.R:11:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/chooseName.R#L11) *style:* **Variable or function name should be snake_case.**
```r
equivalentName <- function(value, df, column) {
^~~~~~~~~~~~~~
```
[R/chooseName.R:13:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/chooseName.R#L13) *style:* **Variable or function name should be snake_case.**
```r
  likelyMatch <- which.max(unlist(lapply(out, function(x) sum(!is.na(x)))))
  ^~~~~~~~~~~
```
[R/cleanLandWebStudyArea.R:10:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/cleanLandWebStudyArea.R#L10) *style:* **Variable or function name should be snake_case.**
```r
.cleanLandWebStudyArea <- function(poly, minFRI = 40) {
^~~~~~~~~~~~~~~~~~~~~~
```
[R/cleanLandWebStudyArea.R:10:42:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/cleanLandWebStudyArea.R#L10) *style:* **Variable or function name should be snake_case.**
```r
.cleanLandWebStudyArea <- function(poly, minFRI = 40) {
                                         ^~~~~~
```
[R/cleanLandWebStudyArea.R:12:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/cleanLandWebStudyArea.R#L12) *warning:* **no visible global function definition for ‘createPrjFile’**
```r
    createPrjFile(poly)
    ^~~~~~~~~~~~~
```
[R/cleanLandWebStudyArea.R:19:10:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/cleanLandWebStudyArea.R#L19) *style:* **Variable or function name should be snake_case.**
```r
    poly$LTHRC <- poly$LTHFC
         ^~~~~
```
[R/cleanLandWebStudyArea.R:20:10:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/cleanLandWebStudyArea.R#L20) *style:* **Variable or function name should be snake_case.**
```r
    poly$LTHFC <- NULL
         ^~~~~
```
[R/cleanLandWebStudyArea.R:24:10:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/cleanLandWebStudyArea.R#L24) *style:* **Variable or function name should be snake_case.**
```r
    poly$fireReturnInterval <- poly$LTHRC
         ^~~~~~~~~~~~~~~~~~
```
[R/cleanLandWebStudyArea.R:25:10:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/cleanLandWebStudyArea.R#L25) *style:* **Variable or function name should be snake_case.**
```r
    poly$LTHRC <- NULL
         ^~~~~
```
[R/gis.R:12:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L12) *style:* **Variable or function name should be snake_case.**
```r
createPrjFile <- function(shpFile,
^~~~~~~~~~~~~
```
[R/gis.R:12:27:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L12) *style:* **Variable or function name should be snake_case.**
```r
createPrjFile <- function(shpFile,
                          ^~~~~~~
```
[R/gis.R:13:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L13) *style:* **Lines should not be more than 80 characters.**
```r
                          urlForProj = "http://spatialreference.org/ref/epsg/nad83-utm-zone-11n/prj/") {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/gis.R:13:27:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L13) *style:* **Variable or function name should be snake_case.**
```r
                          urlForProj = "http://spatialreference.org/ref/epsg/nad83-utm-zone-11n/prj/") {
                          ^~~~~~~~~~
```
[R/gis.R:14:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L14) *style:* **Variable or function name should be snake_case.**
```r
  basenameWithoutExt <- file_path_sans_ext(shpFile)
  ^~~~~~~~~~~~~~~~~~
```
[R/gis.R:14:25:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L14) *warning:* **no visible global function definition for ‘file_path_sans_ext’**
```r
  basenameWithoutExt <- file_path_sans_ext(shpFile)
                        ^~~~~~~~~~~~~~~~~~
```
[R/gis.R:15:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L15) *style:* **Variable or function name should be snake_case.**
```r
  basenameWithoutExt <- basenameWithoutExt[-length(basenameWithoutExt)]
  ^~~~~~~~~~~~~~~~~~
```
[R/gis.R:16:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L16) *style:* **Variable or function name should be snake_case.**
```r
  prjFile <- paste0(basenameWithoutExt, ".prj")
  ^~~~~~~
```
[R/gis.R:34:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L34) *style:* **Variable or function name should be snake_case.**
```r
polygonClean <- function(poly, fn = NULL, type = NULL, ...) {
^~~~~~~~~~~~
```
[R/gis.R:59:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L59) *style:* **Variable or function name should be snake_case.**
```r
factorValues2 <- function(x, v, layer, att, append.names, na.rm = FALSE) {
^~~~~~~~~~~~~
```
[R/gis.R:59:45:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L59) *style:* **Variable or function name should be snake_case.**
```r
factorValues2 <- function(x, v, layer, att, append.names, na.rm = FALSE) {
                                            ^~~~~~~~~~~~
```
[R/gis.R:59:59:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L59) *style:* **Variable or function name should be snake_case.**
```r
factorValues2 <- function(x, v, layer, att, append.names, na.rm = FALSE) {
                                                          ^~~~~
```
[R/gis.R:94:36:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L94) *style:* **Variable or function name should be snake_case.**
```r
          definition = function(x, studyArea, ...) {
                                   ^~~~~~~~~
```
[R/gis.R:107:36:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L107) *style:* **Variable or function name should be snake_case.**
```r
          definition = function(x, studyArea, rasterToMatch, ...) {
                                   ^~~~~~~~~
```
[R/gis.R:107:47:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L107) *style:* **Variable or function name should be snake_case.**
```r
          definition = function(x, studyArea, rasterToMatch, ...) {
                                              ^~~~~~~~~~~~~
```
[R/gis.R:108:13:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L108) *style:* **Variable or function name should be snake_case.**
```r
            numPolys <- length(x)
            ^~~~~~~~
```
[R/gis.R:109:13:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L109) *style:* **Variable or function name should be snake_case.**
```r
            xDF <- as.data.frame(x)
            ^~~
```
[R/gis.R:110:15:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L110) *style:* **Variable or function name should be snake_case.**
```r
            x$numPolys <- seq_len(numPolys)
              ^~~~~~~~
```
[R/gis.R:111:13:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/gis.R#L111) *style:* **Variable or function name should be snake_case.**
```r
            xDF <- data.frame(ID = x$numPolys, xDF)
            ^~~
```
[R/helpers.R:6:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/helpers.R#L6) *style:* **Variable or function name should be snake_case.**
```r
toSentenceCase <- function(x) {
^~~~~~~~~~~~~~
```
[R/helpers.R:7:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/helpers.R#L7) *style:* **Variable or function name should be snake_case.**
```r
  newNames <- tolower(x)
  ^~~~~~~~
```
[R/MapOrDoCall.R:10:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L10) *style:* **Variable or function name should be snake_case.**
```r
optimalClusterNum <- function(memRequiredMB = 500, maxNumClusters = 1) {
^~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:10:31:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L10) *style:* **Variable or function name should be snake_case.**
```r
optimalClusterNum <- function(memRequiredMB = 500, maxNumClusters = 1) {
                              ^~~~~~~~~~~~~
```
[R/MapOrDoCall.R:10:52:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L10) *style:* **Variable or function name should be snake_case.**
```r
optimalClusterNum <- function(memRequiredMB = 500, maxNumClusters = 1) {
                                                   ^~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:12:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L12) *style:* **Variable or function name should be snake_case.**
```r
    detectedNumCores <- parallel::detectCores()
    ^~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:13:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L13) *style:* **Variable or function name should be snake_case.**
```r
    shouldUseCluster <- (maxNumClusters > 0)
    ^~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:20:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L20) *style:* **Variable or function name should be snake_case.**
```r
        availMem <- as.numeric(bb[[1]][nzchar(bb[[1]])][7]) # 'available' column
        ^~~~~~~~
```
[R/MapOrDoCall.R:21:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L21) *style:* **Variable or function name should be snake_case.**
```r
        numClusters <- floor(min(detectedNumCores, availMem / memRequiredMB))
        ^~~~~~~~~~~
```
[R/MapOrDoCall.R:24:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L24) *style:* **Variable or function name should be snake_case.**
```r
        numClusters <- 1
        ^~~~~~~~~~~
```
[R/MapOrDoCall.R:26:7:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L26) *style:* **Variable or function name should be snake_case.**
```r
      numClusters <- min(maxNumClusters, numClusters, detectedNumCores)
      ^~~~~~~~~~~
```
[R/MapOrDoCall.R:28:7:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L28) *style:* **Variable or function name should be snake_case.**
```r
      numClusters <- 1
      ^~~~~~~~~~~
```
[R/MapOrDoCall.R:32:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L32) *style:* **Variable or function name should be snake_case.**
```r
    numClusters <- 1
    ^~~~~~~~~~~
```
[R/MapOrDoCall.R:54:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L54) *style:* **Lines should not be more than 80 characters.**
```r
makeOptimalCluster <- function(useParallel = getOption("pemisc.useParallel", FALSE),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:54:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L54) *style:* **Variable or function name should be snake_case.**
```r
makeOptimalCluster <- function(useParallel = getOption("pemisc.useParallel", FALSE),
^~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:54:32:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L54) *style:* **Variable or function name should be snake_case.**
```r
makeOptimalCluster <- function(useParallel = getOption("pemisc.useParallel", FALSE),
                               ^~~~~~~~~~~
```
[R/MapOrDoCall.R:55:32:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L55) *style:* **Variable or function name should be snake_case.**
```r
                               MBper = 5e2,
                               ^~~~~
```
[R/MapOrDoCall.R:56:32:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L56) *style:* **Variable or function name should be snake_case.**
```r
                               maxNumClusters = parallel::detectCores(), ...) {
                               ^~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:58:32:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L58) *style:* **Variable or function name should be snake_case.**
```r
  if (is.null(maxNumClusters)) maxNumClusters = parallel::detectCores()
                               ^~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:58:47:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L58) *style:* **Use <-, not =, for assignment.**
```r
  if (is.null(maxNumClusters)) maxNumClusters = parallel::detectCores()
                                              ^
```
[R/MapOrDoCall.R:61:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L61) *style:* **Variable or function name should be snake_case.**
```r
    numClus <- if (isTRUE(useParallel)) {
    ^~~~~~~
```
[R/MapOrDoCall.R:62:7:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L62) *style:* **Variable or function name should be snake_case.**
```r
      numClus <- optimalClusterNum(MBper, maxNumClusters = maxNumClusters)
      ^~~~~~~
```
[R/MapOrDoCall.R:62:18:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L62) *warning:* **no visible global function definition for ‘optimalClusterNum’**
```r
      numClus <- optimalClusterNum(MBper, maxNumClusters = maxNumClusters)
                 ^~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:64:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L64) *style:* **Variable or function name should be snake_case.**
```r
        numClus <- NULL
        ^~~~~~~
```
[R/MapOrDoCall.R:72:13:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L72) *warning:* **no visible global function definition for ‘makeForkClusterRandom’**
```r
      cl <- makeForkClusterRandom(numClus, ...)
            ^~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:91:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L91) *style:* **Variable or function name should be snake_case.**
```r
makeForkClusterRandom <- function(..., iseed = NULL) {
^~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:96:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L96) *warning:* **no visible global function definition for ‘checkPath’**
```r
  checkPath(dirname(dots$outfile), create = TRUE)
  ^~~~~~~~~
```
[R/MapOrDoCall.R:98:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L98) *style:* **Lines should not be more than 80 characters.**
```r
    cat(file = dots$outfile, "------------------------------------------------------------")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:99:17:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L99) *warning:* **no visible binding for global variable ‘makeForkCluster’**
```r
  cl <- do.call(makeForkCluster, args = dots)
                ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:100:52:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L100) *style:* **Commas should always have a space after.**
```r
  message("  Starting a cluster with ", length(cl)," threads")
                                                   ^
```
[R/MapOrDoCall.R:101:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L101) *style:* **Lines should not be more than 80 characters.**
```r
  message("    Log file is ", dots$outfile, ". To prevent log file, pass outfile = ''")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:102:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L102) *warning:* **no visible global function definition for ‘clusterSetRNGStream’**
```r
  clusterSetRNGStream(cl, iseed = iseed)
  ^~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:128:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L128) *style:* **Variable or function name should be snake_case.**
```r
getLocalArgsFor <- function(fn, localFormalArgs, envir, dots) {
^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:128:33:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L128) *style:* **Variable or function name should be snake_case.**
```r
getLocalArgsFor <- function(fn, localFormalArgs, envir, dots) {
                                ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:133:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L133) *style:* **Variable or function name should be snake_case.**
```r
    localFormalArgs <- ls(envir = envir)
    ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:145:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L145) *style:* **Variable or function name should be snake_case.**
```r
  localFormals <- if (length(fn) > 1) {
  ^~~~~~~~~~~~
```
[R/MapOrDoCall.R:153:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L153) *style:* **Variable or function name should be snake_case.**
```r
  objsFromLocal <- mget(localFormals, envir = envir)
  ^~~~~~~~~~~~~
```
[R/MapOrDoCall.R:182:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L182) *style:* **Variable or function name should be snake_case.**
```r
identifyVectorArgs <- function(fn, localFormalArgs, envir, dots) {
^~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:182:36:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L182) *style:* **Variable or function name should be snake_case.**
```r
identifyVectorArgs <- function(fn, localFormalArgs, envir, dots) {
                                   ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:183:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L183) *style:* **Variable or function name should be snake_case.**
```r
  allArgs <- getLocalArgsFor(fn, localFormalArgs, envir = envir, dots = dots)
  ^~~~~~~
```
[R/MapOrDoCall.R:183:14:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L183) *warning:* **no visible global function definition for ‘getLocalArgsFor’**
```r
  allArgs <- getLocalArgsFor(fn, localFormalArgs, envir = envir, dots = dots)
             ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:186:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L186) *style:* **Lines should not be more than 80 characters.**
```r
  specialTypes = c("environment", "SpatialPolygons", "RasterLayer", "RasterStack", "RasterBrick")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:186:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L186) *style:* **Variable or function name should be snake_case.**
```r
  specialTypes = c("environment", "SpatialPolygons", "RasterLayer", "RasterStack", "RasterBrick")
  ^~~~~~~~~~~~
```
[R/MapOrDoCall.R:186:16:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L186) *style:* **Use <-, not =, for assignment.**
```r
  specialTypes = c("environment", "SpatialPolygons", "RasterLayer", "RasterStack", "RasterBrick")
               ^
```
[R/MapOrDoCall.R:187:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L187) *style:* **Lines should not be more than 80 characters.**
```r
  lengthOne <- unlist(lapply(allArgs, is.null)) | unlist(lapply(allArgs, function(x) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:187:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L187) *style:* **Variable or function name should be snake_case.**
```r
  lengthOne <- unlist(lapply(allArgs, is.null)) | unlist(lapply(allArgs, function(x) {
  ^~~~~~~~~
```
[R/MapOrDoCall.R:194:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L194) *style:* **Variable or function name should be snake_case.**
```r
    argsSingle <- allArgs[lengthOne]
    ^~~~~~~~~~
```
[R/MapOrDoCall.R:195:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L195) *style:* **Variable or function name should be snake_case.**
```r
    argsMulti <- allArgs[!lengthOne]
    ^~~~~~~~~
```
[R/MapOrDoCall.R:197:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L197) *style:* **Variable or function name should be snake_case.**
```r
    argsSingle <- list()
    ^~~~~~~~~~
```
[R/MapOrDoCall.R:198:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L198) *style:* **Variable or function name should be snake_case.**
```r
    argsMulti <- allArgs
    ^~~~~~~~~
```
[R/MapOrDoCall.R:223:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L223) *style:* **Variable or function name should be snake_case.**
```r
MapOrDoCall <- function(fn, multiple, single, useCache, cl = NULL) {
^~~~~~~~~~~
```
[R/MapOrDoCall.R:223:47:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L223) *style:* **Variable or function name should be snake_case.**
```r
MapOrDoCall <- function(fn, multiple, single, useCache, cl = NULL) {
                                              ^~~~~~~~
```
[R/MapOrDoCall.R:232:20:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L232) *warning:* **no visible binding for global variable ‘Cache’**
```r
    obj <- do.call(Cache, args = append(list(fn), single))
                   ^~~~~
```
[R/MapOrDoCall.R:248:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L248) *style:* **Variable or function name should be snake_case.**
```r
Map2 <- function(..., cl = NULL) {
^~~~
```
[R/MapOrDoCall.R:250:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L250) *style:* **Variable or function name should be snake_case.**
```r
  formsMap <- fnicd(mapply, ...)
  ^~~~~~~~
```
[R/MapOrDoCall.R:251:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L251) *style:* **Variable or function name should be snake_case.**
```r
  formsClusterMap <- fnicd(clusterMap, ...)
  ^~~~~~~~~~~~~~~
```
[R/MapOrDoCall.R:251:28:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L251) *warning:* **no visible binding for global variable ‘clusterMap’**
```r
  formsClusterMap <- fnicd(clusterMap, ...)
                           ^~~~~~~~~~
```
[R/MapOrDoCall.R:253:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L253) *style:* **Variable or function name should be snake_case.**
```r
    argList <- list(...)
    ^~~~~~~
```
[R/MapOrDoCall.R:254:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L254) *style:* **Variable or function name should be snake_case.**
```r
    wrongFun1 <- "fun" %in% names(argList)
    ^~~~~~~~~
```
[R/MapOrDoCall.R:258:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L258) *style:* **Variable or function name should be snake_case.**
```r
    wrongFun2 <- "FUN" %in% names(argList)
    ^~~~~~~~~
```
[R/MapOrDoCall.R:268:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L268) *style:* **Variable or function name should be snake_case.**
```r
    argList <- list(...)
    ^~~~~~~
```
[R/MapOrDoCall.R:269:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L269) *style:* **Variable or function name should be snake_case.**
```r
    wrongFun1 <- "f" %in% names(argList)
    ^~~~~~~~~
```
[R/MapOrDoCall.R:273:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L273) *style:* **Variable or function name should be snake_case.**
```r
    wrongFun2 <- "FUN" %in% names(argList)
    ^~~~~~~~~
```
[R/MapOrDoCall.R:281:13:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/MapOrDoCall.R#L281) *warning:* **no visible binding for global variable ‘clusterMap’**
```r
    do.call(clusterMap, append(list(cl = cl), argList))
            ^~~~~~~~~~
```
[R/maps.R:16:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L16) *style:* **Variable or function name should be snake_case.**
```r
defineFlammable <- function(LandCoverClassifiedMap = NULL,
^~~~~~~~~~~~~~~
```
[R/maps.R:16:29:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L16) *style:* **Variable or function name should be snake_case.**
```r
defineFlammable <- function(LandCoverClassifiedMap = NULL,
                            ^~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:17:29:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L17) *style:* **Variable or function name should be snake_case.**
```r
                            nonFlammClasses = c(36L, 37L, 38L, 39L),
                            ^~~~~~~~~~~~~~~
```
[R/maps.R:27:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L27) *style:* **Lines should not be more than 80 characters.**
```r
    stop("Need nonFlammClasses, which are the classes that cannot burn in the LandCoverClassifiedMap")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:29:15:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L29) *warning:* **no visible global function definition for ‘minValue’**
```r
  oldClass <- minValue(LandCoverClassifiedMap):maxValue(LandCoverClassifiedMap)
              ^~~~~~~~
```
[R/maps.R:29:48:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L29) *warning:* **no visible global function definition for ‘maxValue’**
```r
  oldClass <- minValue(LandCoverClassifiedMap):maxValue(LandCoverClassifiedMap)
                                               ^~~~~~~~
```
[R/maps.R:30:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L30) *style:* **Lines should not be more than 80 characters.**
```r
  newClass <- ifelse(oldClass %in% nonFlammClasses, 0L, 1L) ## NOTE: 0 codes for NON-flammable
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:30:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L30) *style:* **Variable or function name should be snake_case.**
```r
  newClass <- ifelse(oldClass %in% nonFlammClasses, 0L, 1L) ## NOTE: 0 codes for NON-flammable
  ^~~~~~~~
```
[R/maps.R:32:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L32) *style:* **Variable or function name should be snake_case.**
```r
  flammableTable <- cbind(oldClass, newClass)
  ^~~~~~~~~~~~~~
```
[R/maps.R:34:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L34) *style:* **Variable or function name should be snake_case.**
```r
  rstFlammable <- ratify(reclassify(LandCoverClassifiedMap, flammableTable))
  ^~~~~~~~~~~~
```
[R/maps.R:34:19:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L34) *warning:* **no visible global function definition for ‘ratify’**
```r
  rstFlammable <- ratify(reclassify(LandCoverClassifiedMap, flammableTable))
                  ^~~~~~
```
[R/maps.R:34:26:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L34) *warning:* **no visible global function definition for ‘reclassify’**
```r
  rstFlammable <- ratify(reclassify(LandCoverClassifiedMap, flammableTable))
                         ^~~~~~~~~~
```
[R/maps.R:36:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L36) *style:* **Lines should not be more than 80 characters.**
```r
    rstFlammable <- writeRaster(rstFlammable, filename = filename2, overwrite = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:36:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L36) *style:* **Variable or function name should be snake_case.**
```r
    rstFlammable <- writeRaster(rstFlammable, filename = filename2, overwrite = TRUE)
    ^~~~~~~~~~~~
```
[R/maps.R:38:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L38) *warning:* **no visible global function definition for ‘setColors<-’**
```r
  setColors(rstFlammable, n = 2) <- colorRampPalette(c("blue", "red"))(2)
  ^~~~~~~~~
```
[R/maps.R:57:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L57) *style:* **Variable or function name should be snake_case.**
```r
prepInputsLCC <- function(year = 2005,
^~~~~~~~~~~~~
```
[R/maps.R:58:27:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L58) *style:* **Variable or function name should be snake_case.**
```r
                          destinationPath = ".",
                          ^~~~~~~~~~~~~~~
```
[R/maps.R:59:27:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L59) *style:* **Variable or function name should be snake_case.**
```r
                          studyArea = NULL,
                          ^~~~~~~~~
```
[R/maps.R:60:27:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L60) *style:* **Variable or function name should be snake_case.**
```r
                          rasterToMatch = NULL,
                          ^~~~~~~~~~~~~
```
[R/maps.R:66:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L66) *style:* **Lines should not be more than 80 characters.**
```r
      url <- "ftp://ftp.ccrs.nrcan.gc.ca/ad/NLCCLandCover/LandcoverCanada2005_250m/LandCoverOfCanada2005_V1_4.zip"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:67:7:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L67) *style:* **Variable or function name should be snake_case.**
```r
      LCCfilename <- asPath("LCC2005_V1_4a.tif")
      ^~~~~~~~~~~
```
[R/maps.R:67:22:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L67) *warning:* **no visible global function definition for ‘asPath’**
```r
      LCCfilename <- asPath("LCC2005_V1_4a.tif")
                     ^~~~~~
```
[R/maps.R:69:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L69) *style:* **Lines should not be more than 80 characters.**
```r
      stop("don't have the url for LCC2010 yet. Please find it and pass it as url = 'TheFTPAddress'")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:98:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L98) *style:* **Variable or function name should be snake_case.**
```r
makeVegTypeMap <- function(speciesStack, vegLeadingProportion, mixed = TRUE) {
^~~~~~~~~~~~~~
```
[R/maps.R:98:28:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L98) *style:* **Variable or function name should be snake_case.**
```r
makeVegTypeMap <- function(speciesStack, vegLeadingProportion, mixed = TRUE) {
                           ^~~~~~~~~~~~
```
[R/maps.R:98:42:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L98) *style:* **Variable or function name should be snake_case.**
```r
makeVegTypeMap <- function(speciesStack, vegLeadingProportion, mixed = TRUE) {
                                         ^~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:99:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L99) *style:* **Variable or function name should be snake_case.**
```r
  sumVegPct <- sum(speciesStack, na.rm = TRUE)
  ^~~~~~~~~
```
[R/maps.R:101:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L101) *style:* **Lines should not be more than 80 characters.**
```r
  # create "mixed" layer, which is given a value slightly higher than any other layer
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:103:16:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L103) *style:* **Variable or function name should be snake_case.**
```r
  speciesStack$Mixed <- all(speciesStack / sumVegPct < vegLeadingProportion) *
               ^~~~~
```
[R/maps.R:105:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L105) *style:* **Variable or function name should be snake_case.**
```r
  vegTypeMap <- raster::which.max(speciesStack)
  ^~~~~~~~~~
```
[R/maps.R:106:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L106) *style:* **Variable or function name should be snake_case.**
```r
  layerNames <- names(speciesStack)
  ^~~~~~~~~~
```
[R/maps.R:108:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L108) *style:* **Lines should not be more than 80 characters.**
```r
  levels(vegTypeMap) <- data.frame(ID = seq(layerNames), Species = names(layerNames))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:140:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L140) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea,
^~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:140:34:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L140) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea,
                                 ^~~~~
```
[R/maps.R:140:41:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L140) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea,
                                        ^~~~~~~~~~~~~
```
[R/maps.R:140:56:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L140) *style:* **Variable or function name should be snake_case.**
```r
loadkNNSpeciesLayers <- function(dPath, rasterToMatch, studyArea,
                                                       ^~~~~~~~~
```
[R/maps.R:141:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L141) *style:* **Lines should not be more than 80 characters.**
```r
                                 speciesList = NULL, thresh = 1, url, cachePath, ...) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:141:34:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L141) *style:* **Variable or function name should be snake_case.**
```r
                                 speciesList = NULL, thresh = 1, url, cachePath, ...) {
                                 ^~~~~~~~~~~
```
[R/maps.R:141:71:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L141) *style:* **Variable or function name should be snake_case.**
```r
                                 speciesList = NULL, thresh = 1, url, cachePath, ...) {
                                                                      ^~~~~~~~~
```
[R/maps.R:144:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L144) *style:* **Lines should not be more than 80 characters.**
```r
    if (!setequal(colnames(speciesList), c("speciesNamesRaw", "speciesNamesEnd")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:149:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L149) *style:* **Lines should not be more than 80 characters.**
```r
  # Changed by Eliot Oct 20 2018 -- can't start with untar because tar file may not be present
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:151:25:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L151) *warning:* **no visible global function definition for ‘ncell’, Did you mean 'call'?**
```r
    paste0(as.character(ncell(rasterToMatch)), "px")
                        ^~~~~
```
[R/maps.R:158:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L158) *style:* **Variable or function name should be snake_case.**
```r
  kNNnames <- lapply(strsplit(speciesList[,1], "_"), function(x) {
  ^~~~~~~~
```
[R/maps.R:158:44:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L158) *style:* **Commas should always have a space after.**
```r
  kNNnames <- lapply(strsplit(speciesList[,1], "_"), function(x) {
                                           ^
```
[R/maps.R:163:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L163) *style:* **Variable or function name should be snake_case.**
```r
  kNNnames <- sapply(kNNnames, function(x) paste(x, collapse = "_"))
  ^~~~~~~~
```
[R/maps.R:166:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L166) *style:* **Lines should not be more than 80 characters.**
```r
  species1 <- Cache(knnLoadFun, url = url, spp = speciesList, #[, "speciesNamesRaw"],
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:175:14:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L175) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if (FALSE) { # TODO: This no longer does all species
             ^
```
[R/maps.R:176:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L176) *style:* **Lines should not be more than 80 characters.**
```r
    allSpp <- Cache(untar, tarfile = file.path(dPath, "kNN-Species.tar"), list = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:176:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L176) *style:* **Variable or function name should be snake_case.**
```r
    allSpp <- Cache(untar, tarfile = file.path(dPath, "kNN-Species.tar"), list = TRUE)
    ^~~~~~
```
[R/maps.R:177:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L177) *style:* **Variable or function name should be snake_case.**
```r
    allSpp <- allSpp %>%
    ^~~~~~
```
[R/maps.R:184:27:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L184) *style:* **Commas should always have a space after.**
```r
    if (any(!speciesList[,1] %in% allSpp)) {
                          ^
```
[R/maps.R:185:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L185) *style:* **Lines should not be more than 80 characters.**
```r
      warning("Some species not present in kNN database./n  Check if this is correct.")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:186:7:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L186) *style:* **Variable or function name should be snake_case.**
```r
      speciesList <- speciesList[speciesList[, 1] %in% allSpp,]
      ^~~~~~~~~~~
```
[R/maps.R:186:63:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L186) *style:* **Commas should always have a space after.**
```r
      speciesList <- speciesList[speciesList[, 1] %in% allSpp,]
                                                              ^
```
[R/maps.R:194:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L194) *style:* **Lines should not be more than 80 characters.**
```r
    dubs <- unique(speciesList[duplicated(speciesList[, 2]), 2]) ## get the duplicated final names
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:196:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L196) *style:* **Lines should not be more than 80 characters.**
```r
    ## make a list of species that will be summed (those with duplicated final names)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:201:20:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L201) *style:* **Use <-, not =, for assignment.**
```r
    names(spp2sum) = dubs
                   ^
```
[R/maps.R:204:7:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L204) *style:* **Variable or function name should be snake_case.**
```r
      sumSpecies <- spp2sum[[i]]
      ^~~~~~~~~~
```
[R/maps.R:205:7:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L205) *style:* **Variable or function name should be snake_case.**
```r
      newLayerName <- names(spp2sum)[i]
      ^~~~~~~~~~~~
```
[R/maps.R:207:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L207) *style:* **Lines should not be more than 80 characters.**
```r
      fname <- .suffix(file.path(dPath, paste0("KNN", newLayerName, ".tif")), suffix)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:207:16:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L207) *warning:* **no visible global function definition for ‘.suffix’, Did you mean 'suffix'?**
```r
      fname <- .suffix(file.path(dPath, paste0("KNN", newLayerName, ".tif")), suffix)
               ^~~~~~~
```
[R/maps.R:213:12:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L213) *warning:* **no visible global function definition for ‘raster’, Did you mean 'paste'?**
```r
      a <- raster(fname) ## ensure a gets a filename
           ^~~~~~
```
[R/maps.R:222:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L222) *style:* **Variable or function name should be snake_case.**
```r
  nameReplace <- as.matrix(speciesList[, 2])
  ^~~~~~~~~~~
```
[R/maps.R:223:25:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L223) *style:* **Use <-, not =, for assignment.**
```r
  rownames(nameReplace) = speciesList[, 1]
                        ^
```
[R/maps.R:225:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L225) *style:* **Variable or function name should be snake_case.**
```r
  toReplace <- names(species1)[names(species1) %in% rownames(nameReplace)]
  ^~~~~~~~~
```
[R/maps.R:228:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L228) *style:* **Lines should not be more than 80 characters.**
```r
  ## remove layers that have less data than thresh (i.e. spp absent in study area)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:230:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L230) *style:* **Lines should not be more than 80 characters.**
```r
  layerData <- Cache(sapply, X = species1, function(x) sum(x[] > 0, na.rm = TRUE))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:230:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L230) *style:* **Variable or function name should be snake_case.**
```r
  layerData <- Cache(sapply, X = species1, function(x) sum(x[] > 0, na.rm = TRUE))
  ^~~~~~~~~
```
[R/maps.R:230:16:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L230) *warning:* **no visible global function definition for ‘Cache’**
```r
  layerData <- Cache(sapply, X = species1, function(x) sum(x[] > 0, na.rm = TRUE))
               ^~~~~
```
[R/maps.R:233:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L233) *style:* **Variable or function name should be snake_case.**
```r
  belowThresh <- layerData < thresh
  ^~~~~~~~~~~
```
[R/maps.R:250:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L250) *style:* **Lines should not be more than 80 characters.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:250:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L250) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
^~~~~~~~~~~~~~~~~~~
```
[R/maps.R:250:33:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L250) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
                                ^~~~~~~~~~~~~
```
[R/maps.R:250:48:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L250) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
                                               ^~~~~~~~~~~
```
[R/maps.R:250:61:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L250) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
                                                            ^~~~~~~~~~~~~~
```
[R/maps.R:250:77:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L250) *style:* **Variable or function name should be snake_case.**
```r
sumRastersBySpecies <- function(speciesLayers, layersToSum, filenameToSave, newLayerName) {
                                                                            ^~~~~~~~~~~~
```
[R/maps.R:253:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L253) *style:* **Lines should not be more than 80 characters.**
```r
  writeRaster(ras_out, filename = filenameToSave, datatype = "INT2U", overwrite = TRUE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:253:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L253) *warning:* **no visible global function definition for ‘writeRaster’**
```r
  writeRaster(ras_out, filename = filenameToSave, datatype = "INT2U", overwrite = TRUE)
  ^~~~~~~~~~~
```
[R/maps.R:269:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L269) *style:* **Lines should not be more than 80 characters.**
```r
knnLoadFun <- function(speciesListIndex, spp, suffix, url, dPath, studyArea, rasterToMatch) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:269:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L269) *style:* **Variable or function name should be snake_case.**
```r
knnLoadFun <- function(speciesListIndex, spp, suffix, url, dPath, studyArea, rasterToMatch) {
^~~~~~~~~~
```
[R/maps.R:269:24:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L269) *style:* **Variable or function name should be snake_case.**
```r
knnLoadFun <- function(speciesListIndex, spp, suffix, url, dPath, studyArea, rasterToMatch) {
                       ^~~~~~~~~~~~~~~~
```
[R/maps.R:269:60:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L269) *style:* **Variable or function name should be snake_case.**
```r
knnLoadFun <- function(speciesListIndex, spp, suffix, url, dPath, studyArea, rasterToMatch) {
                                                           ^~~~~
```
[R/maps.R:269:67:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L269) *style:* **Variable or function name should be snake_case.**
```r
knnLoadFun <- function(speciesListIndex, spp, suffix, url, dPath, studyArea, rasterToMatch) {
                                                                  ^~~~~~~~~
```
[R/maps.R:269:78:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L269) *style:* **Variable or function name should be snake_case.**
```r
knnLoadFun <- function(speciesListIndex, spp, suffix, url, dPath, studyArea, rasterToMatch) {
                                                                             ^~~~~~~~~~~~~
```
[R/maps.R:271:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L271) *style:* **Variable or function name should be snake_case.**
```r
    knownSp <- c(
    ^~~~~~~
```
[R/maps.R:294:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L294) *style:* **Lines should not be more than 80 characters.**
```r
      "Pinu_Alb", "Pinu_Ban", "Pinu_Con_Lat", "Pinu_Con", "Pinu_Fle", "Pinu_Mon",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:315:14:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L315) *warning:* **no visible global function definition for ‘asPath’, Did you mean 'dPath'?**
```r
  archive <- asPath("kNN-Species.tar")
             ^~~~~~
```
[R/maps.R:319:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L319) *style:* **Variable or function name should be snake_case.**
```r
    targetFile <- NULL
    ^~~~~~~~~~
```
[R/maps.R:322:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L322) *style:* **Variable or function name should be snake_case.**
```r
    tarFile <- prepInputs(
    ^~~~~~~
```
[R/maps.R:332:8:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L332) *style:* **Commented code should be removed.**
```r
      #filename2 = postProcessedFilename
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:336:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L336) *style:* **Lines should not be more than 80 characters.**
```r
    spp <-  matrix(data = rep(spp, 2), nrow = length(spp), ncol = 2, byrow = FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:344:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L344) *style:* **Lines should not be more than 80 characters.**
```r
    targetFiles <- paste0("NFI_MODIS250m_kNN_Species_", spp[, "speciesNamesRaw"], "_v0.tif")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:344:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L344) *style:* **Variable or function name should be snake_case.**
```r
    targetFiles <- paste0("NFI_MODIS250m_kNN_Species_", spp[, "speciesNamesRaw"], "_v0.tif")
    ^~~~~~~~~~~
```
[R/maps.R:347:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L347) *style:* **Lines should not be more than 80 characters.**
```r
                      archive2 = paste0("NFI_MODIS250m_kNN_Species_", spp[, "speciesNamesRaw"], "_v0.zip"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:351:3:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L351) *style:* **Variable or function name should be snake_case.**
```r
  postProcessedFilenames <- .suffix(targetFiles, suffix = suffix)
  ^~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:351:29:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L351) *warning:* **no visible global function definition for ‘.suffix’, Did you mean 'suffix'?**
```r
  postProcessedFilenames <- .suffix(targetFiles, suffix = suffix)
                            ^~~~~~~
```
[R/maps.R:384:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L384) *style:* **Variable or function name should be snake_case.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, speciesList = NULL,
^~~~~~~~~~~~~
```
[R/maps.R:384:27:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L384) *style:* **Variable or function name should be snake_case.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, speciesList = NULL,
                          ^~~~~~~~~~~~~~~~
```
[R/maps.R:384:45:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L384) *style:* **Variable or function name should be snake_case.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, speciesList = NULL,
                                            ^~~~~~~~~~~~~~~
```
[R/maps.R:384:62:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L384) *style:* **Variable or function name should be snake_case.**
```r
overlayStacks <- function(highQualityStack, lowQualityStack, speciesList = NULL,
                                                             ^~~~~~~~~~~
```
[R/maps.R:385:27:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L385) *style:* **Variable or function name should be snake_case.**
```r
                          outputFilenameSuffix = "overlay", destinationPath) {
                          ^~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:385:61:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L385) *style:* **Variable or function name should be snake_case.**
```r
                          outputFilenameSuffix = "overlay", destinationPath) {
                                                            ^~~~~~~~~~~~~~~
```
[R/maps.R:393:5:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L393) *style:* **Variable or function name should be snake_case.**
```r
    hqLarger <- ncell(lowQualityStack) * prod(res(lowQualityStack)) <
    ^~~~~~~~
```
[R/maps.R:401:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L401) *style:* **Lines should not be more than 80 characters.**
```r
        message("  ", sp, " extents, or resolution, or projection did not match; ",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:403:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L403) *style:* **Variable or function name should be snake_case.**
```r
        LQRastName <- basename(tempfile(fileext = ".tif"))
        ^~~~~~~~~~
```
[R/maps.R:405:11:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L405) *style:* **Variable or function name should be snake_case.**
```r
          LQCurName <- basename(tempfile(fileext = ".tif"))
          ^~~~~~~~~
```
[R/maps.R:412:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L412) *style:* **Lines should not be more than 80 characters.**
```r
        LQRastInHQcrs <- projectExtent(lowQualityStack, crs = crs(highQualityStack))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:412:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L412) *style:* **Variable or function name should be snake_case.**
```r
        LQRastInHQcrs <- projectExtent(lowQualityStack, crs = crs(highQualityStack))
        ^~~~~~~~~~~~~
```
[R/maps.R:412:19:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L412) *warning:* **no visible global function definition for ‘crs’, Did you mean 'cars'?**
```r
        LQRastInHQcrs <- projectExtent(lowQualityStack, crs = crs(highQualityStack))
                  ^~~
```
[R/maps.R:412:26:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L412) *warning:* **no visible global function definition for ‘projectExtent’**
```r
        LQRastInHQcrs <- projectExtent(lowQualityStack, crs = crs(highQualityStack))
                         ^~~~~~~~~~~~~
```
[R/maps.R:425:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L425) *style:* **Variable or function name should be snake_case.**
```r
        LQRast <- raster(LQRastName)
        ^~~~~~
```
[R/maps.R:425:19:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L425) *warning:* **no visible global function definition for ‘raster’, Did you mean 'paste'?**
```r
        LQRast <- raster(LQRastName)
                  ^~~~~~
```
[R/maps.R:432:11:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L432) *style:* **Variable or function name should be snake_case.**
```r
          tmpHQName <- basename(tempfile(fileext = ".tif"))
          ^~~~~~~~~
```
[R/maps.R:443:11:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L443) *style:* **Variable or function name should be snake_case.**
```r
          HQRast <- raster(tmpHQName)
          ^~~~~~
```
[R/maps.R:443:21:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L443) *warning:* **no visible global function definition for ‘raster’, Did you mean 'paste'?**
```r
          HQRast <- raster(tmpHQName)
                    ^~~~~~
```
[R/maps.R:448:11:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L448) *style:* **Variable or function name should be snake_case.**
```r
          HQRast <- highQualityStack[[sp]]
          ^~~~~~
```
[R/maps.R:451:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L451) *style:* **Variable or function name should be snake_case.**
```r
        LQRast <- lowQualityStack[[sp]]
        ^~~~~~
```
[R/maps.R:452:9:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L452) *style:* **Variable or function name should be snake_case.**
```r
        HQRast <- highQualityStack[[sp]]
        ^~~~~~
```
[R/maps.R:456:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L456) *style:* **Lines should not be more than 80 characters.**
```r
        stop("Stacks not identical, something is wrong with overlayStack function.")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:460:7:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L460) *style:* **Variable or function name should be snake_case.**
```r
      HQRast <- writeRaster(HQRast, datatype = "INT2U",
      ^~~~~~
```
[R/maps.R:468:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L468) *style:* **Lines should not be more than 80 characters.**
```r
      if (!exists("HQStack")) HQStack <- stack(HQRast) else HQStack[[sp]] <- HQRast
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:468:31:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/maps.R#L468) *style:* **Variable or function name should be snake_case.**
```r
      if (!exists("HQStack")) HQStack <- stack(HQRast) else HQStack[[sp]] <- HQRast
                              ^~~~~~~
```
[R/speciesTable.R:15:1:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/speciesTable.R#L15) *style:* **Variable or function name should be snake_case.**
```r
getSpeciesTable <- function(dPath = tempdir(), cacheTags = NULL) {
^~~~~~~~~~~~~~~
```
[R/speciesTable.R:15:29:](https://github.com/PredictiveEcology/pemisc/blob/c48b61557a7a6f8a55ac3d878af09b2136e591f7/R/speciesTable.R#L15) *style:* **Variable or function name should be snake_case.**
```r
getSpeciesTable <- function(dPath = tempdir(), cacheTags = NULL) {
                            ^~~~~
```


✅ [Jenkins job](https://jenkins.internalx.com/job/macios/job/skip-main-macos-packaged-xm-tests/1/display/redirect) (on internal Jenkins) succeeded

✅ [Build succeeded](https://jenkins.internalx.com/job/macios/job/skip-main-macos-packaged-xm-tests/1//console)
✅ [API Diff (from stable)](http://xamarin-storage/jenkins/xamarin-macios/skip-main-macos-packaged-xm-tests/6174776d38b4da0334751888b904a5293cda5d04/1/jenkins-results/api-diff/index.html)
ℹ [API Diff (from PR only)](http://xamarin-storage/jenkins/xamarin-macios/skip-main-macos-packaged-xm-tests/6174776d38b4da0334751888b904a5293cda5d04/1/jenkins-results/apicomparison/index.html) (please review changes)
✅ [Generator Diff](http://xamarin-storage/jenkins/xamarin-macios/skip-main-macos-packaged-xm-tests/6174776d38b4da0334751888b904a5293cda5d04/1/jenkins-results/generator-diff/index.html) (no change)
✅ [Test run succeeded](http://xamarin-storage/jenkins/xamarin-macios/skip-main-macos-packaged-xm-tests/6174776d38b4da0334751888b904a5293cda5d04/1/jenkins-results/tests/index.html)


Hmm, ok - I could go back to the /5 compromise for now (my machine can just keep up at sieve 2^32 with 8 threads and 1 sieve worker, providing I set sieveBits to 26 to take full advantage of the L3 cache).  But that leaves it likely that a slightly different machine would hit a problem if they adjusted Sieve max to 2^32 or higher (though the warning message tells them how to fix it).

That seg fault I think is because of a race where a miner work thread can start trying to work before the miner is initialised.  I've never been sure why the initialisation order was like this, originally I wasn't sure if anything in init required the client to be connected, but I'm pretty sure it doesn't so I'll move the init call to just after the Miner is constructed.


sigh... ok thanks


@SteveLockley May need a review?


The real data is more complicated. There are more than one backgrounds. So I used number of segments here.


msp430:这个Hex是ccs工程生成的吗？题给的hex文件不是标准的Intel hex文件，标准的hex文件行首以冒号开始这个格式是ida直接可以载入的。ti的工具不是很友好输出都是为自己一套工具链设计的


ADIFファイルは、私のPythonのJARLフォーマットコンバータでJARL rev2.0のログを生成できる。但し、サポートしていないコンテストもある。


追記


Approve your current changes.


Perhaps include some classic temperatures in the specs:

- -40℉
- 100℃


well.. it's ambiguously= =

Tesla Ice Zhang <notifications@github.com> 于 2018年11月21日周三 20:28写道：

> This name is taken from
> https://github.com/JetBrains/intellij-community/blob/master/platform/core-api/src/com/intellij/psi/PsiElement.java
>
> —
> You are receiving this because you are subscribed to this thread.
> Reply to this email directly, view it on GitHub
> <https://github.com/owo-lang/OwO/commit/f5834d8c946c05ad647bfb87f1758338e4b1d77b#commitcomment-31381099>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/AA_3t9176FdzDiuwPfkxnepL12EOQnA2ks5uxUbagaJpZM4YsmXc>
> .
>


fatto qui 8191fe3


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

* https://pints.run


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

* https://sokolsokol.com


@caobug I'm not using lwip and customized fuckshadows-android anymore, the idea has been deprecated. I have a branch includes all you need to upgrade lwip to latest commit, you can check https://github.com/wongsyrone/badvpn/commits/my-lwip-change-backup to see what should be changed.


Also added all URL related translations for other languages except for Slovenian.


Nie wnikajac w to co chcesz zrobic:
 - Usun z RegisterPage pole driver;
 - W klasie LeftNavigationMenu  ustaw modyfikator pola driver na protected (tam inicjalizujesz to pole w konstruktorze)


I made some more test. I didn't see again the access violation. Maybe it was a wrong manipulation I did.
Good night Fred!


This build uncovers an unreported null pointer exception issue in storingEVASuitPhase() in EnterAirlock class. Possibly affecting https://github.com/mars-sim/mars-sim/issues/148.


dumb questions:    is there anything special about the word "MobileApp"?  how does sysl know "MobileApp" is an application?

maybe could say something like "the name MobileApp is user-defined and has no special meaning to sysl" or perhaps, "in sysl, any top-level word followed by a colon such as "MobileApp:" or "Foo:" or "Banana:" defines a an application" or perhaps "a named application".

that probably isnt clearest way to explain it, hopefully  you roughly get what i'm getting at


[R/collect_esses.R:11:3:](https://github.com/richelbilderbeek/razzo/blob/654b5a3335e234822efc4fad086c52a31576a715/R/collect_esses.R#L11) *warning:* **no visible global function definition for ‘check_project_folder_name’**
```r
  check_project_folder_name(project_folder_name)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/create_bd_tree.R:70:18:](https://github.com/richelbilderbeek/razzo/blob/654b5a3335e234822efc4fad086c52a31576a715/R/create_bd_tree.R#L70) *warning:* **no visible global function definition for ‘bd_phylo_2_l_table’**
```r
  bd_l_matrix <- bd_phylo_2_l_table(bd_tree)
                 ^~~~~~~~~~~~~~~~~~
```
[R/get_data_paths.R:11:3:](https://github.com/richelbilderbeek/razzo/blob/654b5a3335e234822efc4fad086c52a31576a715/R/get_data_paths.R#L11) *warning:* **no visible global function definition for ‘check_project_folder_name’**
```r
  check_project_folder_name(project_folder_name)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/get_results_paths.R:11:3:](https://github.com/richelbilderbeek/razzo/blob/654b5a3335e234822efc4fad086c52a31576a715/R/get_results_paths.R#L11) *warning:* **no visible global function definition for ‘check_project_folder_name’**
```r
  check_project_folder_name(project_folder_name)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/utils.R:65:10:](https://github.com/richelbilderbeek/razzo/blob/654b5a3335e234822efc4fad086c52a31576a715/R/utils.R#L65) *warning:* **no visible global function definition for ‘convert_tree2brts’**
```r
  brt <- convert_tree2brts(phylo)
         ^~~~~~~~~~~~~~~~~
```


Approved


Create


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

* https://api.azsiaz.xyz


Use `Stats.HP` and so on instead of hardcoded indexes


ExtensiblePlantEquipmentLists-6871 (mjwitte) - i386-Windows-7-VisualStudio-14: OK (3054 of 3054 tests passed, 0 test warnings)

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


ExtensiblePlantEquipmentLists-6871 (mjwitte) - x86_64-MacOS-10.9-clang: OK (3053 of 3054 tests passed, 0 test warnings)

Failures:

regression Test Summary
 * Passed: 631
 * Failed: 1

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


ExtensiblePlantEquipmentLists-6871 (mjwitte) - x86_64-Linux-Ubuntu-18.04-gcc-7.3: OK (3093 of 3094 tests passed, 0 test warnings)

Failures:

regression Test Summary
 * Passed: 651
 * Failed: 1

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