I don't understand why some of the demo apps package names are in this form:
com.youappi.sdk.demo.nativeads
and some are in this one:
com.youappi.demo.mopub

I think they should all conform to a single format and in order for it to match the dev one, that should be the upper one


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

* https://identity.devinmcgloin.now.sh
* https://identity-git-master.devinmcgloin.now.sh


Import CSV to active Google Sheet


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

* https://mattiascibien.now.sh
* https://mattiascibien.mattiascibien.now.sh
* https://mattiascibien-git-master.mattiascibien.now.sh


Yup! I believed so, and Stack Overflow confirmed. (For reference:
https://stackoverflow.com/questions/6989902/is-it-safe-to-assume-strict-comparison-in-a-javascript-switch-statement
)

On Wed, Jul 10, 2019, 11:31 PM Neil <notifications@github.com> wrote:

> I wasn't sure if the JS switch could deal with the === operator and not
> just the normal == equality operator. Can it?
>
> —
> You are receiving this because you commented.
> Reply to this email directly, view it on GitHub
> <https://github.com/2048-BattleRoyale/2048royale/commit/7934e8dc5fb5883748dad666d0118cfba98ef188?email_source=notifications&email_token=AGL2ZMQMMZPPLMHAXV56UJDP63HVTA5CNFSM4IAQFSS2YY3PNVWWK3TUL52HS4DFVVBW63LNNF2EG33NNVSW45FKMNXW23LFNZ2F62LEZYBAVTQB#commitcomment-34262529>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/AGL2ZMUU6VAYRMISRSP5BRDP63HVTANCNFSM4IAQFSSQ>
> .
>


Successfully aliased the URL <https://git-answer-backend-27tdepdl3.now.sh> to the following aliases:

* https://git-answer-backend.now.sh
* https://git-answer-backend.edwardcrdeam.now.sh
* https://git-answer-backend-git-master.edwardcrdeam.now.sh


6879-ChangeDetIceStorCurveTypeFields (RKStrand) - x86_64-Linux-Ubuntu-18.04-gcc-7.4-UnitTestsCoverage-Debug: OK (1114 of 1114 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) ![Coverage Badge](http://img.shields.io/badge/coverage%20status-42.33%25-green.png)


[R/assertions.R:210:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/assertions.R#L210) *style:* **Lines should not be more than 100 characters.**
```r
      stop("2 or more species share the same label under the 'EN_generic_short' or 'Leading' columns of sim$sppEquiv.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/assertions.R:214:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/assertions.R#L214) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/cohorts.R:47:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L47) *style:* **Lines should not be more than 100 characters.**
```r
#' @param treedFirePixelTableSinceLastDisp A data.table with at least 2 columns, \code{pixelIndex} and \code{pixelGroup}.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:71:48:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L71) *style:* **Variable and function names should not be longer than 30 characters.**
```r
                             speciesEcoregion, treedFirePixelTableSinceLastDisp = NULL,
                                               ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:92:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L92) *style:* **Lines should not be more than 100 characters.**
```r
      message(crayon::green("  Regenerating only open pixels (e.g., likely resprouting & serotiny only)"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:93:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L93) *style:* **Lines should not be more than 100 characters.**
```r
    columnsForPG <- c("ecoregionGroup", "speciesCode", "age") # no Biomass because they all have zero
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:94:31:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L94) *style:* **Commas should always have a space after.**
```r
    cd <- newPixelCohortData[,c("pixelIndex", columnsForPG), with = FALSE]
                              ^
```
[R/cohorts.R:122:30:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L122) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    allCohortData <- cohorts[ , .(ecoregionGroup = ecoregionGroup[1],
                             ^
```
[R/cohorts.R:122:31:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L122) *style:* **Commas should never have a space before.**
```r
    allCohortData <- cohorts[ , .(ecoregionGroup = ecoregionGroup[1],
                             ~^
```
[R/cohorts.R:145:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L145) *style:* **Commented code should be removed.**
```r
  # newPixelCohortData[, sumB := sum(B, na.rm = TRUE), by = pixelGroup]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:221:3:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L221) *style:* **Variable or function name should be lowerCamelCase.**
```r
  specieseco_current <- speciesEcoregionLatestYear(speciesEcoregion, time)
  ^~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:222:3:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L222) *style:* **Variable or function name should be lowerCamelCase.**
```r
  specieseco_current <- setkey(specieseco_current[, .(speciesCode, maxANPP, maxB, ecoregionGroup)],
  ^~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:227:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L227) *style:* **Lines should not be more than 100 characters.**
```r
  #missingNewPixelCohortData <- newPixelCohortData[!specieseco_current, on = uniqueSpeciesEcoregionDefinition]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:227:4:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L227) *style:* **Commented code should be removed.**
```r
  #missingNewPixelCohortData <- newPixelCohortData[!specieseco_current, on = uniqueSpeciesEcoregionDefinition]
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:228:3:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L228) *style:* **Variable or function name should be lowerCamelCase.**
```r
  specieseco_current <- specieseco_current[!is.na(maxB)]
  ^~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:229:24:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L229) *style:* **Variable or function name should be lowerCamelCase.**
```r
  specieseco_current[, maxB_eco := max(maxB), by = ecoregionGroup]
                       ^~~~~~~~
```
[R/cohorts.R:230:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L230) *style:* **Lines should not be more than 100 characters.**
```r
  newPixelCohortData <- specieseco_current[newPixelCohortData, on = uniqueSpeciesEcoregionDefinition]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:236:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L236) *style:* **Commented code should be removed.**
```r
  # set(newPixelCohortData, NULL, "sumB", 0L)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:243:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L243) *style:* **Lines should not be more than 100 characters.**
```r
  set(newPixelCohortData, which(is.na(newPixelCohortData$oldSumB)), "oldSumB", 0)   ## faster than [:=]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:248:26:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L248) *style:* **Variable or function name should be lowerCamelCase.**
```r
    newPixelCohortData[, B := NULL]
                         ^
```
[R/cohorts.R:252:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L252) *style:* **Lines should not be more than 100 characters.**
```r
  set(newPixelCohortData, NULL, "B", asInteger(pmin(newPixelCohortData$maxANPP, newPixelCohortData$B)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:258:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L258) *style:* **Lines should not be more than 100 characters.**
```r
    if (isTRUE(NROW(unique(newPixelCohortData, by = uniqueCohortDefinition)) != NROW(newPixelCohortData)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:263:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L263) *style:* **Commented code should be removed.**
```r
  # cohortData[, sumB := sum(B, na.rm = TRUE), by = "pixelGroup"]  ## recalculate sumB
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:265:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L265) *style:* **Commented code should be removed.**
```r
  #   set(cohortData, NULL, "sumB", asInteger(cohortData[["sumB"]]))
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:295:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L295) *style:* **Lines should not be more than 100 characters.**
```r
  pgsStillInCDGoneFromPGM <- cohortData[whPgsStillInCDGoneFromPGM,] #setdiff(unique(cohortData$pixelGroup), unique(pgmVals$pixelGroup))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:295:67:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L295) *style:* **Commas should always have a space after.**
```r
  pgsStillInCDGoneFromPGM <- cohortData[whPgsStillInCDGoneFromPGM,] #setdiff(unique(cohortData$pixelGroup), unique(pgmVals$pixelGroup))
                                                                  ^
```
[R/cohorts.R:295:70:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L295) *style:* **Commented code should be removed.**
```r
  pgsStillInCDGoneFromPGM <- cohortData[whPgsStillInCDGoneFromPGM,] #setdiff(unique(cohortData$pixelGroup), unique(pgmVals$pixelGroup))
                                                                     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:296:4:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L296) *style:* **Commented code should be removed.**
```r
  #pgsStillInPGMGoneFromCD <- setdiff(unique(pgmVals$pixelGroup), unique(cohortData$pixelGroup))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:298:64:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L298) *style:* **Commas should always have a space after.**
```r
  pgsStillInPGMGoneFromCD <- pgmVals[whPgsStillInPGMGoneFromCD,]
                                                               ^
```
[R/cohorts.R:349:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L349) *style:* **Lines should not be more than 100 characters.**
```r
  # concatenate within rows -- e.g., ecoregionCode_speciesCode_age_biomass or 647_11_Abie_sp_100_2000
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:353:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L353) *style:* **Lines should not be more than 100 characters.**
```r
  pcd[ , c("uniqueComboByPixelIndex") := paste(uniqueComboByRow, collapse = "__"), by = "pixelIndex"]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:353:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L353) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  pcd[ , c("uniqueComboByPixelIndex") := paste(uniqueComboByRow, collapse = "__"), by = "pixelIndex"]
      ^
