[inst/examples/Ants/Ants.R:12:2:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L12) *style:* **Commented code should be removed.**
```r
#library(NetLogoR)
 ^~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:13:2:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/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/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L19) *style:* **Commented code should be removed.**
```r
# torus = FALSE
  ^~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:29:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L29) *style:* **Lines should not be more than 100 characters.**
```r
chemical <- createWorld(minPxcor = -35, maxPxcor = 35, minPycor = -35, maxPycor = 35, data = 0) # amount of chemical on the patches
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:29:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L29) *style:* **Lines should not be more than 100 characters.**
```r
chemical <- createWorld(minPxcor = -35, maxPxcor = 35, minPycor = -35, maxPycor = 35, data = 0) # amount of chemical on the patches
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:35:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L35) *style:* **Lines should not be more than 100 characters.**
```r
patchNest <- which(distNest < 5) # patch/cell numbers for the ones at distance less than 5 from [x = 0, y = 0]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:35:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L35) *style:* **Lines should not be more than 100 characters.**
```r
patchNest <- which(distNest < 5) # patch/cell numbers for the ones at distance less than 5 from [x = 0, y = 0]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:37:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L37) *style:* **Lines should not be more than 100 characters.**
```r
nest <- NLset(world = nest, agents = PxcorPycorFromCell(world = nest, cellNum = patchNest), val = 1) # and reassign 1 to the patches in the nest
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:37:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L37) *style:* **Lines should not be more than 100 characters.**
```r
nest <- NLset(world = nest, agents = PxcorPycorFromCell(world = nest, cellNum = patchNest), val = 1) # and reassign 1 to the patches in the nest
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:38:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L38) *style:* **Lines should not be more than 100 characters.**
```r
nestScent <- NLset(world = nestScent, agents = patches(nestScent), val = 200 - distNest) # spread nestScent over the whole world, stronger near the nest
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:38:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L38) *style:* **Lines should not be more than 100 characters.**
```r
nestScent <- NLset(world = nestScent, agents = patches(nestScent), val = 200 - distNest) # spread nestScent over the whole world, stronger near the nest
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:43:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L43) *style:* **Lines should not be more than 100 characters.**
```r
distFood1 <- NLdist(agents = patches(foodSource), agents2 = cbind(x = 0.6 * maxPxcor(foodSource), y = 0)) # setup food source 1 on the right
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:43:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L43) *style:* **Lines should not be more than 100 characters.**
```r
distFood1 <- NLdist(agents = patches(foodSource), agents2 = cbind(x = 0.6 * maxPxcor(foodSource), y = 0)) # setup food source 1 on the right
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:46:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L46) *style:* **Lines should not be more than 100 characters.**
```r
foodSource <- NLset(world = foodSource, agents = PxcorPycorFromCell(world = foodSource, cellNum = patchFood1), val = 1) # and reassign 1 to the patches in the foodSource 1
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:46:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L46) *style:* **Lines should not be more than 100 characters.**
```r
foodSource <- NLset(world = foodSource, agents = PxcorPycorFromCell(world = foodSource, cellNum = patchFood1), val = 1) # and reassign 1 to the patches in the foodSource 1
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:47:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L47) *style:* **Lines should not be more than 100 characters.**
```r
distFood2 <- NLdist(agents = patches(foodSource), agents2 = cbind(x = -0.6 * maxPxcor(foodSource), y = -0.6 * maxPycor(foodSource))) # setup food source 2 on the lower-left
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:47:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L47) *style:* **Lines should not be more than 100 characters.**
```r
distFood2 <- NLdist(agents = patches(foodSource), agents2 = cbind(x = -0.6 * maxPxcor(foodSource), y = -0.6 * maxPycor(foodSource))) # setup food source 2 on the lower-left
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:49:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L49) *style:* **Lines should not be more than 100 characters.**
```r
foodSource <- NLset(world = foodSource, agents = PxcorPycorFromCell(world = foodSource, cellNum = patchFood2), val = 2) # and reassign 2 to the patches in the foodSource 2
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:49:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L49) *style:* **Lines should not be more than 100 characters.**
```r
foodSource <- NLset(world = foodSource, agents = PxcorPycorFromCell(world = foodSource, cellNum = patchFood2), val = 2) # and reassign 2 to the patches in the foodSource 2
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:50:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L50) *style:* **Lines should not be more than 100 characters.**
```r
distFood3 <- NLdist(agents = patches(foodSource), agents2 = cbind(x = -0.8 * maxPxcor(foodSource), y = 0.8 * maxPycor(foodSource))) # setup food source 3 on the upper-left
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:50:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L50) *style:* **Lines should not be more than 100 characters.**
```r
distFood3 <- NLdist(agents = patches(foodSource), agents2 = cbind(x = -0.8 * maxPxcor(foodSource), y = 0.8 * maxPycor(foodSource))) # setup food source 3 on the upper-left
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:52:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L52) *style:* **Lines should not be more than 100 characters.**
```r
foodSource <- NLset(world = foodSource, agents = PxcorPycorFromCell(world = foodSource, cellNum = patchFood3), val = 3) # and reassign 3 to the patches in the foodSource 3
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:52:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L52) *style:* **Lines should not be more than 100 characters.**
```r
foodSource <- NLset(world = foodSource, agents = PxcorPycorFromCell(world = foodSource, cellNum = patchFood3), val = 3) # and reassign 3 to the patches in the foodSource 3
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:55:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L55) *style:* **Lines should not be more than 100 characters.**
```r
food <- NLset(world = food, agents = patchFood123, val = sample(c(1,2), size = NLcount(patchFood123), replace = TRUE)) # set "food" at sources to either 1 or 2, randomly
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:55:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L55) *style:* **Lines should not be more than 100 characters.**
```r
food <- NLset(world = food, agents = patchFood123, val = sample(c(1,2), size = NLcount(patchFood123), replace = TRUE)) # set "food" at sources to either 1 or 2, randomly
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:55:69:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L55) *style:* **Commas should always have a space after.**
```r
food <- NLset(world = food, agents = patchFood123, val = sample(c(1,2), size = NLcount(patchFood123), replace = TRUE)) # set "food" at sources to either 1 or 2, randomly
                                                                    ^
```
[inst/examples/Ants/Ants.R:59:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L59) *style:* **Lines should not be more than 100 characters.**
```r
ants <- createTurtles(n = nAnts, coords = cbind(xcor = 0, ycor = 0), color = "red") # red = not carrying food
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:59:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L59) *style:* **Lines should not be more than 100 characters.**
```r
ants <- createTurtles(n = nAnts, coords = cbind(xcor = 0, ycor = 0), color = "red") # red = not carrying food
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:62:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L62) *style:* **Commented code should be removed.**
```r
# plot(world) # all the layers
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:63:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L63) *style:* **Commented code should be removed.**
```r
# plot(ants) # the ants only
  ^~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:64:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L64) *style:* **Commented code should be removed.**
