[tests/testthat/test-CalcDARLEQ.R:11:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L11) *style:* **Variable or function name should be snake_case.**
```r
    badData <- data.frame(sampleID = c("1", "2", "3"),
    ^~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:29:3:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L29) *style:* **Variable or function name should be snake_case.**
```r
  darleqTaxonDictionary  <-  read.csv(system.file("extdata",
  ^~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:36:3:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L36) *style:* **Variable or function name should be snake_case.**
```r
  lookUpDARLEQ2 <- phytobenthosMetrics:::LookUpDARLEQ2
  ^~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:57:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L57) *style:* **Variable or function name should be snake_case.**
```r
    riverAquaMetrics  <-  read.csv(system.file("extdata",
    ^~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:61:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L61) *style:* **Variable or function name should be snake_case.**
```r
    lakesAquaMetrics  <-  read.csv(system.file("extdata",
    ^~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:66:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L66) *style:* **Variable or function name should be snake_case.**
```r
    riverDARLEQRResults  <-  read.csv(system.file("extdata",
    ^~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:70:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L70) *style:* **Variable or function name should be snake_case.**
```r
    lakesDARLEQRResults  <-  read.csv(system.file("extdata",
    ^~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:75:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L75) *style:* **Variable or function name should be snake_case.**
```r
    riverAquaMetricsResults <- CalcDARLEQ(riverAquaMetrics, metric = "rivers")
    ^~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:76:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L76) *style:* **Variable or function name should be snake_case.**
```r
    riverAquaMetricsResults <- data.frame(riverAquaMetricsResults[1])
    ^~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:78:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L78) *style:* **Variable or function name should be snake_case.**
```r
    lakeAquaMetricsResults <- CalcDARLEQ(lakesAquaMetrics, metric = "lakes")
    ^~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:79:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L79) *style:* **Variable or function name should be snake_case.**
```r
    lakeAquaMetricsResults <- data.frame(lakeAquaMetricsResults[1])
    ^~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:82:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/80c321a03c6d1e5169f920faecbb165ca2b011de/tests/testthat/test-CalcDARLEQ.R#L82) *style:* **Variable or function name should be snake_case.**
```r
    roundExcel <- function(x, n) {
    ^~~~~~~~~~
```


Ok, we will start formatting them that way. Also, if it is suitable we decided to name our domain portu-whatsapp.newtfire.org


another reason i stopped was the object classes may need to be renamed to be specific to Services or even CreditServices.  Until we know more....


Can  I reply?

Sent from Mail for Windows 10

From: Changhe Li
Sent: 2017年9月26日 16:14
To: Changhe160/OFEC_Alpha
Cc: monarchBacilluscoli; Author
Subject: Re: [Changhe160/OFEC_Alpha] dynamic_contiuous's constructor completed(f7c2372)

my_vector --> replace with Vector, see utility
—
You are receiving this because you authored the thread.
Reply to this email directly, view it on GitHub, or mute the thread.


keyboard


Use a general method with ranges:
```
checkOverflow(byte message, int beginIndex, int endIndex)
```


That makes sense.


Yes, indeed! (I shall set that up shortly...) Also, I'm going to commit a little housewarming gift to your repo--I'm writing up an issue to explain what it is and how it'll help you. More in a few minutes.. :-)


I shouldn't be doing this kind of work when my mind isn't into it, obviously.


Created multidev environment [monthofmud#ci-44](https://dashboard.pantheon.io/sites/c1008179-94f3-4a56-ba0b-53c7f98ca3f8#ci-44).

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


Por nada, valeu!


Should that be initialized in a ngAfterViewInit since it is bound to this.swiperSlides which is a view child, so it might not be available at this time?


If we plan to show the airport search queries in this section we'll need the pre-built database first since it contains airport docs. Maybe we can swap Query and Pre-built database in the outline.


Wouldn't it be simpler to just have a standard select field (maybe labelled 'Choose a starting theme' or something like that) to pick one theme to install during setup? If a user wants to import additional themes they can do that from the themes panel.

Just conscious of the more themes being installed at setup, the more chance of an import error. The more support calls we get.


@vaishnavisv  you have implemented colors incorrectly, below code just changes the color of the description field.
`.tl-slidenav-description{
           color: #F9A01F !important ;
         }`

i meant you should actually implement :hover state for the element, which should be like,
`        .tl-slidenav-icon:hover {
          color: #F9A01F !important;
          }`

please make the changes and push the code


What is 'data' here and what are you trying to stop with the `preventDefault()` method?


True. Good point. One theme's fine at setup then.


watch your indents! Also, this is a repeat of the line above.


Ordenação de listas no método bolha e seleção


No, I prepared the code beforehand and commited during a break ;)


learning


@barbalberto  I just noticed this change: what is the rational of having this connection persistent?


![](https://github.trello.services/images/mini-trello-icon.png) [Se till att DaVanMonet byggs korrekt till dev](https://trello.com/c/g8CxJlnQ/49-se-till-att-davanmonet-byggs-korrekt-till-dev)


Created multidev environment [mann-web#pr-1](https://dashboard.pantheon.io/sites/5c8ef4ff-2765-4fe6-b6e5-ce0099a410ba#pr-1).

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


This `searches()` is a function you are trying to call but is not defined anywhere. On line 6 you call a function called `requestWeatherData()` and pass it a city. This sounds like what you're trying to do here just with the user input. Try defining what this function would do and how you would use what gets passed to it (i.e. use the input in the query string).


Yes addOverrideUser will add the relative *_by fields only for the fields that are updating.
See below  https://github.com/goga-m/lamassu-server/commit/65c250472164045865fae95000cb93f4c44c870a#diff-4ed6ef0b4aa14022b99a7b88126b875bR87


Нет необходимости


This ajax method should be called inside your `requestWeatherData(city)` function so every time you invoke that function it will query the API and make the ajax call with the correct city.


[inst/examples/Ants/Ants.R:13:2:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L13) *style:* **Commented code should be removed.**
```r
#library(testthat) # for testing
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:19:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L19) *style:* **Commented code should be removed.**
```r
# Torus = FALSE
  ^~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:88:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L88) *style:* **Variable or function name should be lowerCamelCase.**
```r
f_fS_world <- of(world = world, var = c("food", "foodSource"), agents = patches(world))
^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:99:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L99) *style:* **Commented code should be removed.**
```r
  #print(paste("toNest", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:103:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L103) *style:* **Variable or function name should be lowerCamelCase.**
```r
  nestChem_pHere <- of(world = world, agents = pHere, var = c("nest", "chemical"))
  ^~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:109:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L109) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesIn) != 0){
    ^
```
[inst/examples/Ants/Ants.R:117:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L117) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesOut) != 0){
    ^
```
[inst/examples/Ants/Ants.R:133:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L133) *style:* **Commented code should be removed.**
```r
  #print(paste("toNest", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:138:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L138) *style:* **Commented code should be removed.**
```r
  #print(paste("lookFood", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:141:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L141) *style:* **Variable or function name should be lowerCamelCase.**
```r
  foodChem_pHere <- of(world = world, agents = pHere,
  ^~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:147:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L147) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesFood) != 0){
    ^
```
[inst/examples/Ants/Ants.R:156:97:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L156) *style:* **Trailing whitespace is superfluous.**
```r
                   var = "food", val = foodChem_pHere[foodChem_pHere[, "food"] > 0, "food"] - 1)
                                                                                ^
```
[inst/examples/Ants/Ants.R:163:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L163) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesChem) != 0){
    ^
```
[inst/examples/Ants/Ants.R:169:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L169) *style:* **Commented code should be removed.**
```r
  #print(paste("lookFood", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:174:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L174) *style:* **Commented code should be removed.**
```r
  #print(paste("upPatch", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:192:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L192) *style:* **Commented code should be removed.**
```r
  #print(paste("upPatch", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:197:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L197) *style:* **Commented code should be removed.**
```r
  #print(paste("wiggle", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:210:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L210) *style:* **Commented code should be removed.**
```r
  #print(paste("wiggle", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:216:2:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L216) *style:* **Commented code should be removed.**
```r
#time <- 0
 ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:217:6:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L217) *style:* **Place a space before left parenthesis, except in a function call.**
```r
while(sum(f_fS_world[, "food"]) != 0){ # as long as there is food in the world
     ^
```
[inst/examples/Ants/Ants.R:217:38:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L217) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
while(sum(f_fS_world[, "food"]) != 0){ # as long as there is food in the world
                                     ^
```
[inst/examples/Ants/Ants.R:222:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L222) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(aRed) != 0){
    ^
```
[inst/examples/Ants/Ants.R:230:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L230) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(aOrange) != 0){
    ^
```
[inst/examples/Ants/Ants.R:250:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L250) *style:* **Variable or function name should be lowerCamelCase.**
```r
  f_fS_world <- of(world = world, var = c("food", "foodSource"), agents = patches(world))
  ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:256:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L256) *style:* **Commented code should be removed.**
```r
  # time <- time + 1
    ^~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:257:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L257) *style:* **Commented code should be removed.**
```r
  # print(time)
    ^~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:260:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L260) *style:* **Commented code should be removed.**
```r
  # plot(world2raster(world)$layer.5) # food
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:261:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L261) *style:* **Commented code should be removed.**
```r
  # points(ants, pch = 16)
    ^~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:263:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Ants/Ants.R#L263) *style:* **Commented code should be removed.**
```r
  # expect_equivalent(NLcount(ants), nAnts)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:31:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Butterfly/Butterfly-1.R#L31) *style:* **Commented code should be removed.**