```
[R/cohorts.R:353:8:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L353) *style:* **Commas should never have a space before.**
```r
  pcd[ , c("uniqueComboByPixelIndex") := paste(uniqueComboByRow, collapse = "__"), by = "pixelIndex"]
      ~^
```
[R/cohorts.R:354:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L354) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  pcd[ , c("pixelGroup") := as.integer(maxPixelGroup) + as.integer(factor(uniqueComboByPixelIndex))]
      ^
```
[R/cohorts.R:354:8:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L354) *style:* **Commas should never have a space before.**
```r
  pcd[ , c("pixelGroup") := as.integer(maxPixelGroup) + as.integer(factor(uniqueComboByPixelIndex))]
      ~^
```
[R/cohorts.R:356:38:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L356) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if (getOption("LandR.assertions")) { # old algorithm
                                     ^
```
[R/cohorts.R:360:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L360) *style:* **Lines should not be more than 100 characters.**
```r
    pcd[, pixelGroup2 := mapvalues(pixelGroup, from = unique(pixelGroup), to = as.character(seq_along(unique(pixelGroup))))]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:366:12:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L366) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    pcdOld[ , c(columns2) := lapply(.SD, function(x) {
           ^
```
[R/cohorts.R:366:13:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L366) *style:* **Commas should never have a space before.**
```r
    pcdOld[ , c(columns2) := lapply(.SD, function(x) {
           ~^
```
[R/cohorts.R:370:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L370) *style:* **Lines should not be more than 100 characters.**
```r
    # concatenate within rows -- e.g., ecoregionCode_speciesCode_age_biomass or 647_11_Abie_sp_100_2000
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:371:52:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L371) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    pcdOld[, uniqueComboByRow := as.integer(factor( do.call(paste, as.list(.SD)))),
                                                   ^
```
[R/cohorts.R:375:12:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L375) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    pcdOld[ , c("uniqueComboByPixelIndex") := paste(uniqueComboByRow, collapse = "__"),
           ^
```
[R/cohorts.R:375:13:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L375) *style:* **Commas should never have a space before.**
```r
    pcdOld[ , c("uniqueComboByPixelIndex") := paste(uniqueComboByRow, collapse = "__"),
           ~^
```
[R/cohorts.R:377:12:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L377) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    pcdOld[ , c("pixelGroup") := as.integer(maxPixelGroup) +
           ^
```
[R/cohorts.R:377:13:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L377) *style:* **Commas should never have a space before.**
```r
    pcdOld[ , c("pixelGroup") := as.integer(maxPixelGroup) +
           ~^
```
[R/cohorts.R:382:25:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L382) *style:* **Put spaces around all infix operators.**
```r
    pcdOld[, pixelGroup2:=mapvalues(pixelGroup, from = unique(pixelGroup),
                       ~^~~
```
[R/cohorts.R:427:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L427) *style:* **Variable and function names should not be longer than 30 characters.**
```r
uniqueSpeciesEcoregionDefinition <- c("speciesCode", "ecoregionGroup")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:440:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L440) *style:* **Lines should not be more than 100 characters.**
```r
  message(magenta("Pixels with non-NA cover:, ", cohortData[!is.na(cover), length(unique(pixelIndex))]))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:448:86:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L448) *style:* **Put spaces around all infix operators.**
```r
    pixelsZero <- NROW(cohortData[, all(get(val) == 0), by = "pixelIndex"][get("V1") ==TRUE])
                                                                                ^~~
```
[R/cohorts.R:449:40:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L449) *style:* **Commas should always have a space after.**
```r
    message(magenta("Pixels with all(",val," == 0): ", format(pixelsZero, big.mark = ",")))
                                       ^
```
[R/cohorts.R:449:44:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L449) *style:* **Commas should always have a space after.**
```r
    message(magenta("Pixels with all(",val," == 0): ", format(pixelsZero, big.mark = ",")))
                                           ^
```
[R/cohorts.R:450:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L450) *style:* **Lines should not be more than 100 characters.**
```r
    pixelsBiomassNonZero <- NROW(cohortData[, any(get(val) > 0), by = "pixelIndex"][get("V1") ==TRUE])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:450:95:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L450) *style:* **Put spaces around all infix operators.**
```r
    pixelsBiomassNonZero <- NROW(cohortData[, any(get(val) > 0), by = "pixelIndex"][get("V1") ==TRUE])
                                                                                ^~~
```
[R/cohorts.R:451:40:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L451) *style:* **Commas should always have a space after.**
```r
    message(magenta("Pixels with all(",val," > 0): ", format(pixelsBiomassNonZero, big.mark = ",")))
                                       ^
```
[R/cohorts.R:451:44:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L451) *style:* **Commas should always have a space after.**
```r
    message(magenta("Pixels with all(",val," > 0): ", format(pixelsBiomassNonZero, big.mark = ",")))
                                           ^
```
[R/cohorts.R:452:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L452) *style:* **Lines should not be more than 100 characters.**
```r
    out <- list(pixelsNA = pixelsNA, pixelsZero = pixelsZero, pixelsBiomassNonZero = pixelsBiomassNonZero)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:518:32:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L518) *style:* **Variable or function name should be lowerCamelCase.**
```r
                               availableERC_by_Sp, theUnwantedPixels,
                               ^~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:530:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L530) *style:* **Variable or function name should be lowerCamelCase.**
```r
      availableERC_by_Sp <- as.data.table(availableERC_by_Sp)
      ^~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:554:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L554) *style:* **Commented code should be removed.**
```r
  #   numChar <- max(nchar(availableERC_by_Sp$initialEcoregionCode), na.rm = TRUE)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:556:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L556) *style:* **Lines should not be more than 100 characters.**
```r
  #                      initialEcoregionCode := paste0("1_", paddedFloatToChar(as.integer(initialEcoregionCode), numChar))]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:560:16:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L560) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
    if (FALSE) { # This is old section... can be deleted soon (April 10, 2019, Eliot)
               ^
```
[R/cohorts.R:575:8:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L575) *style:* **Commented code should be removed.**
```r
    #  stop("values of 34 and 35 on pixelCohortData and sim$LCC2005 don't match")
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:604:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L604) *style:* **Lines should not be more than 100 characters.**
```r
    out <- out[initialPixels != pixels] # rm pixels which are same as initialPixels --> these are known wrong
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:607:42:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L607) *style:* **Put spaces around all infix operators.**
```r
    out[lcc %in% c(classesToReplace), lcc:=NA]
                                        ~^~~
```
[R/cohorts.R:610:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L610) *style:* **Lines should not be more than 100 characters.**
```r
                               on = c("pixelIndex" = "initialPixels"), nomatch = NA] # join the availableERC_by_Sp which has initialEcoregionCode
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:614:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L614) *style:* **Lines should not be more than 100 characters.**
```r
                               paddedFloatToChar(as.integer(lcc), padL = numCharLCCCodes, padR = 0))]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:618:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L618) *style:* **Lines should not be more than 100 characters.**
```r
    out7 <- out5[availableERG2, on = c("speciesCode", "possERC" = "initialEcoregionCode"), nomatch = NA]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:668:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L668) *style:* **Commented code should be removed.**
```r
    # setnames(out3, c("initialPixels", "initialEcoregionCode"), c("pixelIndex", "ecoregionGroup"))
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:670:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L670) *style:* **Commented code should be removed.**
```r
    # out3 <- unique(out3, by = c("pixelIndex", "ecoregionGroup"))
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:693:6:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L693) *style:* **Commented code should be removed.**
```r
    #describeCohortData(cohortData)
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:702:16:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L702) *style:* **Variable or function name should be lowerCamelCase.**
```r
  cohortData[, V1 := NULL]
               ^~
```
[R/cohorts.R:707:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L707) *style:* **Commented code should be removed.**
```r
  # cohortData[speciesCode == "Popu_sp", cover := asInteger(cover / 2)]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:709:14:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L709) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  cohortData[ , cover := {
             ^
```
[R/cohorts.R:709:15:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L709) *style:* **Commas should never have a space before.**
```r
  cohortData[ , cover := {
             ~^
```
[R/cohorts.R:721:14:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L721) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  cohortData[ , B := mean(totalBiomass) * cover / 100, by = "pixelIndex"]
             ^
```
[R/cohorts.R:721:15:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L721) *style:* **Commas should never have a space before.**
```r
  cohortData[ , B := mean(totalBiomass) * cover / 100, by = "pixelIndex"]
             ~^
```
[R/cohorts.R:721:17:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L721) *style:* **Variable or function name should be lowerCamelCase.**
```r
  cohortData[ , B := mean(totalBiomass) * cover / 100, by = "pixelIndex"]
                ^
```
[R/cohorts.R:723:14:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L723) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  cohortData[ , B := ceiling(B / pixelGroupBiomassClass) * pixelGroupBiomassClass]
             ^
```
[R/cohorts.R:723:15:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L723) *style:* **Commas should never have a space before.**
```r
  cohortData[ , B := ceiling(B / pixelGroupBiomassClass) * pixelGroupBiomassClass]
             ~^
```
[R/cohorts.R:723:17:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L723) *style:* **Variable or function name should be lowerCamelCase.**
```r
  cohortData[ , B := ceiling(B / pixelGroupBiomassClass) * pixelGroupBiomassClass]
                ^
```
[R/cohorts.R:725:14:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L725) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  cohortData[ , totalBiomass := asInteger(totalBiomass)]
             ^
```
[R/cohorts.R:725:15:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L725) *style:* **Commas should never have a space before.**
```r
  cohortData[ , totalBiomass := asInteger(totalBiomass)]
             ~^
```
[R/cohorts.R:831:36:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L831) *style:* **Variable or function name should be lowerCamelCase.**
```r
  cohortData[cover > 0 & age == 0, B := 0L]
                                   ^
```
[R/cohorts.R:837:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L837) *style:* **Commented code should be removed.**
```r
  # cohortData[ , coverProp := (cover/100 * (NROW(cohortData) - 1) + 0.5) / NROW(cohortData)]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:849:22:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L849) *style:* **Variable or function name should be lowerCamelCase.**
```r
subsetDT <- function(DT, by, doSubset = TRUE) {
                     ^~
```
[R/cohorts.R:854:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L854) *style:* **Lines should not be more than 100 characters.**
```r
              "using maximum of ", sam, " samples per combination of ecoregionGroup and speciesCode. ",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/cohorts.R:859:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/cohorts.R#L859) *style:* **Variable or function name should be lowerCamelCase.**
```r
      DT <- DT[a$lineNum]
      ^~
```
[R/ecoregionProducer.R:37:4:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/ecoregionProducer.R#L37) *style:* **Commented code should be removed.**
```r
  #ecoregionMapInStudy <- raster::intersect(ecoregionMapFull, fixErrors(aggregate(studyArea)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ecoregionProducer.R:54:3:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/ecoregionProducer.R#L54) *style:* **Variable or function name should be lowerCamelCase.**
```r
  NAs <- rtmNAs | rstEcoregionNAs
  ^~~
```
[R/ecoregionProducer.R:71:4:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/ecoregionProducer.R#L71) *style:* **Commented code should be removed.**
```r
  #ecoregionFactorValues <- na.omit(unique(rstEcoregion[]))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ecoregionProducer.R:73:4:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/ecoregionProducer.R#L73) *style:* **Commented code should be removed.**
```r
  #ecoregionTable <- raster::levels(rstEcoregion)[[1]]
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ecoregionProducer.R:81:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/ecoregionProducer.R#L81) *style:* **Lines should not be more than 100 characters.**
```r
    # rstEcoregion[] <- plyr::mapvalues(rstEcoregion[], from = ecoregionTable$ecoregion, to = ecoregionTable$mapcode)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ecoregionProducer.R:81:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/ecoregionProducer.R#L81) *style:* **Commented code should be removed.**
```r
    # rstEcoregion[] <- plyr::mapvalues(rstEcoregion[], from = ecoregionTable$ecoregion, to = ecoregionTable$mapcode)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ecoregionProducer.R:96:37:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/ecoregionProducer.R#L96) *style:* **Commas should always have a space after.**
```r
  ecoregionTable <- ecoregionTable[,.(active = "yes", mapcode, ecoregion)]
                                    ^
```
[R/LANDIS-II-tables.R:76:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L76) *style:* **Lines should not be more than 100 characters.**
```r
    sppEquiv <- data.table(utils::data("sppEquivalencies_CA", package = "LandR", envir = environment()))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:84:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L84) *style:* **Lines should not be more than 100 characters.**
```r
  speciesTable <- speciesTable[species %in% equivalentName(sppNameVector, sppEquiv, "LANDIS_traits", multi = TRUE) &
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:101:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L101) *style:* **Lines should not be more than 100 characters.**
```r
#' (\url{https://raw.githubusercontent.com/dcyr/LANDIS-II_IA_generalUseFiles/master/speciesTraits.csv}).
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:105:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L105) *style:* **Lines should not be more than 100 characters.**
```r
#' @param species a \code{data.table} that has species traits such as longevity, shade tolerance, etc.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:122:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L122) *style:* **Lines should not be more than 100 characters.**
```r
    sppEquiv <- data.table(utils::data("sppEquivalencies_CA", package = "LandR", envir = environment()))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:144:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L144) *style:* **Lines should not be more than 100 characters.**
```r
  speciesTableShort[species == "PSEU.MEN", longevity := 525] ## only in MC area, corresponding to var. glauca
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:153:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L153) *style:* **Lines should not be more than 100 characters.**
```r
  speciesTableShort <- speciesTableShort[species %in% equivalentName(sppNameVector, sppEquiv, "LANDIS_traits", multi = TRUE)]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:170:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L170) *style:* **Lines should not be more than 100 characters.**
```r
#' \url{https://github.com/LANDIS-II-Foundation/Extensions-Succession/master/biomass-succession-archive/trunk/tests/v6.0-2.0/biomass-succession_test.txt"}).
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:190:17:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L190) *style:* **Commented code should be removed.**
```r
  maxcol <- 13 #max(count.fields(file.path(dPath, "species.txt"), sep = ""))
                ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:211:13:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L211) *style:* **Only use double-quotes.**
```r
  species[, ':='(seeddistance_eff = gsub(",", "", seeddistance_eff),
            ^~~~
```
[R/LANDIS-II-tables.R:211:17:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L211) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  species[, ':='(seeddistance_eff = gsub(",", "", seeddistance_eff),
                ^
```
[R/LANDIS-II-tables.R:224:18:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L224) *style:* **Only use double-quotes.**
```r
  speciesAddon[, ':='(leaflongevity = as.numeric(leaflongevity),
                 ^~~~
```
[R/LANDIS-II-tables.R:224:22:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L224) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  speciesAddon[, ':='(leaflongevity = as.numeric(leaflongevity),
                     ^
```
[R/LANDIS-II-tables.R:236:13:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L236) *style:* **Only use double-quotes.**
```r
  species[, ':='(species = paste0(toupper(substring(species1, 1, 1)),
            ^~~~
```
[R/LANDIS-II-tables.R:236:17:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L236) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  species[, ':='(species = paste0(toupper(substring(species1, 1, 1)),
                ^
```
[R/LANDIS-II-tables.R:240:13:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L240) *style:* **Only use double-quotes.**
```r
  species[, ':='(species1 = NULL, species2 = NULL)]
            ^~~~
```
[R/LANDIS-II-tables.R:240:17:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L240) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  species[, ':='(species1 = NULL, species2 = NULL)]
                ^
```
[R/LANDIS-II-tables.R:268:39:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L268) *style:* **Commas should always have a space after.**
```r
  mainInput <- mainInput[col1 != ">>",]
                                      ^
```
[R/LANDIS-II-tables.R:278:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L278) *style:* **Lines should not be more than 100 characters.**
```r
#' \url{https://github.com/LANDIS-II-Foundation/Extensions-Succession/master/biomass-succession-archive/trunk/tests/v6.0-2.0/ecoregion.txt"}).
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:295:16:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L295) *style:* **Commented code should be removed.**
```r
  maxcol <- 5 #max(count.fields(file.path(dPath, "ecoregions.txt"), sep = ""))
               ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:311:47:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L311) *style:* **Commas should always have a space after.**
```r
  ecoregion <- ecoregion[col1 != "LandisData",]
                                              ^
```
[R/LANDIS-II-tables.R:312:39:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L312) *style:* **Commas should always have a space after.**
```r
  ecoregion <- ecoregion[col1 != ">>",]
                                      ^
```
[R/LANDIS-II-tables.R:324:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L324) *style:* **Lines should not be more than 100 characters.**
```r
#' \url{https://github.com/LANDIS-II-Foundation/Extensions-Succession/master/biomass-succession-archive/trunk/tests/v6.0-2.0/biomass-succession-dynamic-inputs_test.txt"}).
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/LANDIS-II-tables.R:356:61:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L356) *style:* **Commas should always have a space after.**
```r
  speciesEcoregion <- speciesEcoregion[col1 != "LandisData",]
                                                            ^
```
[R/LANDIS-II-tables.R:357:53:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L357) *style:* **Commas should always have a space after.**
```r
  speciesEcoregion <- speciesEcoregion[col1 != ">>",]
                                                    ^
```
[R/LANDIS-II-tables.R:368:22:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L368) *style:* **Only use double-quotes.**
```r
  speciesEcoregion[, ':='(species = paste0(toupper(substring(species1, 1, 1)),
                     ^~~~
```
[R/LANDIS-II-tables.R:368:26:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L368) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  speciesEcoregion[, ':='(species = paste0(toupper(substring(species1, 1, 1)),
                         ^
```
[R/LANDIS-II-tables.R:371:22:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L371) *style:* **Only use double-quotes.**
```r
  speciesEcoregion[, ':='(species1 = NULL, species2 = NULL)]
                     ^~~~
```
[R/LANDIS-II-tables.R:371:26:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/LANDIS-II-tables.R#L371) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  speciesEcoregion[, ':='(species1 = NULL, species2 = NULL)]
                         ^
```
[R/maps.R:22:29:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L22) *style:* **Variable or function name should be lowerCamelCase.**
```r
defineFlammable <- function(LandCoverClassifiedMap = NULL,
                            ^~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:128:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L128) *style:* **Variable or function name should be lowerCamelCase.**
```r
    MixedRas <- speciesStack[[1]]
    ^~~~~~~~
```
[R/maps.R:132:18:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L132) *style:* **Variable or function name should be lowerCamelCase.**
```r
    speciesStack$Mixed <- MixedRas
                 ^~~~~
```
[R/maps.R:203:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L203) *style:* **Lines should not be more than 100 characters.**
```r
                    "Attempting to use data('sppEquivalencies_CA', 'LandR') and sppEquivCol == 'Boreal'"))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:220:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L220) *style:* **Lines should not be more than 100 characters.**
```r
    # 1. Find length of each pixelGroup -- don't include pixelGroups in "by" that have only 1 cohort: N = 1
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:224:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L224) *style:* **Lines should not be more than 100 characters.**
```r
    pixelGroupData1 <- cohortData1[, .(pixelGroup, B, speciesCode)][pixelGroupData1, on = "pixelGroup"]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:227:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L227) *style:* **Lines should not be more than 100 characters.**
```r
    pixelGroupData1 <- pixelGroupData1[, .(speciesGroupB = sum(B, na.rm = TRUE), totalB = totalB[1]), by = pgdAndSc]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:228:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L228) *style:* **Lines should not be more than 100 characters.**
```r
    set(pixelGroupData1, NULL, "speciesProportion", pixelGroupData1$speciesGroupB / pixelGroupData1$totalB)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:243:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L243) *style:* **Commented code should be removed.**
```r
    # setorderv(cohortData, "pixelGroup")
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:246:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L246) *style:* **Variable or function name should be lowerCamelCase.**
```r
    N <- rep.int(pixelGroupData2$N, pixelGroupData2$N)
    ^
```
[R/maps.R:255:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L255) *style:* **Variable or function name should be lowerCamelCase.**
```r
    GT1 <- (b > 1)
    ^~~
```
[R/maps.R:258:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L258) *style:* **Lines should not be more than 100 characters.**
```r
      pixelGroupData2[[1]] <- cohortData2[GT1, .(speciesProportion = sum(B, na.rm = TRUE) / totalB[1]),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:261:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L261) *style:* **Lines should not be more than 100 characters.**
```r
      set(cohortData2, which(!GT1), "speciesProportion", cohortData2$B[!GT1] / cohortData2$totalB[!GT1])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:262:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L262) *style:* **Lines should not be more than 100 characters.**
```r
      pixelGroupData2[[NROW(pixelGroupData2) + 1]] <- cohortData2[!GT1, c("pixelGroup", "speciesCode",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:323:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L323) *style:* **Lines should not be more than 100 characters.**
```r
    ## 2. sort on pixelGroup and speciesProportion, reverse so that 1st row of each pixelGroup is the largest
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:345:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L345) *style:* **Lines should not be more than 100 characters.**
```r
                                                              speciesProportion < vegLeadingProportion &
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:346:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L346) *style:* **Lines should not be more than 100 characters.**
```r
                                                              speciesProportion > 1 - vegLeadingProportion, FALSE, NA),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:350:6:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L350) *style:* **Commented code should be removed.**
```r
    #set(pixelGroupData3, NULL, "speciesProportion", NULL)
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:351:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L351) *style:* **Lines should not be more than 100 characters.**
```r
    pixelGroupData3 <- pixelGroupData3[, .SD[1], by = "pixelGroup"] ## sp. w/ highest prop. per pixelGroup
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:361:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L361) *style:* **Commented code should be removed.**
```r
  # a2 <- Sys.time()
    ^~~~~~~~~~~~~~~~
```
[R/maps.R:365:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L365) *style:* **Commented code should be removed.**
```r
  # pixelGroupData2[mixed == TRUE, leading := "Mixed"]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:366:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L366) *style:* **Commented code should be removed.**
```r
  # b2 <- Sys.time()
    ^~~~~~~~~~~~~~~~
```
[R/maps.R:520:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L520) *style:* **Lines should not be more than 100 characters.**
```r
  ## select which archives/targetFiles to extract -- because there was "multi" above, need unique here
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:527:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L527) *style:* **Lines should not be more than 100 characters.**
```r
                    archive2 = file.path(dPath, paste0("NFI_MODIS250m_kNN_Species_", kNNnames, "_v0.zip")))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:530:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L530) *style:* **Lines should not be more than 100 characters.**