```r
# plot(world2raster(world)$layer.5) # only the food layer
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:65:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L65) *style:* **Commented code should be removed.**
```r
# points(ants, pch = 16) # add the ants on the food layer
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:68:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L68) *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:69:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L69) *style:* **Lines should not be more than 100 characters.**
```r
food1 <- sum(f_fS_world[f_fS_world[, "foodSource"] == 1, "food"]) # sum of food values for the patches with foodSource equals to 1
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:69:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L69) *style:* **Lines should not be more than 100 characters.**
```r
food1 <- sum(f_fS_world[f_fS_world[, "foodSource"] == 1, "food"]) # sum of food values for the patches with foodSource equals to 1
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:70:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L70) *style:* **Lines should not be more than 100 characters.**
```r
food2 <- sum(f_fS_world[f_fS_world[, "foodSource"] == 2, "food"]) # sum of food values for the patches with foodSource equals to 2
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:70:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L70) *style:* **Lines should not be more than 100 characters.**
```r
food2 <- sum(f_fS_world[f_fS_world[, "foodSource"] == 2, "food"]) # sum of food values for the patches with foodSource equals to 2
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:71:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L71) *style:* **Lines should not be more than 100 characters.**
```r
food3 <- sum(f_fS_world[f_fS_world[, "foodSource"] == 3, "food"]) # sum of food values for the patches with foodSource equals to 3
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:71:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L71) *style:* **Lines should not be more than 100 characters.**
```r
food3 <- sum(f_fS_world[f_fS_world[, "foodSource"] == 3, "food"]) # sum of food values for the patches with foodSource equals to 3
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:76:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L76) *style:* **Commented code should be removed.**
```r
  #print(paste("toNest", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:79:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L79) *style:* **Lines should not be more than 100 characters.**
```r
  nest_chem_pHere <- of(world = world, agents = pHere, var = c("nest", "chemical")) # nest values (1 or 0) and chemical in the order of the turtles
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:79:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L79) *style:* **Variable or function name should be lowerCamelCase.**
```r
  nest_chem_pHere <- of(world = world, agents = pHere, var = c("nest", "chemical")) # nest values (1 or 0) and chemical in the order of the turtles
  ^~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:83:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L83) *style:* **Lines should not be more than 100 characters.**
```r
  turtlesIn <- turtle(turtles, who = whoTurtles[nest_chem_pHere[, "nest"] == 1]) # whoTurtles for which their nest value equals 1
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:84:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L84) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesIn) != 0){
    ^
```
[inst/examples/Ants/Ants.R:90:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L90) *style:* **Lines should not be more than 100 characters.**
```r
  turtlesOut <- turtle(turtles, who = whoTurtles[nest_chem_pHere[, "nest"] == 0]) # whoTurtles for which their nest value equals 0
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:91:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L91) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesOut) != 0){
    ^
```
[inst/examples/Ants/Ants.R:92:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L92) *style:* **Lines should not be more than 100 characters.**
```r
    pHereOut <- pHere[nest_chem_pHere[, "nest"] == 0, , drop = FALSE] # pHere for which their nest value equals 0 (drop = FALSE keeps a format matrix when 1 row)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:93:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L93) *style:* **Lines should not be more than 100 characters.**
```r
    world <- NLset(world = world, agents = pHereOut, var = "chemical", val = nest_chem_pHere[nest_chem_pHere[, "nest"] == 0, "chemical"] + 60) # drop some chemical
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:94:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L94) *style:* **Lines should not be more than 100 characters.**
```r
    turtlesOut <- upPatch(turtles = turtlesOut, varPatch = "nestScent") # head toward the greatest value of nestScent
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:97:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L97) *style:* **Lines should not be more than 100 characters.**
```r
  # Because turtles have been modified separately as turtlesIn and turtlesOut, we need to put them back together to execute the following procedure
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:98:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L98) *style:* **Lines should not be more than 100 characters.**
```r
  turtles <- turtleSet(turtlesIn, turtlesOut) # there should not be any problem (e.g., duplicates) as turtles are always either in or out, but never both or neither
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:99:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L99) *style:* **Commented code should be removed.**
```r
  #print(paste("toNest", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:104:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L104) *style:* **Commented code should be removed.**
```r
  #print(paste("lookFood", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:107:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L107) *style:* **Lines should not be more than 100 characters.**