```r
# t1 <- createTurtles(n = 100, coords = cbind(xcor = 85, ycor = 95)) # can try with 100 butterflies
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:39:4:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Butterfly/Butterfly-1.R#L39) *style:* **Place a space before left parenthesis, except in a function call.**
```r
for(time in 1:1000){ # what is inside this loop will be iterated 1000 times
   ^
```
[inst/examples/Butterfly/Butterfly-1.R:39:20:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Butterfly/Butterfly-1.R#L39) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
for(time in 1:1000){ # what is inside this loop will be iterated 1000 times
                   ^
```
[inst/examples/Butterfly/Butterfly-1.R:46:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Butterfly/Butterfly-1.R#L46) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(runif(n = 1, min = 0, max = 1) < q){ # conditional statement
    ^
```
[inst/examples/Butterfly/Butterfly-1.R:46:41:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Butterfly/Butterfly-1.R#L46) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if(runif(n = 1, min = 0, max = 1) < q){ # conditional statement
                                        ^
```
[inst/examples/Butterfly/Butterfly-1.R:69:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Butterfly/Butterfly-1.R#L69) *style:* **Commented code should be removed.**
```r
  # print(time)
    ^~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:33:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L33) *style:* **Commented code should be removed.**
```r
# torus = TRUE # just for reminder, to be used in the movement functions (e.g., fd())
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:89:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L89) *style:* **Commented code should be removed.**
```r
#   plot(world2raster(field)[[1]])
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:90:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L90) *style:* **Commented code should be removed.**
```r
#   points(sheep, pch = 16, col = "red")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:91:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L91) *style:* **Commented code should be removed.**
```r
#   points(wolves, pch = 16, col = "black")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:93:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L93) *style:* **Commented code should be removed.**
```r
#   grass <- NLset(world = grass, agents = patches(grass), val = 0) # cannot plot an empty world
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:94:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L94) *style:* **Commented code should be removed.**
```r
#   plot(grass)
    ^~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:95:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L95) *style:* **Commented code should be removed.**
```r
#   points(sheep, pch = 16, col = "red")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:96:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L96) *style:* **Commented code should be removed.**
```r
#   points(wolves, pch = 16, col = "black")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:108:27:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L108) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
move <- function(turtles) { # sheep and wolves
                          ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:109:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L109) *style:* **Commented code should be removed.**
```r
  # turtles <- right(turtles, angle = runif(n = NLcount(turtles), min = 0, max = 50))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:110:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L110) *style:* **Commented code should be removed.**
```r
  # turtles <- left(turtles, angle = runif(n = NLcount(turtles), min = 0, max = 50))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:118:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L118) *style:* **Commented code should be removed.**
```r
# # Test move()
  ^~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:119:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L119) *style:* **Commented code should be removed.**