```r
  if (!all(reproducible::basename2(file_path_sans_ext(names(archives))) == file_path_sans_ext(targetFiles)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:537:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L537) *style:* **Lines should not be more than 100 characters.**
```r
    message("This looks like a lot of species; did you mean to pass only a subset of this to sppEquiv?",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:555:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L555) *style:* **Lines should not be more than 100 characters.**
```r
                         prepInputs, quick = TRUE) # don't need to digest all the "targetFile" and "archives"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:557:77:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L557) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  noDataLayers <- sapply(speciesLayers, function(x) if (maxValue(x) < thresh ) FALSE else TRUE)
                                                                            ^
```
[R/maps.R:560:76:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L560) *style:* **Commas should always have a space after.**
```r
    message("removing ", sum(!noDataLayers), " species because they had <",thresh,
                                                                           ^
```
[R/maps.R:562:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L562) *style:* **Lines should not be more than 100 characters.**
```r
            "\n  These species are retained (and could be further culled manually, if desired):\n  ",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:584:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L584) *style:* **Commented code should be removed.**
```r
  # layerData <- Cache(sapply, X = speciesLayers, function(x) sum(x[] > 0, na.rm = TRUE))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:586:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L586) *style:* **Commented code should be removed.**
```r
  # ## remove layers that had < thresh pixels with biomass
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:587:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L587) *style:* **Commented code should be removed.**
```r
  # belowThresh <- layerData < thresh
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:589:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L589) *style:* **Commented code should be removed.**
```r
  #   message(names(belowThresh)[belowThresh], " was removed because it had no data")
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:590:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L590) *style:* **Commented code should be removed.**
```r
  #   speciesLayers[belowThresh] <- NULL
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/maps.R:689:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L689) *style:* **Variable or function name should be lowerCamelCase.**
```r
      LQRastName <- basename(tempfile(fileext = ".tif"))
      ^~~~~~~~~~
```
[R/maps.R:691:9:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L691) *style:* **Variable or function name should be lowerCamelCase.**
```r
        LQCurName <- basename(tempfile(fileext = ".tif"))
        ^~~~~~~~~
```
[R/maps.R:698:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L698) *style:* **Variable or function name should be lowerCamelCase.**
```r
      LQRastInHQcrs <- projectExtent(lowQualityStack, crs = crs(highQualityStack))
      ^~~~~~~~~~~~~
```
[R/maps.R:711:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L711) *style:* **Variable or function name should be lowerCamelCase.**
```r
      LQRast <- raster(LQRastName)
      ^~~~~~
```
[R/maps.R:729:9:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L729) *style:* **Variable or function name should be lowerCamelCase.**
```r
        HQRast <- raster(tmpHQName)
        ^~~~~~
```
[R/maps.R:734:9:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L734) *style:* **Variable or function name should be lowerCamelCase.**
```r
        HQRast <- highQualityStack[[SPP]]
        ^~~~~~
```
[R/maps.R:737:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L737) *style:* **Variable or function name should be lowerCamelCase.**
```r
      LQRast <- lowQualityStack[[SPP]]
      ^~~~~~
```
[R/maps.R:738:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L738) *style:* **Variable or function name should be lowerCamelCase.**
```r
      HQRast <- highQualityStack[[SPP]]
      ^~~~~~
```
[R/maps.R:745:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L745) *style:* **Variable or function name should be lowerCamelCase.**
```r
    NAs <- is.na(HQRast[])
    ^~~
```
[R/maps.R:749:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L749) *style:* **Variable or function name should be lowerCamelCase.**
```r
    HQRast <- writeRaster(HQRast, datatype = "INT1U",
    ^~~~~~
```
[R/maps.R:759:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L759) *style:* **Variable or function name should be lowerCamelCase.**
```r
      HQRast <- highQualityStack[[SPP]]
      ^~~~~~
```
[R/maps.R:763:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L763) *style:* **Variable or function name should be lowerCamelCase.**
```r
      LQRast <- lowQualityStack[[SPP]]
      ^~~~~~
```
[R/maps.R:767:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L767) *style:* **Variable or function name should be lowerCamelCase.**
```r
      HQRast <- highQualityStack[[SPP]]
      ^~~~~~
```
[R/maps.R:799:4:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/maps.R#L799) *style:* **Commented code should be removed.**
```r
  #names(sppMerges) <- equivalentName(names(sppMerges), sppEquiv,  column = sppEquivCol)
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/misc.R:23:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/misc.R#L23) *style:* **Lines should not be more than 100 characters.**
```r
#' Essentially a wrapper around \code{round}, rather than \code{truncate}, which is what \code{as.integer}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/overlayLCCs.R:47:25:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L47) *style:* **Variable or function name should be lowerCamelCase.**
```r
overlayLCCs <- function(LCCs, forestedList, outputLayer,
                        ^~~~
```
[R/overlayLCCs.R:48:25:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L48) *style:* **Variable or function name should be lowerCamelCase.**
```r
                        NAcondition, NNcondition, remapTable = NULL,
                        ^~~~~~~~~~~
```
[R/overlayLCCs.R:48:38:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L48) *style:* **Variable or function name should be lowerCamelCase.**
```r
                        NAcondition, NNcondition, remapTable = NULL,
                                     ^~~~~~~~~~~
```
[R/overlayLCCs.R:49:43:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L49) *style:* **Variable or function name should be lowerCamelCase.**
```r
                        classesToReplace, availableERC_by_Sp,
                                          ^~~~~~~~~~~~~~~~~~
```
[R/overlayLCCs.R:65:5:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L65) *style:* **Variable or function name should be lowerCamelCase.**
```r
    LCCs <- stack(LCCs)
    ^~~~
```
[R/overlayLCCs.R:81:7:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L81) *style:* **Variable or function name should be lowerCamelCase.**
```r
      availableERC_by_Sp <- data.table(initialEcoregionCode = LCCs[[outputLayer]][])
      ^~~~~~~~~~~~~~~~~~
```
[R/overlayLCCs.R:90:14:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L90) *style:* **Variable or function name should be lowerCamelCase.**
```r
        dt[, NAs := eval(parse(text = NAcondition)), with = TRUE]
             ^~~
```
[R/overlayLCCs.R:92:14:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L92) *style:* **Variable or function name should be lowerCamelCase.**
```r
        dt[, NAs := NULL]
             ^~~
```
[R/overlayLCCs.R:96:14:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L96) *style:* **Variable or function name should be lowerCamelCase.**
```r
        dt[, NNcondition := eval(parse(text = NNcondition))]
             ^~~~~~~~~~~
```
[R/overlayLCCs.R:101:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L101) *style:* **Lines should not be more than 100 characters.**
```r
          ## It's possible that there are no pixels with classesToReplace that fulfill the NNcondition
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/overlayLCCs.R:105:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L105) *style:* **Lines should not be more than 100 characters.**
```r
                                  availableERC_by_Sp = na.omit(dt)[, c("initialEcoregionCode", "pixelIndex")])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/overlayLCCs.R:128:13:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L128) *style:* **Only use double-quotes.**