```r
  food_chem_pHere <- of(world = world, agents = pHere, var = c("food", "chemical")) # faster to extract both values at the same time
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:107:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L107) *style:* **Variable or function name should be lowerCamelCase.**
```r
  food_chem_pHere <- of(world = world, agents = pHere, var = c("food", "chemical")) # faster to extract both values at the same time
  ^~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:112:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L112) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesFood) != 0){
    ^
```
[inst/examples/Ants/Ants.R:113:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L113) *style:* **Lines should not be more than 100 characters.**
```r
    turtlesFood <- NLset(turtles = turtlesFood, agents = turtlesFood, var = "color", val = "orange") # pick up food
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:115:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L115) *style:* **Lines should not be more than 100 characters.**
```r
    turtles <- turtleSet(turtlesFood, other(agents = turtles, except = turtlesFood)) # reconstruct the turtles with turtlesFood modified and the others
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:116:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L116) *style:* **Lines should not be more than 100 characters.**
```r
    world <- NLset(world = world, agents = pHere[food_chem_pHere[, "food"] > 0, , drop = FALSE], var = "food", val = food_chem_pHere[food_chem_pHere[, "food"] > 0, "food"] - 1) # and reduce the food source
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:120:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L120) *style:* **Lines should not be more than 100 characters.**
```r
  turtlesChem <- turtle(turtles, who = whoTurtles[food_chem_pHere[, "chemical"] >= 0.05 & food_chem_pHere[, "chemical"] < 2])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:121:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L121) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesChem) != 0){
    ^
```
[inst/examples/Ants/Ants.R:123:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L123) *style:* **Lines should not be more than 100 characters.**
```r
    turtles <- turtleSet(turtlesChem, other(agents = turtles, except = turtlesChem)) # reconstruct the turtles with turtlesChem modified and the others
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:126:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L126) *style:* **Commented code should be removed.**
```r
  #print(paste("lookFood", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:131:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L131) *style:* **Commented code should be removed.**
```r
  #print(paste("upPatch", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:149:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L149) *style:* **Commented code should be removed.**
```r
  #print(paste("upPatch", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:154:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L154) *style:* **Commented code should be removed.**
```r
  #print(paste("wiggle", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:156:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L156) *style:* **Lines should not be more than 100 characters.**
```r
  turtles <- right(turtles, angle = runif(n = NLcount(turtles), min = -40, max = 40)) # random angle between - 40 (40 to left) and 40 (40 to right)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:160:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L160) *style:* **Commented code should be removed.**
```r
  # turtlesCannot <- right(turtles = turtlesCannot, angle = 180)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:166:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L166) *style:* **Commented code should be removed.**
```r
  #print(paste("wiggle", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:172:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L172) *style:* **Commented code should be removed.**