```r
# plot(wolves@.Data[, "xcor"], wolves@.Data[, "ycor"], col = rainbow(NLcount(wolves)), pch = 16)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:121:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L121) *style:* **Commented code should be removed.**
```r
#   wolves <- move(wolves)
    ^~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:122:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L122) *style:* **Commented code should be removed.**
```r
#   points(wolves@.Data[, "xcor"], wolves@.Data[, "ycor"], col = rainbow(NLcount(wolves)), pch = 16)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:126:24:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L126) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
eatGrass <- function() { # only sheep
                       ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:147:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L147) *style:* **Commented code should be removed.**
```r
# # Test eatGrass()
  ^~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:148:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L148) *style:* **Commented code should be removed.**
```r
# grass <- createWorld(minPxcor = 1, maxPxcor = 10, minPycor = 1, maxPycor = 10)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:149:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L149) *style:* **Commented code should be removed.**
```r
# grass <- NLset(world = grass, agents = patches(grass), val = c(rep(1, 50), rep(0, 50)))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:150:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L150) *style:* **Commented code should be removed.**
```r
# countdown <- grass
  ^~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:151:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L151) *style:* **Commented code should be removed.**
```r
# countdown <- NLset(world = countdown, agents = patches(countdown), val = 0)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:152:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L152) *style:* **Commented code should be removed.**
```r
# field <- stackWorlds(grass, countdown)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:153:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L153) *style:* **Commented code should be removed.**
```r
# sheep <- createTurtles(n = 10, coords = cbind(xcor = 1:10, ycor = 1:10))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:154:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L154) *style:* **Commented code should be removed.**
```r
# sheep <- turtlesOwn(turtles = sheep, tVar = "energy", tVal = 1:10)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:155:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L155) *style:* **Commented code should be removed.**
```r
# resultsEatGrass <- eatGrass()
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:156:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L156) *style:* **Commented code should be removed.**
```r
# fieldEat <- resultsEatGrass[[1]]
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:160:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L160) *style:* **Commented code should be removed.**
```r
# sheepEat <- resultsEatGrass[[2]]
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:161:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L161) *style:* **Commented code should be removed.**
```r
# of(agents = sheepEat, var = "energy")[6:10] == (6:10 + gainFoodSheep)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:164:28:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L164) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
death <- function(turtles) { # sheep and wolves
                           ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:177:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L177) *style:* **Commented code should be removed.**
```r
# # Test death()
  ^~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:182:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L182) *style:* **Commented code should be removed.**