```r
      dt2[, ':='(initialEcoregionCode = newLCC, ecoregionCode = newLCC)]
            ^~~~
```
[R/overlayLCCs.R:128:17:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L128) *style:* **Place a space before left parenthesis, except in a function call.**
```r
      dt2[, ':='(initialEcoregionCode = newLCC, ecoregionCode = newLCC)]
                ^
```
[R/overlayLCCs.R:131:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L131) *style:* **Lines should not be more than 100 characters.**
```r
      dt1 <- dt2[initialEcoregionCode %in% classesToReplace, c("initialEcoregionCode", "pixelIndex")]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/overlayLCCs.R:138:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/overlayLCCs.R#L138) *style:* **Lines should not be more than 100 characters.**
```r
                                availableERC_by_Sp = na.omit(dt2)[, c("initialEcoregionCode", "pixelIndex")])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/prepInputObjects.R:3:83:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/prepInputObjects.R#L3) *style:* **Trailing whitespace is superfluous.**
```r
                           "lcc", "longevity", "maxB", "maxANPP", "postfireregen",
                                                                                ^
```
[R/prepInputObjects.R:10:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/prepInputObjects.R#L10) *style:* **Lines should not be more than 100 characters.**
```r
#' @param species a \code{data.table} that has species traits such as longevity, shade tolerance, etc.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/prepInputObjects.R:11:1:](https://github.com/PredictiveEcology/LandR/blob/492913926ef7037b024a2a73b40091075df78a9f/R/prepInputObjects.R#L11) *style:* **Lines should not be more than 100 characters.**
```r
#' @param sppColorVect A named vector of colors to use for plotting. The names must conform with \code{names(speciesLayers)}
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


[Circle has built](https://circleci.com/gh/cypress-io/cypress/132498) the `linux x64` version of the Test Runner.

You can install this pre-release platform-specific build using instructions at [https://on.cypress.io/installing-cypress#Install-pre-release-version](https://on.cypress.io/installing-cypress#Install-pre-release-version).

You will need to use custom `CYPRESS_INSTALL_BINARY` url and install Cypress using an url instead of the version.

    export CYPRESS_INSTALL_BINARY=https://cdn.cypress.io/beta/binary/3.4.1/linux-x64/circle-develop-941ee7ff73c0337c2b0484c5933efae43ce91d65-132495/cypress.zip
    npm install https://cdn.cypress.io/beta/npm/3.4.1/circle-develop-941ee7ff73c0337c2b0484c5933efae43ce91d65-132479/cypress.tgz


[AppVeyor has built](https://ci.appveyor.com/project/cypress-io/cypress/builds/25897710/job/p389hr50n69o7mr9) the `win32 ia32` version of the Test Runner.

You can install this pre-release platform-specific build using instructions at [https://on.cypress.io/installing-cypress#Install-pre-release-version](https://on.cypress.io/installing-cypress#Install-pre-release-version).

You will need to use custom `CYPRESS_INSTALL_BINARY` url and install Cypress using an url instead of the version.

    set CYPRESS_INSTALL_BINARY=https://cdn.cypress.io/beta/binary/3.4.1/win32-ia32/appveyor-develop-941ee7ff73c0337c2b0484c5933efae43ce91d65-25897710/cypress.zip
    npm install https://cdn.cypress.io/beta/binary/3.4.1/win32-ia32/appveyor-develop-941ee7ff73c0337c2b0484c5933efae43ce91d65-25897710/cypress.zip


Nevermind, issue was caused by a broken downstream inotify patch.


[AppVeyor has built](https://ci.appveyor.com/project/cypress-io/cypress/builds/25897710/job/7soybgsob8v4f1d9) the `win32 x64` version of the Test Runner.

You can install this pre-release platform-specific build using instructions at [https://on.cypress.io/installing-cypress#Install-pre-release-version](https://on.cypress.io/installing-cypress#Install-pre-release-version).

You will need to use custom `CYPRESS_INSTALL_BINARY` url and install Cypress using an url instead of the version.

    set CYPRESS_INSTALL_BINARY=https://cdn.cypress.io/beta/binary/3.4.1/win32-x64/appveyor-develop-941ee7ff73c0337c2b0484c5933efae43ce91d65-25897710/cypress.zip
    npm install https://cdn.cypress.io/beta/binary/3.4.1/win32-x64/appveyor-develop-941ee7ff73c0337c2b0484c5933efae43ce91d65-25897710/cypress.zip


Hi,

i don't know how, but this change got into the PR even if it wasn't included.
Is it ok?


wrong commit: include typo


Right! Do feel free to assign issues to yourself, I'm in the middle of trying to break the TypeScript declaration issues smaller :)


@baranowb  Yep, there is now - but it is subtle :) - before calling the script set the MAVEN_SETTINGS_XML content to empty string:

```
export MAVEN_SETTINGS_XML=''
```
The syntax used to valorize this variable inside the script will see the variable as defined (even if empty) the value will remains "nothing" leading to the MAVEN_SETTINGS_XML_OPTION to be also empty.


There is even a [unit test for this use case](https://github.com/jboss-set/harmonia/blob/master/tests/eap-job-tests.bats#L28) !


Successfully aliased the URL <https://marp-cli-example-ah1id1vpm.now.sh> to the following aliases:

* https://marp-cli-example.imflash217.now.sh
* https://marp-cli-example-git-master.imflash217.now.sh


`IsSpace(pieceCoordinate) {return nowBoardStatusArray[pieceCoordinate.y][pieceCoordinate.x] == "space";}` という関数を作って、 `if (IsSpace(pieceCoordinate))` とするというテクニックもあります。


Free Shipping STC


単に `canPutInsertionToArray` で良いと思います。


develop (rraustad) - x86_64-Linux-Ubuntu-18.04-cppcheck: OK (0 of 0 tests passed, 0 test warnings)

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


Oh, I see. Just kept wondering if the naming was a convention expected by MATLAB or random. That's okay, just curious.


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

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

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

### Deployments updated

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

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


develop (rraustad) - x86_64-Linux-Ubuntu-18.04-custom_check: OK (9 of 9 tests passed, 0 test warnings)

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


Dan Kalowsky recently reported that he found out by bisecting that this commit causes issues. He reported it in the forum:
https://sourceforge.net/p/cppcheck/discussion/general/thread/b7c8cd5af8/


google-homepage solution


PEP 3102 got no backport to Python 2.x:
https://www.python.org/dev/peps/pep-3102/


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

Created multidev environment [pr-86](https://dashboard.pantheon.io/sites/77e169f6-098e-4e68-b9b1-67d0b7cc2f02#pr-86) for badcamp-2019.


133 行目でも同じ処理をしてるように見えるので、関数にすると良いかな？


Why did you add and remove your doc?


Free


![](https://github.trello.services/images/mini-trello-icon.png) [Expander is not working properly in Arabic](https://trello.com/c/g95mj7u9/5779-expander-is-not-working-properly-in-arabic)


[Circle has built](https://circleci.com/gh/cypress-io/cypress/132504) the `darwin x64` version of the Test Runner.

You can install this pre-release platform-specific build using instructions at [https://on.cypress.io/installing-cypress#Install-pre-release-version](https://on.cypress.io/installing-cypress#Install-pre-release-version).

You will need to use custom `CYPRESS_INSTALL_BINARY` url and install Cypress using an url instead of the version.

    export CYPRESS_INSTALL_BINARY=https://cdn.cypress.io/beta/binary/3.4.1/darwin-x64/circle-develop-941ee7ff73c0337c2b0484c5933efae43ce91d65-132503/cypress.zip
    npm install https://cdn.cypress.io/beta/npm/3.4.1/circle-develop-941ee7ff73c0337c2b0484c5933efae43ce91d65-132502/cypress.tgz


develop (rraustad) - x86_64-Linux-Ubuntu-18.04-gcc-7.4: OK (1796 of 1796 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)


roshan


Successfully aliased the URL <https://git-answer-backend-btadczhcq.now.sh> to the following aliases:

* https://git-answer-backend.now.sh
* https://git-answer-backend.edwardcrdeam.now.sh
* https://git-answer-backend-git-master.edwardcrdeam.now.sh


Tr: "Longneck tüfeği, düşmanları yok etmek için yeni sakinleştirici dartlardan yararlanabilir.  Şu anda bunlar, bir canlıya torpor uygulamak için en iyi silahlardan biri"


If this isn't supposed to be used, I'd prefer throwing an exception.


[R/dashboard.R:34:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/dashboard.R#L34) *style:* **Variable and function names should not be longer than 30 characters.**
```r
DashboardInitialiseComputerName <- function(
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/dashboard.R:97:3:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/dashboard.R#L97) *style:* **Variable and function names should not be longer than 30 characters.**
```r
  DashboardInitialiseComputerName(
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/GenData.R:5:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/GenData.R#L5) *style:* **lines should not be more than 120 characters.**
```r
  norwayLocations <- norwayLocations[is.na(norwayLocations$yearEnd), c("municip", "municipName", "county", "countyName")]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/GenData.R:63:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/GenData.R#L63) *style:* **lines should not be more than 120 characters.**
```r
  skeleton <- expand.grid(year = as.numeric(2006:maxYear), municip = unique(masterData$municip), stringsAsFactors = FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/GenData.R:93:7:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/GenData.R#L93) *style:* **Commented code should be removed.**
```r
    # print(skeletonOther[municip %in% c("municip1723","municip1756","municip5053")])
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/GenData.R:107:5:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/GenData.R#L107) *style:* **Commented code should be removed.**
```r
  # skeletonFinal[municip %in% c("municip1723","municip1756","municip5053")]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/GenData.R:108:5:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/GenData.R#L108) *style:* **Commented code should be removed.**
```r
  # skeletonFinal[municip %in% c("municip0301")]
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/GenData.R:155:17:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/GenData.R#L155) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
    pop[[i]] <- melt.data.table(pop[[i]], id.vars = c("region", "age"))
                ^~~~~~~~~~~~~~~
```
[R/graphs.R:184:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L184) *style:* **lines should not be more than 120 characters.**
```r
    if (!is.null(dataCIL) & !is.null(dataCIU)) q <- q + stat_stepribbon(aes_string(ymin = dataCIL, ymax = dataCIU), fill = "black", direction = "vh", alpha = 0.4)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:190:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L190) *style:* **lines should not be more than 120 characters.**
```r
    if (!is.null(dataCIL) & !is.null(dataCIU)) q <- q + geom_ribbon(aes_string(ymin = dataCIL, ymax = dataCIU), fill = "black", alpha = 0.4)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:197:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L197) *style:* **lines should not be more than 120 characters.**
```r
    if (includeMedium | includeHigh) q <- q + geom_point(aes_string(x = "xShifted", y = dataVal), size = 4, fill = "black", data = pd[pd$status %in% c("Medium", "High"), ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:199:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L199) *style:* **lines should not be more than 120 characters.**
```r
  if (includeMedium) q <- q + geom_point(aes_string(x = "xShifted", y = dataVal, colour = shQuote("L2")), size = 2, data = pd[pd$status == "Medium", ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:200:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L200) *style:* **lines should not be more than 120 characters.**
```r
  if (includeHigh) q <- q + geom_point(aes_string(x = "xShifted", y = dataVal, colour = shQuote("L1")), size = 2, data = pd[pd$status == "High", ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:207:5:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L207) *style:* **Commented code should be removed.**
```r
  # q <- q + scale_xcontinuous("Dato", breaks = breaksDF$xShifted,  labels = breaksDF$printLabel)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:262:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L262) *style:* **lines should not be more than 120 characters.**
```r
  if (includeMedium | includeHigh) q <- q + geom_point(aes_string(y = dataVal), size = 4, fill = "black", data = pd[pd$status %in% c("Medium", "High"), ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:263:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L263) *style:* **lines should not be more than 120 characters.**
```r
  if (includeMedium) q <- q + geom_point(aes_string(y = dataVal, colour = shQuote("L2")), size = 2, data = pd[pd$status == "Medium", ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:264:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L264) *style:* **lines should not be more than 120 characters.**
```r
  if (includeHigh) q <- q + geom_point(aes_string(y = dataVal, colour = shQuote("L1")), size = 2, data = pd[pd$status == "High", ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:316:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L316) *style:* **lines should not be more than 120 characters.**
```r
    q <- q + geom_line(aes_string(y = dataVal, colour = comparisonNames), lwd = 2, alpha = 0.8, data = pd[pd[[highlightCondition]], ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:320:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L320) *style:* **lines should not be more than 120 characters.**
```r
      q <- q + geom_line(aes_string(y = dataVal, colour = shQuote(newName)), lwd = 2, alpha = 0.8, data = pd[pd[[highlightCondition]] & pd[[comparisonNames]] == i, ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:349:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L349) *style:* **lines should not be more than 120 characters.**
```r
MakeLineExcessPlot <- function(pd, x, dataVal, dataZ, dataCIL = NULL, dataCIU = NULL, allPoints = TRUE, title = NULL, pointShift = 0, xShift = 0, weekNumbers = FALSE, step = FALSE, GetCols) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:392:7:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L392) *style:* **Commented code should be removed.**
```r
    # q <- q + stat_stepribbon(aes_string(ymin = L3, ymax = L4, fill = shQuote("L1")), direction="vh", alpha = 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:393:7:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L393) *style:* **Commented code should be removed.**
```r
    # q <- q + stat_stepribbon(aes_string(ymin = L2, ymax = L3, fill = shQuote("L2")), direction="vh", alpha = 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:394:7:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L394) *style:* **Commented code should be removed.**
```r
    # q <- q + stat_stepribbon(aes_string(ymin = L1, ymax = L2, fill = shQuote("L3")), direction="vh", alpha = 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:395:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L395) *style:* **lines should not be more than 120 characters.**
```r
    if (!is.null(dataCIL) & !is.null(dataCIU)) q <- q + stat_stepribbon(aes_string(ymin = dataCIL, ymax = dataCIU), fill = "black", direction = "vh", alpha = 0.4)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:398:7:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L398) *style:* **Commented code should be removed.**
```r
    # q <- q + geom_ribbon(aes_string(ymin = L3, ymax = L4, fill = shQuote("L1")), alpha = 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:399:7:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L399) *style:* **Commented code should be removed.**
```r
    # q <- q + geom_ribbon(aes_string(ymin = L2, ymax = L3, fill = shQuote("L2")), alpha = 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:400:7:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L400) *style:* **Commented code should be removed.**
```r
    # q <- q + geom_ribbon(aes_string(ymin = L1, ymax = L2, fill = shQuote("L3")), alpha = 0.4)
      ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:401:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L401) *style:* **lines should not be more than 120 characters.**
```r
    if (!is.null(dataCIL) & !is.null(dataCIU)) q <- q + geom_ribbon(aes_string(ymin = dataCIL, ymax = dataCIU), fill = "black", alpha = 0.4)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:408:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L408) *style:* **lines should not be more than 120 characters.**
```r
    if (includeMedium | includeHigh) q <- q + geom_point(aes_string(x = "xShifted", y = dataVal), size = 4, fill = "black", data = pd[pd$status %in% c("Medium", "High"), ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:410:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L410) *style:* **lines should not be more than 120 characters.**
```r
  if (includeMedium) q <- q + geom_point(aes_string(x = "xShifted", y = dataVal, colour = shQuote("L2")), size = 2, data = pd[pd$status == "Medium", ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/graphs.R:411:1:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/graphs.R#L411) *style:* **lines should not be more than 120 characters.**
```r
  if (includeHigh) q <- q + geom_point(aes_string(x = "xShifted", y = dataVal, colour = shQuote("L1")), size = 2, data = pd[pd$status == "High", ])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RenderExternally.R:48:5:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/RenderExternally.R#L48) *style:* **Commented code should be removed.**
```r
  # file.remove(file.path(tmp_dir,tmp_name))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/stat_stepribbon.R:7:37:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/stat_stepribbon.R#L7) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
    xs <- rep(1:n, each = 2)[ -2 * n ]
                                    ^
```
[R/temp_dir.R:3:21:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/temp_dir.R#L3) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
  time <- gsub("[\\: ]", "-", time)
                    ^
```
[R/txt_progress_bar.R:29:25:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L29) *style:* **Put spaces around all infix operators.**
```r
    width <- trunc(width/nw)
                       ~^~
```
[R/txt_progress_bar.R:38:38:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L38) *style:* **Put spaces around all infix operators.**
```r
    nb <- round(width * (value - min)/(max - min))
                                    ~^~
```
[R/txt_progress_bar.R:38:39:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L38) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    nb <- round(width * (value - min)/(max - min))
                                      ^
```
[R/txt_progress_bar.R:39:36:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L39) *style:* **Put spaces around all infix operators.**
```r
    pc <- round(100 * (value - min)/(max - min))
                                  ~^~
```
[R/txt_progress_bar.R:39:37:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L39) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    pc <- round(100 * (value - min)/(max - min))
                                    ^
```
[R/txt_progress_bar.R:42:59:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L42) *style:* **Commas should always have a space after.**
```r
    mins_from_start <- round(as.numeric(difftime(time_now,time_start, units="mins")),1)
                                                          ^
```
[R/txt_progress_bar.R:42:76:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L42) *style:* **Put spaces around all infix operators.**
```r
    mins_from_start <- round(as.numeric(difftime(time_now,time_start, units="mins")),1)
                                                                          ~^~
```
[R/txt_progress_bar.R:42:86:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L42) *style:* **Commas should always have a space after.**
```r
    mins_from_start <- round(as.numeric(difftime(time_now,time_start, units="mins")),1)
                                                                                ^
```
[R/txt_progress_bar.R:43:28:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L43) *style:* **Put spaces around all infix operators.**
```r
    total_time <- round(100*mins_from_start/pc,1)
                          ~^~
```
[R/txt_progress_bar.R:43:44:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L43) *style:* **Put spaces around all infix operators.**
```r
    total_time <- round(100*mins_from_start/pc,1)
                                          ~^~
```
[R/txt_progress_bar.R:43:48:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/R/txt_progress_bar.R#L43) *style:* **Commas should always have a space after.**
```r
    total_time <- round(100*mins_from_start/pc,1)
                                               ^
```
[tests/testthat/test.R:6:5:](https://github.com/folkehelseinstituttet/fhi/blob/27f7f743dd756aea84e110623ff934788570abc0/tests/testthat/test.R#L6) *style:* **Commented code should be removed.**
```r
  # rmarkdown::render(input=f,output_dir = tempdir())
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


`insertArrayDataToBoard` で良いかな。


同じく `insertArrayDataToPieceTable` で良いと思います。


Congrats too!


Tr: "Longneck tüfek, düşmanları vurmak için yeni şok edici sakinleştirici dartlardan yararlanabilir. Bunlar normal dartlardan iki kat daha fazla torpor hasarı yapar, ancak 4 saat sonra bozulacak.",


Technically there is no real-time sampling involved here. This is "pseudo-real time". So I'd just write "Sampling violation" or something else. Explanation:
- Windows is not a RT OS. Nothing you do on Windows is RT, it is garbage for control!:)
- USB is not really "real-time" either, since the transfer is quite complicated (as opposed to serial) and unpredictable. It is fine for modern devices like digital cameras etc. but you cannot guarantee timing. Hence, serial (and other more up to date protocols) are alive and well in certain contexts, like control and mechatronics.


As above ^^^


ref #317


The fact that you cannot live plot this process is no surprise at all, do not worry about that actually.

Is there a way you could unify these plotting functions? So that the user does not have to remember all of the different plotting cases. What I mean is that e.g. you could switch off live plotting for certain cases (like this) and... Don't now, not sure if it's worth it and this should certainly not be your priorities... ;-)


See below


Sometimes, you may wish to ignore a given ID during the unique check. For example, consider an "update profile" screen that includes the user's name, e-mail address, and location. Of course, you will want to verify that the e-mail address is unique. However, if the user only changes the name field and not the e-mail field, you do not want a validation error to be thrown because the user is already the owner of the e-mail address.

To instruct the validator to ignore the user's ID, we'll use the Rule class to fluently define the rule. In this example, we'll also specify the validation rules as an array instead of using the | character to delimit the rules:


My guess (as in other comments) is that these changes may be even too aggressive and you may expect way too much from the hardware and a simple PID.