```r
# time <- 0
  ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:173:6:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L173) *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:173:38:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L173) *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:177:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L177) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(aRed) != 0){
    ^
```
[inst/examples/Ants/Ants.R:185:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L185) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(aOrange) != 0){
    ^
```
[inst/examples/Ants/Ants.R:200:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L200) *style:* **Lines should not be more than 100 characters.**
```r
  world <- NLset(world = world, agents = pWorld, var = "chemical", val = pChem * (100 - rEvap) / 100) # slowly evaporate chemical
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:203:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L203) *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:209:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L209) *style:* **Commented code should be removed.**
```r
  # time <- time + 1
    ^~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:210:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L210) *style:* **Commented code should be removed.**
```r
  # print(time)
    ^~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:213:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L213) *style:* **Commented code should be removed.**
```r
  # plot(world2raster(world)$layer.5) # food
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:214:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L214) *style:* **Commented code should be removed.**
```r
  # points(ants, pch = 16)
    ^~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:216:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L216) *style:* **Commented code should be removed.**
```r
  # expect_equivalent(NLcount(ants), nAnts)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:226:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Ants/Ants.R#L226) *style:* **Lines should not be more than 100 characters.**
```r
legend("topright", legend = c("food1", "food2", "food3"), lwd = c(2, 2, 2), col = c("coral", "yellow", "green"),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:10:2:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L10) *style:* **Commented code should be removed.**
```r
#library(NetLogoR)
 ^~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:29:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L29) *style:* **Lines should not be more than 100 characters.**
```r
t1 <- createTurtles(n = 1, coords = cbind(xcor = 85, ycor = 95)) # the butterfly's initial location is [85, 95]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:29:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L29) *style:* **Lines should not be more than 100 characters.**
```r
t1 <- createTurtles(n = 1, coords = cbind(xcor = 85, ycor = 95)) # the butterfly's initial location is [85, 95]
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:30:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L30) *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:32:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L32) *style:* **Commented code should be removed.**
```r
# points(t1, pch = 16)
  ^~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:38:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L38) *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:38:20:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L38) *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:40:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L40) *style:* **Lines should not be more than 100 characters.**
```r
  # The "move" function can be written directly here or before in the script as a separate function and then called here
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:44:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L44) *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:44:41:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L44) *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:52:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L52) *style:* **Lines should not be more than 100 characters.**
```r
    # Creating local variables instead of putting everything in the same one line code helps to understand
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Butterfly/Butterfly-1.R:66:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Butterfly/Butterfly-1.R#L66) *style:* **Commented code should be removed.**
```r
  # print(time)
    ^~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:12:2:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L12) *style:* **Commented code should be removed.**
```r
#library(NetLogoR)
 ^~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:33:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/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:45:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L45) *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/Wolf-Sheep-Predation.R:53:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L53) *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/Wolf-Sheep-Predation.R:55:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L55) *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/Wolf-Sheep-Predation.R:57:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L57) *style:* **Lines should not be more than 100 characters.**
```r
# When field is updated, the values on the individual worldMatrix grass and countdown are not updated, only the layers in field are
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:77:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L77) *style:* **Lines should not be more than 100 characters.**
```r
  pGreen <- NLwith(world = field, var = "grass", agents = patches(field), val = 1) # patches equal to 1 (green)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:83:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L83) *style:* **Commented code should be removed.**
```r
#   plot(world2raster(field)[[1]])
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:84:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L84) *style:* **Commented code should be removed.**
```r
#   points(sheep, pch = 16, col = "red")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:85:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L85) *style:* **Commented code should be removed.**
```r
#   points(wolves, pch = 16, col = "black")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:87:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L87) *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:88:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L88) *style:* **Commented code should be removed.**
```r
#   plot(grass)
    ^~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:89:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L89) *style:* **Commented code should be removed.**
```r
#   points(sheep, pch = 16, col = "red")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:90:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L90) *style:* **Commented code should be removed.**
```r
#   points(wolves, pch = 16, col = "black")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:96:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L96) *style:* **Lines should not be more than 100 characters.**
```r
# When only one type of input is permitted (e.g., only sheep or only wolves), the function does not need to express arguments
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:97:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L97) *style:* **Lines should not be more than 100 characters.**
```r
# When a function can be used by both sheep and wolves, the argument "turtles" must be used when building the function
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:100:27:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L100) *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:101:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L101) *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:102:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L102) *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:103:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L103) *style:* **Lines should not be more than 100 characters.**
```r
  # The two above functions can be replaced by this next one, as a negative value to turn right will turn left
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:109:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L109) *style:* **Commented code should be removed.**
```r
# # Test move()
  ^~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:110:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L110) *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:112:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L112) *style:* **Commented code should be removed.**