```r
# count1 <- NLcount(wolves)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:183:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L183) *style:* **Commented code should be removed.**
```r
# count2 <- NLcount(wolves)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:185:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L185) *style:* **Commented code should be removed.**
```r
#   energy <- runif(NLcount(wolves), min = -10, max = 100)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:186:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L186) *style:* **Commented code should be removed.**
```r
#   wolves <- NLset(turtles = wolves, agents = wolves, var = "energy", val = energy)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:187:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L187) *style:* **Commented code should be removed.**
```r
#   count1 <- c(count1, NLcount(wolves) - length(energy[energy < 0]))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:188:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L188) *style:* **Commented code should be removed.**
```r
#   wolves <- death(wolves)
    ^~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:189:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L189) *style:* **Commented code should be removed.**
```r
#   count2 <- c(count2, NLcount(wolves))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:191:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L191) *style:* **Commented code should be removed.**
```r
# plot(1:length(count1), count1, pch = 16)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:192:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L192) *style:* **Commented code should be removed.**
```r
# points(1:length(count2), count2, pch = 16, col = "red")
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:195:46:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L195) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
reproduce <- function(turtles, reproTurtles) { # sheep and wolves
                                             ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:202:31:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L202) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
  if (NLcount(reproInd) != 0) { # if there is at least one turtle reproducing
                              ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:224:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L224) *style:* **Commented code should be removed.**
```r
# # Test reproduce()
  ^~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:229:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L229) *style:* **Commented code should be removed.**
```r
# count1 <- NLcount(wolves)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:230:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L230) *style:* **Commented code should be removed.**
```r
# count2 <- NLcount(wolves)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:232:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L232) *style:* **Commented code should be removed.**
```r
#   count1 <- c(count1,NLcount(wolves) + NLcount(wolves) * reproWolf / 100)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:233:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L233) *style:* **Commented code should be removed.**
```r
#   wolves <- reproduce(wolves, reproWolf)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:234:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L234) *style:* **Commented code should be removed.**
```r
#   count2 <- c(count2, NLcount(wolves))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:236:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L236) *style:* **Commented code should be removed.**
```r
# plot(1:length(count1), count1, pch = 16)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:237:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L237) *style:* **Commented code should be removed.**
```r
# points(1:length(count2), count2, pch = 16, col = "red")
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:240:26:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L240) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
catchSheep <- function() { # only wolves
                         ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:262:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L262) *style:* **Commented code should be removed.**
```r
# # Test catchSheep()
  ^~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:265:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L265) *style:* **Commented code should be removed.**
```r
# countdown <- grass
  ^~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:266:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L266) *style:* **Commented code should be removed.**
```r
# countdown <- NLset(world = countdown, agents = patches(countdown), val = 0)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:267:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L267) *style:* **Commented code should be removed.**
```r
# field <- stackWorlds(grass, countdown)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:270:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L270) *style:* **Commented code should be removed.**
```r
# wolves <- createTurtles(n = 5, coords = cbind(xcor = 1:5, ycor = 1:5))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:271:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L271) *style:* **Commented code should be removed.**
```r
# wolves <- turtlesOwn(turtles = wolves, tVar = "energy", tVal = 1:5)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:272:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L272) *style:* **Commented code should be removed.**
```r
# catchSheepResults <- catchSheep()
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:273:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L273) *style:* **Commented code should be removed.**
```r
# sheepCatch <- catchSheepResults[[1]]
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:274:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L274) *style:* **Commented code should be removed.**
```r
# wolvesCatch <- catchSheepResults[[2]]
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:275:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L275) *style:* **Commented code should be removed.**
```r
# NLcount(sheepCatch) == 5
  ^~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:276:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L276) *style:* **Commented code should be removed.**
```r
# NLcount(wolvesCatch) == 5
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:277:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L277) *style:* **Commented code should be removed.**
```r
# of(agents = wolvesCatch, var = "energy") == (1:5 + gainFoodWolf)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:280:25:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L280) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
growGrass <- function() { # only patches
                        ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:292:61:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L292) *style:* **Trailing whitespace is superfluous.**
```r
                 val = cbind(grass = rep(1, NLcount(pGrow)),
                                                            ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:308:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L308) *style:* **Commented code should be removed.**
```r
# # Test growGrass()
  ^~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:309:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L309) *style:* **Commented code should be removed.**
```r
# grass <- createWorld(1, 5, 1, 5)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:310:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L310) *style:* **Commented code should be removed.**
```r
# grass <- NLset(world = grass, agents = patches(grass), val = c(rep(1, 10), rep(0, 15)))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:311:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L311) *style:* **Commented code should be removed.**
```r
# countdown <- grass
  ^~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:312:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L312) *style:* **Lines should not be more than 100 characters.**
```r
# countdown <- NLset(world = countdown, agents = patches(countdown), val = c(rep(-1, 15), rep(1, 10)))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:312:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L312) *style:* **Commented code should be removed.**
```r
# countdown <- NLset(world = countdown, agents = patches(countdown), val = c(rep(-1, 15), rep(1, 10)))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:313:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L313) *style:* **Commented code should be removed.**
```r
# field <- stackWorlds(grass, countdown)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:314:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L314) *style:* **Commented code should be removed.**
```r
# fieldGrow <- growGrass()
  ^~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:315:3:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L315) *style:* **Commented code should be removed.**
```r
# of(world = fieldGrow, agents = patches(fieldGrow), var = "grass") == c(rep(1, 15), rep(0, 10))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:324:8:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L324) *style:* **Place a space before left parenthesis, except in a function call.**
```r
while ((NLany(sheep) | NLany(wolves)) & time < maxTime ) {
       ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:324:55:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L324) *style:* **Do not place spaces around code in parentheses or square brackets.**
```r
while ((NLany(sheep) | NLany(wolves)) & time < maxTime ) {
                                                      ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:371:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L371) *style:* **Commented code should be removed.**
```r
  # print(time)
    ^~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:395:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L395) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R:64:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R#L64) *style:* **Lines should not be more than 100 characters.**
```r
  expectedOutputEvent1Test1 <- " this is test for event 1. " # please define your expection of your output
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R:66:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R#L66) *style:* **Lines should not be more than 100 characters.**
```r
  expect_equal(simOutput$event1Test1, expectedOutputEvent1Test1) # or other expect function in testthat package.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R:67:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R#L67) *style:* **Lines should not be more than 100 characters.**