```r
#   wolves <- move(wolves)
    ^~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:113:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L113) *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:117:24:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L117) *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:118:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L118) *style:* **Lines should not be more than 100 characters.**
```r
  pGreen <- NLwith(world = field, var = "grass", agents = patches(field), val = 1) # patches with grass equal to 1 (green)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:119:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L119) *style:* **Lines should not be more than 100 characters.**
```r
  sheepOnGreen <- turtlesOn(world = field, turtles = sheep, agents = pGreen) # sheep on green patches
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:124:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L124) *style:* **Lines should not be more than 100 characters.**
```r
    sheep <- NLset(turtles = sheep, agents = sheepOnGreen, var = "energy", val = energySheep + gainFoodSheep) # update energy
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:126:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L126) *style:* **Lines should not be more than 100 characters.**
```r
    # If a sheep is on a green patch (value equal to 1), it eats the grass and turns it to brown (value to 0)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:134:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L134) *style:* **Commented code should be removed.**
```r
# # Test eatGrass()
  ^~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:135:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L135) *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:136:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L136) *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:137:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L137) *style:* **Commented code should be removed.**
```r
# countdown <- grass
  ^~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:138:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L138) *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:139:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L139) *style:* **Commented code should be removed.**
```r
# field <- stackWorlds(grass, countdown)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:140:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L140) *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:141:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L141) *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:142:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L142) *style:* **Commented code should be removed.**
```r
# resultsEatGrass <- eatGrass()
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:143:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L143) *style:* **Commented code should be removed.**
```r
# fieldEat <- resultsEatGrass[[1]]
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:144:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L144) *style:* **Lines should not be more than 100 characters.**
```r
# of(world = fieldEat, var = "grass", agents = patches(grass)) == c(rep(1,9), 0, rep(1, 8), 0, rep(1, 8), 0 , rep(1, 8), 0, rep(1, 8), 0, rep(1, 4), rep(0, 50))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:144:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L144) *style:* **Commented code should be removed.**
```r
# of(world = fieldEat, var = "grass", agents = patches(grass)) == c(rep(1,9), 0, rep(1, 8), 0, rep(1, 8), 0 , rep(1, 8), 0, rep(1, 8), 0, rep(1, 4), rep(0, 50))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:145:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L145) *style:* **Commented code should be removed.**
```r
# sheepEat <- resultsEatGrass[[2]]
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:146:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L146) *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:149:28:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L149) *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:152:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L152) *style:* **Lines should not be more than 100 characters.**
```r
  who0 <- whoEnergy[which(whoEnergy[,"energy"] < 0), "who"] # "who" numbers of the turtles with their energy value below 0
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:152:38:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L152) *style:* **Commas should always have a space after.**
```r
  who0 <- whoEnergy[which(whoEnergy[,"energy"] < 0), "who"] # "who" numbers of the turtles with their energy value below 0
                                     ^
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:161:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L161) *style:* **Commented code should be removed.**
```r
# # Test death()
  ^~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:162:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L162) *style:* **Lines should not be more than 100 characters.**
```r
# wolves <- createTurtles(n = nWolf, coords = randomXYcor(world = grass, n = nWolf), breed = "wolf", color = rep("black", nWolf))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:162:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L162) *style:* **Commented code should be removed.**
```r
# wolves <- createTurtles(n = nWolf, coords = randomXYcor(world = grass, n = nWolf), breed = "wolf", color = rep("black", nWolf))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:163:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L163) *style:* **Lines should not be more than 100 characters.**
```r
# wolves <- turtlesOwn(turtles = wolves, tVar = "energy", tVal = runif(n = nWolf, min = 0, max = 2 * gainFoodWolf))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:163:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L163) *style:* **Commented code should be removed.**
```r
# wolves <- turtlesOwn(turtles = wolves, tVar = "energy", tVal = runif(n = nWolf, min = 0, max = 2 * gainFoodWolf))
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:164:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L164) *style:* **Commented code should be removed.**
```r
# count1 <- NLcount(wolves)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:165:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L165) *style:* **Commented code should be removed.**
```r
# count2 <- NLcount(wolves)
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:167:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L167) *style:* **Commented code should be removed.**
```r
#   energy <- runif(NLcount(wolves), min = -10, max = 100)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:168:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L168) *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:169:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L169) *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:170:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L170) *style:* **Commented code should be removed.**
```r
#   wolves <- death(wolves)
    ^~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R:171:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8a137ab09ebb1378967cbdf1328bc3fcc45d5602/inst/examples/Wolf-Sheep-Predation/Wolf-Sheep-Predation.R#L171) *style:* **Commented code should be removed.**