```r
  expect_equal(simOutput$event1Test2, as.numeric(999)) # or other expect function in testthat package.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R:75:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R#L75) *style:* **Lines should not be more than 100 characters.**
```r
  expectedOutputEvent2Test1 <- " this is test for event 2. " # please define your expection of your output
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R:77:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R#L77) *style:* **Lines should not be more than 100 characters.**
```r
  expect_equal(simOutput$event2Test1, expectedOutputEvent2Test1) # or other expect function in testthat package.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R:78:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/tests/testthat/test-template.R#L78) *style:* **Lines should not be more than 100 characters.**
```r
  expect_equal(simOutput$event2Test2, as.numeric(777)) # or other expect function in testthat package.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:5:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L5) *style:* **Lines should not be more than 100 characters.**
```r
  description = "Translation into R using the NetLogoR and SpaDES packages of the Wolf-Sheep-Predation NetLogo model created by Wilensky (1997)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:7:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L7) *style:* **Lines should not be more than 100 characters.**
```r
  authors = c(person("Sarah", "Bauduin", email = "sarahbauduin@hotmail.fr", role = c("aut", "cre"))),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:18:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L18) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".plotInitialTime", "numeric", 0, NA, NA, "This describes the simulation time at which the first plot event should occur"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:19:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L19) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".plotInterval", "numeric", 1, NA, NA, "This describes the simulation time at which the first plot event should occur"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:20:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L20) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".saveInitialTime", "numeric", 0, NA, NA, "This describes the simulation time at which the first save event should occur"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:21:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L21) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter(".saveInterval", "numeric", 1, NA, NA, "This describes the simulation time at which the first save event should occur"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:22:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L22) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("grassOn", "logical", TRUE, NA, NA, "TRUE to include grass in the model, FALSE to only include wolves and sheep"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:23:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L23) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("grassTGrowth", "numeric", 30, 0, NA, "how long it takes for grass to regrow once it is eaten"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:25:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L25) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("gainFoodSheep", "numeric", 4, 0, NA, "amount of energy sheep get for every grass patch eaten"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:26:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L26) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("reproSheep", "numeric", 4, 0, 100, "probability in % of a sheep reproducing at each time step"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:28:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L28) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("gainFoodWolf", "numeric", 20, 0, NA, "amount of energy wolves get for every sheep eaten"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:29:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L29) *style:* **Lines should not be more than 100 characters.**
```r
    defineParameter("reproWolf", "numeric", 5, 0, 100, "probability in % of a wolf reproducing at each time step")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:49:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L49) *style:* **Variable or function name should be lowerCamelCase.**
```r
doEvent.WolfSheepPredation = function(sim, eventTime, eventType, debug = FALSE) {
^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:49:28:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L49) *style:* **Use <-, not =, for assignment.**
```r
doEvent.WolfSheepPredation = function(sim, eventTime, eventType, debug = FALSE) {
                           ^
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:58:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L58) *style:* **Lines should not be more than 100 characters.**
```r
    sim <- scheduleEvent(sim, params(sim)$WolfSheepPredation$.plotInitialTime, "WolfSheepPredation", "plot")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:59:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L59) *style:* **Lines should not be more than 100 characters.**
```r
    sim <- scheduleEvent(sim, params(sim)$WolfSheepPredation$.saveInitialTime, "WolfSheepPredation", "save")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:60:64:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L60) *style:* **Commas should always have a space after.**
```r
    sim <- scheduleEvent(sim, start(sim), "WolfSheepPredation","event")
                                                               ^
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:69:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L69) *style:* **Lines should not be more than 100 characters.**
```r
    sim <- scheduleEvent(sim, time(sim) + params(sim)$WolfSheepPredation$.plotInterval, "WolfSheepPredation", "plot")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:74:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L74) *style:* **Lines should not be more than 100 characters.**
```r
    sim <- scheduleEvent(sim, time(sim) + params(sim)$WolfSheepPredation$.saveInterval, "WolfSheepPredation", "save")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:94:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L94) *style:* **Variable or function name should be lowerCamelCase.**
```r
WolfSheepPredationInit <- function(sim) {
^~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:105:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L105) *style:* **Lines should not be more than 100 characters.**
```r
    grassVal <- sample(c(0,1), size = NLcount(patches(grass)), replace = TRUE) # 0 or 1 (i.e., green or brown in the NetLogo model)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:105:28:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L105) *style:* **Commas should always have a space after.**
```r
    grassVal <- sample(c(0,1), size = NLcount(patches(grass)), replace = TRUE) # 0 or 1 (i.e., green or brown in the NetLogo model)
                           ^
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:108:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L108) *style:* **Lines should not be more than 100 characters.**
```r
    countdownVal <- runif(n = NLcount(patches(grass)), min = 0, max = params(sim)$WolfSheepPredation$grassTGrowth) # grass grow clock
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:112:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L112) *style:* **Lines should not be more than 100 characters.**
```r
  # When no patches values are used, using grass, countdown or field as the world argument required by a function does not change anything
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:114:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L114) *style:* **Lines should not be more than 100 characters.**
```r
  # When patches values are used (e.g., when the sheep eat the grass), use only field as the world argument for the functions
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:116:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L116) *style:* **Lines should not be more than 100 characters.**
```r
  # When field is updated, the values on the individual world grass and countdown are not updated, only the layers in field are
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:132:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L132) *style:* **Lines should not be more than 100 characters.**
```r
                      tVal = runif(n = params(sim)$WolfSheepPredation$nSheep, min = 0, max = 2 * params(sim)$WolfSheepPredation$gainFoodSheep))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:137:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L137) *style:* **Lines should not be more than 100 characters.**
```r
                          coords = randomXYcor(world = grass, n = params(sim)$WolfSheepPredation$nWolf),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:138:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L138) *style:* **Lines should not be more than 100 characters.**
```r
                          breed = "wolf", color = rep("black", params(sim)$WolfSheepPredation$nWolf))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:141:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L141) *style:* **Lines should not be more than 100 characters.**
```r
                       tVal = runif(n = params(sim)$WolfSheepPredation$nWolf, min = 0, max = 2 * params(sim)$WolfSheepPredation$gainFoodWolf))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:156:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L156) *style:* **Variable or function name should be lowerCamelCase.**
```r
WolfSheepPredationSave <- function(sim) {
^~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:170:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L170) *style:* **Variable or function name should be lowerCamelCase.**
```r
WolfSheepPredationPosition <- function(sim) { # Plot the positions
^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:170:45:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L170) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
WolfSheepPredationPosition <- function(sim) { # Plot the positions
                                            ^
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:174:41:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L174) *style:* **Commas should always have a space after.**
```r
    grassRas <- raster(sim$field@.Data[,,"grass"])
                                        ^
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:193:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L193) *style:* **Variable or function name should be lowerCamelCase.**
```r
WolfSheepPredationPopSize <- function(sim) {  # Plot the population sizes
^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:193:44:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L193) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
WolfSheepPredationPopSize <- function(sim) {  # Plot the population sizes
                                           ^
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:208:48:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L208) *style:* **Put spaces around all infix operators.**
```r
      points(time(sim), sim$numGreen[time(sim)]/4,
                                              ~^~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:217:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L217) *style:* **Variable or function name should be lowerCamelCase.**
```r
WolfSheepPredationEvent <- function(sim){
^~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:224:1:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L224) *style:* **Lines should not be more than 100 characters.**
```r
        sim$sheep <- NLset(turtles = sim$sheep, agents = sim$sheep, var = "energy", val = energySheep - 1)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:301:26:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L301) *style:* **Opening curly braces should never go on their own line and should always be followed by a new line.**
```r
move <- function(turtles){ # sheep and wolves
                         ^
```
[inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R:302:5:](https://github.com/PredictiveEcology/NetLogoR/blob/e65fa2ec7534e68984f76dfa7419514be11c3a32/inst/examples/Wolf-Sheep-Predation/WolfSheepPredation/WolfSheepPredation.R#L302) *style:* **Commented code should be removed.**
```r
  # turtles <- right(turtles, angle = runif(n = NLcount(turtles), min = 0, max = 50))


I'd like you to review this again over the weekend and see if you can't make more progress! Hopefully the all day lab yesterday helped you connect some of the dots here. Let me know if you try again and I'll review it for you.


I see `MavenProperties` usage in the `FunctionAppConfiguration`.
Don't we need to have it here whitelisted as well?
Thanks


[tests/testthat/test-CalcDARLEQ.R:11:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L11) *style:* **Variable or function name should be snake_case.**
```r
    badData <- data.frame(sampleID = c("1", "2", "3"),
    ^~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:29:3:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L29) *style:* **Variable or function name should be snake_case.**
```r
  darleqTaxonDictionary  <-  read.csv(system.file("extdata",
  ^~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:36:3:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L36) *style:* **Variable or function name should be snake_case.**
```r
  lookUpDARLEQ2 <- phytobenthosMetrics:::LookUpDARLEQ2
  ^~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:57:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L57) *style:* **Variable or function name should be snake_case.**