```r
#   count2 <- c(count2, NLcount(wolves))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


не нужно сокращать названия переменных, если это не общепринятое среди программистов сокращение (например, constructor -> ctor). да и даже в этом случае, лучше не стоит.


TeamCity Xbim :: Xbim Essentials :: XbimEssentials [Build 84](http://xbimbuilds.cloudapp.net/viewLog.html?buildId=1688&buildTypeId=XbimEssentials_XbimEssentials) outcome was **SUCCESS**
Summary: 1 muted problem Build time: 00:02:19


не нужно писать библиотеки с оглядкой на то, какое окружение ими будет пользоваться. если это будет веб апи, то этот console.writeline не сделает ничего.


Why not make a title for each prediction for bitcoin?
/?startDate=2017-07-17&endDate=2020-07-17&bpiPrediction=500000
title : The forecasted rate from 2017-07-17 to 2020-07-17 will be about 500,000
I'm very glad that I found such a script! Thank you that you are


Okie. All that's really important is that g_X and g_Y remain the same as they are defined in Context.h in order to correctly scale with full screen windows.


Just need to modify existing test case
```
    def test_build_service_account_gce_struct(self):
        self.assertRaises(ValueError,
                          self.driver._build_service_account_gce_struct, None)
        input = {'scopes': ['compute-ro']}
        actual = self.driver._build_service_account_gce_struct(input)
        self.assertTrue('email' in actual)
        self.assertTrue('scopes' in actual)
        input = {'scopes': ['compute-ro'], 'email': 'test@example.com'}
        actual = self.driver._build_service_account_gce_struct(input)
        self.assertEqual(actual['email'], 'test@example.com')
```


у арифметических операторов в C# такие же приоритеты, что и в математике, скобки можно опустить


незачем сокращать название метода и параметра


## Global

| Changed         |   Status |
|:----------------|---------:|
| `nodes_count`   |    +5404 |
| `texts_passing` |       +5 |
| `texts_total`   |       +5 |

## Words

| Changed   |   Status |
|:----------|---------:|
| `eng`     |  +128755 |
| `grc`     |  -105765 |
| `mul`     |    +4030 |

## Units

| Changed                                               | Status   |
|:------------------------------------------------------|:---------|
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-eng1.xml` | New      |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-eng2.xml` | New      |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-eng3.xml` | New      |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-grc1.xml` | New      |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-mul1.xml` | New      |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-eng1.xml` | Passing  |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-eng2.xml` | Passing  |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-eng3.xml` | Passing  |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-grc1.xml` | Passing  |
| `./data/tlg0527/tlg048/tlg0527.tlg048.1st1K-mul1.xml` | Passing  |

*[Hook UI build recap](http://ci.perseids.org/repo/OpenGreekAndLatin/First1KGreek/2931)*


This was actually me, but I screwed up correctly logging in from the command line.
2bad4me !


[R/getAvailablePoints.R:5:5:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/getAvailablePoints.R#L5) *warning:* **no visible binding for '<<-' assignment to ‘all_available_points’**
```r
    all_available_points <<- c(all_available_points, point)
    ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:5:5:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/getAvailablePoints.R#L5) *warning:* **no visible binding for global variable ‘all_available_points’**
```r
    all_available_points <<- c(all_available_points, point)
    ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:10:3:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/getAvailablePoints.R#L10) *warning:* **no visible binding for '<<-' assignment to ‘all_available_points’**
```r
  all_available_points <<- c(all_available_points, point)
  ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:10:3:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/getAvailablePoints.R#L10) *warning:* **no visible binding for global variable ‘all_available_points’**
```r
  all_available_points <<- c(all_available_points, point)
  ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:15:3:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/getAvailablePoints.R#L15) *warning:* **no visible binding for '<<-' assignment to ‘all_available_points’**
```r
  all_available_points <<- c()
  ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:20:10:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/getAvailablePoints.R#L20) *warning:* **no visible binding for global variable ‘all_available_points’**
```r
  return(all_available_points)
         ^~~~~~~~~~~~~~~~~~~~
```
[R/results_creator.R:13:18:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/results_creator.R#L13) *warning:* **no visible global function definition for ‘.create_message_for_test_with_failures’**
```r
      message <- .create_message_for_test_with_failures(test)
                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/results_creator.R:49:10:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/results_creator.R#L49) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
  return (ret)
         ^
```
[R/results_creator.R:61:10:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/results_creator.R#L61) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
  return (ret)
         ^
```
[R/results_creator.R:71:1:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/results_creator.R#L71) *style:* **Variable or function name should be snake_case.**
```r
.message_from_failed_Result <- function(result) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/results_creator.R:77:10:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/results_creator.R#L77) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
  return (paste(sep = "", "Failed with call: ", language, "\n", result$message))
         ^
```
[R/ResultsJsonParser.R:5:25:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/ResultsJsonParser.R#L5) *warning:* **no visible global function definition for ‘.create_json_test_result’**
```r
    test_json_result <- .create_json_test_result(test_result)
                        ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:8:10:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/ResultsJsonParser.R#L8) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
  return (json_results)
         ^
```
[R/ResultsJsonParser.R:24:20:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/ResultsJsonParser.R#L24) *warning:* **no visible global function definition for ‘toJSON’**
```r
  json <- enc2utf8(toJSON(results, pretty = FALSE))
                   ^~~~~~
```
[R/ResultsJsonParser.R:25:11:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/ResultsJsonParser.R#L25) *warning:* **no visible global function definition for ‘prettify’, Did you mean 'pretty'?**
```r
  json <- prettify(json)
          ^~~~~~~~
```
[R/RunTests.R:12:19:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/RunTests.R#L12) *warning:* **no visible global function definition for ‘.run_tests_project’**
```r
  test_results <- .run_tests_project(project_path)
                  ^~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:14:19:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/RunTests.R#L14) *warning:* **no visible global function definition for ‘.create_json_results’**
```r
  json_results <- .create_json_results(test_results)
                  ^~~~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:15:3:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/RunTests.R#L15) *warning:* **no visible global function definition for ‘.write_json’**
```r
  .write_json(json_results)
  ^~~~~~~~~~~
```
[R/RunTests.R:18:5:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/RunTests.R#L18) *warning:* **no visible global function definition for ‘.print_results_from_json’**
```r
    .print_results_from_json(json_results)
    ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:33:21:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/RunTests.R#L33) *warning:* **no visible global function definition for ‘.run_tests_file’**
```r
    file_results <- .run_tests_file(test_file)
                    ^~~~~~~~~~~~~~~
```
[R/RunTests.R:43:3:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/RunTests.R#L43) *warning:* **no visible global function definition for ‘test_file’**
```r
  test_file_output <- test_file(file_path, reporter = "silent")
  ^~~~~~~~~
```
[R/RunTests.R:45:24:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/RunTests.R#L45) *warning:* **no visible global function definition for ‘.create_file_results’**
```r
  test_file_results <- .create_file_results(test_file_output, points, .GlobalEnv$points_for_all_tests)
                       ^~~~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:51:3:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/R/RunTests.R#L51) *warning:* **no visible global function definition for ‘run_tests’**
```r
  run_tests(getwd(), bol)
  ^~~~~~~~~
```
[tests/testthat/resources/simple_all_tests_pass/tests/testthat/helperTMC.R:12:3:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/tests/testthat/resources/simple_all_tests_pass/tests/testthat/helperTMC.R#L12) *warning:* **no visible global function definition for ‘test_that’**
```r
  test_that(desc, code)
  ^~~~~~~~~
```
[tests/testthat/resources/simple_some_tests_fail/tests/testthat/helperTMC.R:12:3:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/tests/testthat/resources/simple_some_tests_fail/tests/testthat/helperTMC.R#L12) *warning:* **no visible global function definition for ‘test_that’**
```r
  test_that(desc, code)
  ^~~~~~~~~
```
[tests/testthat/testLintr.R:2:5:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/tests/testthat/testLintr.R#L2) *style:* **Commented code should be removed.**
```r
#   context("lints")
    ^~~~~~~~~~~~~~~~
```
[tests/testthat/testLintr.R:4:7:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/tests/testthat/testLintr.R#L4) *style:* **Commented code should be removed.**
```r
#     lintr::expect_lint_free()
      ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:71:5:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/tests/testthat/testRunTests.R#L71) *style:* **Commented code should be removed.**
```r
#   runTests(simple_all_tests_pass_project_path)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:75:5:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/tests/testthat/testRunTests.R#L75) *style:* **Commented code should be removed.**
```r
#   string1 <- format(.PrintResult("Testi1", "!", FALSE))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:76:5:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/tests/testthat/testRunTests.R#L76) *style:* **Commented code should be removed.**
```r
#   string2 <- format("Testi1: PASS")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:77:5:](https://github.com/RTMC/tmc-r-tester/blob/197a7700acf3a5f08b801a884dbe6190836c66bb/tests/testthat/testRunTests.R#L77) *style:* **Commented code should be removed.**
```r
#   expect_equal(string1, string2)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


жаль, что пользуясь этой либой в приложении windows forms, клиент этого не узнает


Thanks


метод должен называться с большой буквы


Try that: fc886ac0


what is this


**Whoops!**

There were *1 warnings* that will prevent this PR from being merged. Please take a look, and either fix, or provide a justification for why they can't be fixed.

**WARNINGS**
[`src/content/en/updates/2017/09/abortable-fetch.md#L244`](https://github.com/Google/WebFundamentals/blame/513f607075835c42b5449e877b99ff751de8e797/src/content/en/updates/2017/09/abortable-fetch.md#L244) - Line must be at most 100 characters


Related to: backdrop/backdrop-issues#2724773


Related to: backdrop/backdrop-issues#2494221


Related to: backdrop/backdrop-issues#2637552


Related to: backdrop/backdrop-issues#1792032


Related to: backdrop/backdrop-issues#2107287


Related to: backdrop/backdrop-issues#878284


welcome to my site viewers


## Global

| Changed            |   Status |
|:-------------------|---------:|
| `metadata_passing` |       +1 |
| `metadata_total`   |       +1 |
| `nodes_count`      |    +1345 |
| `texts_passing`    |       +1 |
| `texts_total`      |       +1 |

## Words

| Changed   |   Status |
|:----------|---------:|
| `grc`     |   +28801 |

## Units

| Changed                                               | Status   |
|:------------------------------------------------------|:---------|
| `./data/tlg0527/tlg049/__cts__.xml`                   | New      |
| `./data/tlg0527/tlg049/tlg0527.tlg049.1st1K-grc1.xml` | New      |
| `./data/tlg0527/tlg049/__cts__.xml`                   | Passing  |
| `./data/tlg0527/tlg049/tlg0527.tlg049.1st1K-grc1.xml` | Passing  |

*[Hook UI build recap](http://ci.perseids.org/repo/OpenGreekAndLatin/First1KGreek/2933)*


1) zmienne robimy w camelCase => `arrayToClear`
2) ten cały `while` jest zbędny => wystarczy `arrayToClear.innerHTML = '';`


@GuaiYiHu yeah youre right. Do you want some magic? Torch doesnt work but if move torch tile in status bar (never mind in which place) - everything is fine


# PYTHONPATH=. python libcloud/test/compute/test_gce.py
...............................................................................................................................................................................
----------------------------------------------------------------------
Ran 175 tests in 11.009s

OK


Yes, why not?


This should fix #673


jak dasz `const newLapArray = lapList.getElementsByTagName('li');` to:

1) poszuka tylko `li` znajdujących się wewnątrz `results`, a tego chcemy bo jak na stronie znajdą się jakieś inne, niezwiązane `li` to skrypt poda nieprawidłowe wartości

2) skryptowi szybciej będzie przeszukać `lapList` niż cały dokument


엌ㅋㅋㅋㅋㅋㅋㅋㅋㅋ


This Branch was for new edition of the main board.(MainPCBV7)


**BUG**：修改自己用户名后读取`SharedPreference`以及`WilddogUser.getDisplayName()`都是已经修改之后的用户名没问题，但是退出应用清掉后台进入`MainActivity`中读取`WilddogUser.getDisplayName()`却又是修改之前的用户名，导致侧栏显示还是修改之前的，进入侧栏菜单中的个人信息后自动会listen到更改，将用户名改为了修改之前的用户名。


ok


I think this should be "Block".


10/10. Amazing code. Would recommend.


## Global

| Changed            |   Status |
|:-------------------|---------:|
| `metadata_passing` |       +1 |
| `metadata_total`   |       +1 |
| `nodes_count`      |     +146 |
| `texts_passing`    |       +1 |
| `texts_total`      |       +1 |

## Words

| Changed   |   Status |
|:----------|---------:|
| `grc`     |    +2593 |

## Units

| Changed                                               | Status   |
|:------------------------------------------------------|:---------|
| `./data/tlg0527/tlg050/__cts__.xml`                   | New      |
| `./data/tlg0527/tlg050/tlg0527.tlg050.1st1K-grc1.xml` | New      |
| `./data/tlg0527/tlg050/__cts__.xml`                   | Passing  |
| `./data/tlg0527/tlg050/tlg0527.tlg050.1st1K-grc1.xml` | Passing  |

*[Hook UI build recap](http://ci.perseids.org/repo/OpenGreekAndLatin/First1KGreek/2935)*


I don't see any reason for the why not. I think we make it with another line each time ? Or maybe we didn't use this function ?
- Remote control leave the files : https://github.com/LimeSurvey/LimeSurvey/blob/f52daf3696fed070367769d88a54c4dcfc79aeab/application/helpers/remotecontrol/remotecontrol_handle.php#L195


Once again, I want this done by Friday @ 2