```r
    riverAquaMetrics  <-  read.csv(system.file("extdata",
    ^~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:61:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L61) *style:* **Variable or function name should be snake_case.**
```r
    lakesAquaMetrics  <-  read.csv(system.file("extdata",
    ^~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:66:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L66) *style:* **Variable or function name should be snake_case.**
```r
    riverDARLEQRResults  <-  read.csv(system.file("extdata",
    ^~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:70:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L70) *style:* **Variable or function name should be snake_case.**
```r
    lakesDARLEQRResults  <-  read.csv(system.file("extdata",
    ^~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:75:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L75) *style:* **Variable or function name should be snake_case.**
```r
    riverAquaMetricsResults <- CalcDARLEQ(riverAquaMetrics, metric = "rivers")
    ^~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:76:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L76) *style:* **Variable or function name should be snake_case.**
```r
    riverAquaMetricsResults <- data.frame(riverAquaMetricsResults[1])
    ^~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:78:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L78) *style:* **Variable or function name should be snake_case.**
```r
    lakeAquaMetricsResults <- CalcDARLEQ(lakesAquaMetrics, metric = "lakes")
    ^~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:79:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L79) *style:* **Variable or function name should be snake_case.**
```r
    lakeAquaMetricsResults <- data.frame(lakeAquaMetricsResults[1])
    ^~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test-CalcDARLEQ.R:82:5:](https://github.com/aquaMetrics/phytobenthosMetrics/blob/cdfcb4bc208cb5633bfd6b75ab4321684cc311c1/tests/testthat/test-CalcDARLEQ.R#L82) *style:* **Variable or function name should be snake_case.**
```r
    roundExcel <- function(x, n) {
    ^~~~~~~~~~
```


Could you create a pull request for your fix?


Now you need to state PHP>=5.4 in the composer.json, don't you?


@GabbasovDinar can you guess simply reading the logs and source?


Return trimmed here and the function must be parameterized eventually per tid.


Rename memory_copy to tenant_cache for clarity.


|`line 29`|
|---|
test


says you


You need the default constructor to be `@DataBoundConstructor`

```
@DataBoundConstructor
public BuildEverythingStrategy() {
}
```


I think this commit breaks gpio-keys functionality.  Can someone confirm?


This seems to work for me even though im having a new problem on that host with` InvalidAlgorithmParameterException: DH key size must be multiple of 64, and can only range from 512 to 2048 (inclusive). The specific key size 4096 is not supported`  but thats a java limitation that i have to live with for now.

Thanks for the help !


Created multidev environment [badcamp-2017#ci-662](https://dashboard.pantheon.io/sites/8d658997-7a61-4db8-9be8-0f16b8b62022#ci-662).

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


Bluemix [toolchain](https://console.bluemix.net/devops/toolchains/b09e3ee0-bc62-4bd7-bcf6-7b033dada6af "TriAzurUE"): [Delivery Pipeline](https://console.bluemix.net/devops/pipelines/57bc70fc-3a85-4eb7-a477-d1a67ac25fb2 "TriAzurUE") deployed [TriAzur_code](https://github.com/Doncassino/TriAzur_code/releases/tag/deploy-ibm-yp-eu-gb-TriAzur-TriAzur-20170928-143227 "deploy-ibm-yp-eu-gb-TriAzur-TriAzur-20170928-143227") to [TriAzur](https://console.bluemix.net/apps/11b7850a-b04f-4546-975c-fb2662c615cd?env_id=ibm:yp:eu-gb "ibm:yp:eu-gb:TriAzur:TriAzur"), including this commit


Could you please create a pull request for this commit?


done


Unclear. Probably not. Adding it didn't fix the issue.


I'm created a form inside a form for the Delete button


Cloud you please create a pull request for this commit?