[inst/examples/Ants/Ants.R:12:2:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L13) *style:* **Commented code should be removed.**
```r
#library(testthat) # for testing
 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:16:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L16) *style:* **Variable or function name should be snake_case.**
```r
nAnts <- 125 # varies from 0 to 200 in the NetLogo model
^~~~~
```
[inst/examples/Ants/Ants.R:17:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L17) *style:* **Variable or function name should be snake_case.**
```r
rDiff <- 50 # varies from 0 to 99 in the NetLogo model
^~~~~
```
[inst/examples/Ants/Ants.R:18:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L18) *style:* **Variable or function name should be snake_case.**
```r
rEvap <- 10 # varies from 0 to 99 in the NetLogo model
^~~~~
```
[inst/examples/Ants/Ants.R:19:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L19) *style:* **Commented code should be removed.**
```r
# torus = FALSE
  ^~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:25:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L25) *style:* **Lines should not be more than 80 characters.**
```r
# As all the NLworldMatrix must have the same extent, you can copy past the object to a new name
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:29:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L29) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L29) *style:* **Lines should not be more than 80 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:33:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L33) *style:* **Variable or function name should be snake_case.**
```r
nestScent <- chemical # higher closer to the nest
^~~~~~~~~
```
[inst/examples/Ants/Ants.R:34:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L34) *style:* **Variable or function name should be snake_case.**
```r
distNest <- NLdist(agents = patches(nest), agents2 = cbind(x = 0, y = 0))
^~~~~~~~
```
[inst/examples/Ants/Ants.R:35:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L35) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L35) *style:* **Variable or function name should be snake_case.**
```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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L35) *style:* **Lines should not be more than 80 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:36:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L36) *style:* **Lines should not be more than 80 characters.**
```r
nest <- NLset(world = nest, agents = patches(nest), val = 0) # 0 to all the patches
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:36:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L36) *style:* **Lines should not be more than 80 characters.**
```r
nest <- NLset(world = nest, agents = patches(nest), val = 0) # 0 to all the patches
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:37:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L37) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L37) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L38) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L38) *style:* **Variable or function name should be snake_case.**
```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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L38) *style:* **Lines should not be more than 80 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:41:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L41) *style:* **Variable or function name should be snake_case.**
```r
foodSource <- chemical # number (1, 2, or 3) to identify the food sources
^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:43:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L43) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L43) *style:* **Variable or function name should be snake_case.**
```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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L43) *style:* **Lines should not be more than 80 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:44:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L44) *style:* **Variable or function name should be snake_case.**
```r
patchFood1 <- which(distFood1 < 5)
^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:45:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L45) *style:* **Lines should not be more than 80 characters.**
```r
foodSource <- NLset(world = foodSource, agents = patches(foodSource), val = 0) # 0 to all patches
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:45:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L45) *style:* **Variable or function name should be snake_case.**
```r
foodSource <- NLset(world = foodSource, agents = patches(foodSource), val = 0) # 0 to all patches
^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:45:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L45) *style:* **Lines should not be more than 80 characters.**
```r
foodSource <- NLset(world = foodSource, agents = patches(foodSource), val = 0) # 0 to all patches
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:46:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L46) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L46) *style:* **Variable or function name should be snake_case.**
```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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L46) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L47) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L47) *style:* **Variable or function name should be snake_case.**
```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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L47) *style:* **Lines should not be more than 80 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:48:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L48) *style:* **Variable or function name should be snake_case.**
```r
patchFood2 <- which(distFood2 < 5)
^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:49:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L49) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L49) *style:* **Variable or function name should be snake_case.**
```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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L49) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L50) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L50) *style:* **Variable or function name should be snake_case.**
```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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L50) *style:* **Lines should not be more than 80 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:51:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L51) *style:* **Variable or function name should be snake_case.**
```r
patchFood3 <- which(distFood3 < 5)
^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:52:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L52) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L52) *style:* **Variable or function name should be snake_case.**
```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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L52) *style:* **Lines should not be more than 80 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:54:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L54) *style:* **Lines should not be more than 80 characters.**
```r
patchFood123 <- PxcorPycorFromCell(world = food, cellNum = c(patchFood1, patchFood2, patchFood3))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:54:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L54) *style:* **Variable or function name should be snake_case.**
```r
patchFood123 <- PxcorPycorFromCell(world = food, cellNum = c(patchFood1, patchFood2, patchFood3))
^~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:55:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L55) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L55) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L59) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L59) *style:* **Lines should not be more than 80 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/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L62) *style:* **Commented code should be removed.**
```r
# plot(world2raster(world)$layer.5) # food
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:63:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L63) *style:* **Commented code should be removed.**
```r
# points(turtles2spdf(ants), pch = 16)
  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:66:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L66) *style:* **Lines should not be more than 80 characters.**
```r
f_fS_world <- of(world = world, var = c("food", "foodSource"), agents = patches(world))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:66:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L66) *style:* **Variable or function name should be snake_case.**
```r
f_fS_world <- of(world = world, var = c("food", "foodSource"), agents = patches(world))
^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:67:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L67) *style:* **Lines should not be more than 80 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:67:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L67) *style:* **Lines should not be more than 80 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:68:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L68) *style:* **Lines should not be more than 80 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:68:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L68) *style:* **Lines should not be more than 80 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:69:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L69) *style:* **Lines should not be more than 80 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:69:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L69) *style:* **Lines should not be more than 80 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:73:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L73) *style:* **Variable or function name should be snake_case.**
```r
toNest <- function(turtles){
^~~~~~
```
[inst/examples/Ants/Ants.R:74:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L74) *style:* **Commented code should be removed.**
```r
  #print(paste("toNest", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:76:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L76) *style:* **Variable or function name should be snake_case.**
```r
  pHere <- patchHere(world = world, turtles = turtles)
  ^~~~~
```
[inst/examples/Ants/Ants.R:76:12:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L76) *warning:* **no visible global function definition for ‘patchHere’**
```r
  pHere <- patchHere(world = world, turtles = turtles)
           ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:77:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L77) *style:* **Lines should not be more than 80 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:77:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L77) *style:* **Variable or function name should be snake_case.**
```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:77:22:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L77) *warning:* **no visible global function definition for ‘of’, Did you mean 'df'?**
```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:78:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L78) *style:* **Variable or function name should be snake_case.**
```r
  whoTurtles <- of(agents = turtles, var = "who")
  ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:78:17:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L78) *warning:* **no visible global function definition for ‘of’, Did you mean 'df'?**
```r
  whoTurtles <- of(agents = turtles, var = "who")
                ^~
```
[inst/examples/Ants/Ants.R:81:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L81) *style:* **Lines should not be more than 80 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:81:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L81) *style:* **Variable or function name should be snake_case.**
```r
  turtlesIn <- turtle(turtles, who = whoTurtles[nest_chem_pHere[, "nest"] == 1]) # whoTurtles for which their nest value equals 1
  ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:81:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L81) *warning:* **no visible global function definition for ‘turtle’, Did you mean 'turtles'?**
```r
  turtlesIn <- turtle(turtles, who = whoTurtles[nest_chem_pHere[, "nest"] == 1]) # whoTurtles for which their nest value equals 1
  ^~~~~~
```
[inst/examples/Ants/Ants.R:82:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L82) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesIn) != 0){
    ^
```
[inst/examples/Ants/Ants.R:83:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L83) *style:* **Lines should not be more than 80 characters.**
```r
    turtlesIn <- NLset(turtles = turtlesIn, agents = turtlesIn, var = "color", val = "red")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:83:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L83) *style:* **Variable or function name should be snake_case.**
```r
    turtlesIn <- NLset(turtles = turtlesIn, agents = turtlesIn, var = "color", val = "red")
    ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:83:18:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L83) *warning:* **no visible global function definition for ‘NLset’**
```r
    turtlesIn <- NLset(turtles = turtlesIn, agents = turtlesIn, var = "color", val = "red")
                 ^~~~~
```
[inst/examples/Ants/Ants.R:84:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L84) *style:* **Lines should not be more than 80 characters.**
```r
    turtlesIn <- right(turtles = turtlesIn, angle = 180) # drop food and head out again
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:84:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L84) *style:* **Variable or function name should be snake_case.**
```r
    turtlesIn <- right(turtles = turtlesIn, angle = 180) # drop food and head out again
    ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:84:18:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L84) *warning:* **no visible global function definition for ‘right’**
```r
    turtlesIn <- right(turtles = turtlesIn, angle = 180) # drop food and head out again
                 ^~~~~
```
[inst/examples/Ants/Ants.R:88:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L88) *style:* **Lines should not be more than 80 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:88:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L88) *style:* **Variable or function name should be snake_case.**
```r
  turtlesOut <- turtle(turtles, who = whoTurtles[nest_chem_pHere[, "nest"] == 0]) # whoTurtles for which their nest value equals 0
  ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:88:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L88) *warning:* **no visible global function definition for ‘turtle’, Did you mean 'turtles'?**
```r
  turtlesOut <- turtle(turtles, who = whoTurtles[nest_chem_pHere[, "nest"] == 0]) # whoTurtles for which their nest value equals 0
  ^~~~~~
```
[inst/examples/Ants/Ants.R:89:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L89) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesOut) != 0){
    ^
```
[inst/examples/Ants/Ants.R:90:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L90) *style:* **Lines should not be more than 80 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:90:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L90) *style:* **Variable or function name should be snake_case.**
```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:91:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L91) *style:* **Lines should not be more than 80 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:91:14:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L91) *warning:* **no visible global function definition for ‘NLset’**
```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:92:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L92) *style:* **Lines should not be more than 80 characters.**
```r
    turtlesOut <- upPatch(turtles = turtlesOut, varPatch = "nestScent") # head toward the greatest value of nestScent
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:92:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L92) *style:* **Variable or function name should be snake_case.**
```r
    turtlesOut <- upPatch(turtles = turtlesOut, varPatch = "nestScent") # head toward the greatest value of nestScent
    ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:92:19:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L92) *warning:* **no visible global function definition for ‘upPatch’, Did you mean 'pmatch'?**
```r
    turtlesOut <- upPatch(turtles = turtlesOut, varPatch = "nestScent") # head toward the greatest value of nestScent
                  ^~~~~~~
```
[inst/examples/Ants/Ants.R:95:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L95) *style:* **Lines should not be more than 80 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:96:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L96) *style:* **Lines should not be more than 80 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:96:14:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L96) *warning:* **no visible global function definition for ‘turtleSet’**
```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:97:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L97) *style:* **Commented code should be removed.**
```r
  #print(paste("toNest", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:101:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L101) *style:* **Variable or function name should be snake_case.**
```r
lookFood <- function(turtles){
^~~~~~~~
```
[inst/examples/Ants/Ants.R:102:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L102) *style:* **Commented code should be removed.**
```r
  #print(paste("lookFood", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:104:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L104) *style:* **Variable or function name should be snake_case.**
```r
  pHere <- patchHere(world = world, turtles = turtles)
  ^~~~~
```
[inst/examples/Ants/Ants.R:104:12:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L104) *warning:* **no visible global function definition for ‘patchHere’**
```r
  pHere <- patchHere(world = world, turtles = turtles)
           ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:105:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L105) *style:* **Lines should not be more than 80 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:105:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L105) *style:* **Variable or function name should be snake_case.**
```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:105:22:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L105) *warning:* **no visible global function definition for ‘of’, Did you mean 'df'?**
```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:106:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L106) *style:* **Variable or function name should be snake_case.**
```r
  whoTurtles <- of(agents = turtles, var = "who")
  ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:106:17:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L106) *warning:* **no visible global function definition for ‘of’, Did you mean 'df'?**
```r
  whoTurtles <- of(agents = turtles, var = "who")
                ^~
```
[inst/examples/Ants/Ants.R:109:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L109) *style:* **Lines should not be more than 80 characters.**
```r
  turtlesFood <- turtle(turtles, who = whoTurtles[food_chem_pHere[, "food"] > 0])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:109:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L109) *style:* **Variable or function name should be snake_case.**
```r
  turtlesFood <- turtle(turtles, who = whoTurtles[food_chem_pHere[, "food"] > 0])
  ^~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:109:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L109) *warning:* **no visible global function definition for ‘turtle’, Did you mean 'turtles'?**
```r
  turtlesFood <- turtle(turtles, who = whoTurtles[food_chem_pHere[, "food"] > 0])
  ^~~~~~
```
[inst/examples/Ants/Ants.R:110:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L110) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesFood) != 0){
    ^
```
[inst/examples/Ants/Ants.R:111:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L111) *style:* **Lines should not be more than 80 characters.**
```r
    turtlesFood <- NLset(turtles = turtlesFood, agents = turtlesFood, var = "color", val = "orange") # pick up food
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:111:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L111) *style:* **Variable or function name should be snake_case.**
```r
    turtlesFood <- NLset(turtles = turtlesFood, agents = turtlesFood, var = "color", val = "orange") # pick up food
    ^~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:111:20:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L111) *warning:* **no visible global function definition for ‘NLset’**
```r
    turtlesFood <- NLset(turtles = turtlesFood, agents = turtlesFood, var = "color", val = "orange") # pick up food
                   ^~~~~
```
[inst/examples/Ants/Ants.R:112:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L112) *style:* **Variable or function name should be snake_case.**
```r
    turtlesFood <- right(turtles = turtlesFood, angle = 180) # and turn around
    ^~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:112:20:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L112) *warning:* **no visible global function definition for ‘right’**
```r
    turtlesFood <- right(turtles = turtlesFood, angle = 180) # and turn around
                   ^~~~~
```
[inst/examples/Ants/Ants.R:113:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L113) *style:* **Lines should not be more than 80 characters.**
```r
    turtles <- turtleSet(turtlesFood, other(agents = turtles, except = turtlesFood)) # reconstruct the turtles with turtlesFood modified and the others
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:113:16:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L113) *warning:* **no visible global function definition for ‘turtleSet’**
```r
    turtles <- turtleSet(turtlesFood, other(agents = turtles, except = turtlesFood)) # reconstruct the turtles with turtlesFood modified and the others
               ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:113:39:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L113) *warning:* **no visible global function definition for ‘other’, Did you mean 'order'?**
```r
    turtles <- turtleSet(turtlesFood, other(agents = turtles, except = turtlesFood)) # reconstruct the turtles with turtlesFood modified and the others
                                      ^~~~~
```
[inst/examples/Ants/Ants.R:114:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L114) *style:* **Lines should not be more than 80 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:114:14:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L114) *warning:* **no visible global function definition for ‘NLset’**
```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:118:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L118) *style:* **Lines should not be more than 80 characters.**
```r
  turtlesChem <- turtle(turtles, who = whoTurtles[food_chem_pHere[, "chemical"] >= 0.05 & food_chem_pHere[, "chemical"] < 2])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:118:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L118) *style:* **Variable or function name should be snake_case.**
```r
  turtlesChem <- turtle(turtles, who = whoTurtles[food_chem_pHere[, "chemical"] >= 0.05 & food_chem_pHere[, "chemical"] < 2])
  ^~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:118:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L118) *warning:* **no visible global function definition for ‘turtle’, Did you mean 'turtles'?**
```r
  turtlesChem <- turtle(turtles, who = whoTurtles[food_chem_pHere[, "chemical"] >= 0.05 & food_chem_pHere[, "chemical"] < 2])
  ^~~~~~
```
[inst/examples/Ants/Ants.R:119:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L119) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(NLcount(turtlesChem) != 0){
    ^
```
[inst/examples/Ants/Ants.R:120:5:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L120) *style:* **Variable or function name should be snake_case.**
```r
    turtlesChem <- upPatch(turtles = turtlesChem, varPatch = "chemical")
    ^~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:120:20:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L120) *warning:* **no visible global function definition for ‘upPatch’, Did you mean 'pmatch'?**
```r
    turtlesChem <- upPatch(turtles = turtlesChem, varPatch = "chemical")
                   ^~~~~~~
```
[inst/examples/Ants/Ants.R:121:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L121) *style:* **Lines should not be more than 80 characters.**
```r
    turtles <- turtleSet(turtlesChem, other(agents = turtles, except = turtlesChem)) # reconstruct the turtles with turtlesChem modified and the others
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:121:16:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L121) *warning:* **no visible global function definition for ‘turtleSet’**
```r
    turtles <- turtleSet(turtlesChem, other(agents = turtles, except = turtlesChem)) # reconstruct the turtles with turtlesChem modified and the others
               ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:121:39:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L121) *warning:* **no visible global function definition for ‘other’, Did you mean 'order'?**
```r
    turtles <- turtleSet(turtlesChem, other(agents = turtles, except = turtlesChem)) # reconstruct the turtles with turtlesChem modified and the others
                                      ^~~~~
```
[inst/examples/Ants/Ants.R:124:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L124) *style:* **Commented code should be removed.**
```r
  #print(paste("lookFood", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:128:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L128) *style:* **Variable or function name should be snake_case.**
```r
upPatch <- function(turtles, varPatch){
^~~~~~~
```
[inst/examples/Ants/Ants.R:128:30:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L128) *style:* **Variable or function name should be snake_case.**
```r
upPatch <- function(turtles, varPatch){
                             ^~~~~~~~
```
[inst/examples/Ants/Ants.R:129:4:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L129) *style:* **Commented code should be removed.**
```r
  #print(paste("upPatch", NLcount(turtles)))
   ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:132:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L132) *style:* **Variable or function name should be snake_case.**
```r
  pAhead <- patchAhead(world = world, turtles = turtles, dist = 1)
  ^~~~~~
```
[inst/examples/Ants/Ants.R:132:13:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L132) *warning:* **no visible global function definition for ‘patchAhead’**
```r
  pAhead <- patchAhead(world = world, turtles = turtles, dist = 1)
            ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:132:24:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L132) *warning:* **no visible binding for global variable ‘world’**
```r
  pAhead <- patchAhead(world = world, turtles = turtles, dist = 1)
                       ^~~~~
```
[inst/examples/Ants/Ants.R:133:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L133) *style:* **Variable or function name should be snake_case.**
```r
  scentAhead <- of(world = world, var = varPatch, agents = pAhead)
  ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:133:17:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L133) *warning:* **no visible global function definition for ‘of’, Did you mean 'df'?**
```r
  scentAhead <- of(world = world, var = varPatch, agents = pAhead)
                ^~
```
[inst/examples/Ants/Ants.R:133:20:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L133) *warning:* **no visible binding for global variable ‘world’**
```r
  scentAhead <- of(world = world, var = varPatch, agents = pAhead)
                   ^~~~~
```
[inst/examples/Ants/Ants.R:134:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L134) *style:* **Variable or function name should be snake_case.**
```r
  pRight <- patchRight(world = world, turtles = turtles, dist = 1, angle = 45)
  ^~~~~~
```
[inst/examples/Ants/Ants.R:134:13:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L134) *warning:* **no visible global function definition for ‘patchRight’**
```r
  pRight <- patchRight(world = world, turtles = turtles, dist = 1, angle = 45)
            ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:134:24:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L134) *warning:* **no visible binding for global variable ‘world’**
```r
  pRight <- patchRight(world = world, turtles = turtles, dist = 1, angle = 45)
                       ^~~~~
```
[inst/examples/Ants/Ants.R:135:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L135) *style:* **Variable or function name should be snake_case.**
```r
  scentRight <- of(world = world, var = varPatch, agents = pRight)
  ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:135:17:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L135) *warning:* **no visible global function definition for ‘of’, Did you mean 'df'?**
```r
  scentRight <- of(world = world, var = varPatch, agents = pRight)
                ^~
```
[inst/examples/Ants/Ants.R:135:20:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L135) *warning:* **no visible binding for global variable ‘world’**
```r
  scentRight <- of(world = world, var = varPatch, agents = pRight)
                   ^~~~~
```
[inst/examples/Ants/Ants.R:136:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L136) *style:* **Variable or function name should be snake_case.**
```r
  pLeft <- patchLeft(world = world, turtles = turtles, dist = 1, angle = 45)
  ^~~~~
```
[inst/examples/Ants/Ants.R:136:12:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L136) *warning:* **no visible global function definition for ‘patchLeft’**
```r
  pLeft <- patchLeft(world = world, turtles = turtles, dist = 1, angle = 45)
           ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:136:22:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L136) *warning:* **no visible binding for global variable ‘world’**
```r
  pLeft <- patchLeft(world = world, turtles = turtles, dist = 1, angle = 45)
                     ^~~~~
```
[inst/examples/Ants/Ants.R:137:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L137) *style:* **Variable or function name should be snake_case.**
```r
  scentLeft <- of(world = world, var = varPatch, agents = pLeft)
  ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:137:16:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L137) *warning:* **no visible global function definition for ‘of’, Did you mean 'df'?**
```r
  scentLeft <- of(world = world, var = varPatch, agents = pLeft)
               ^~
```
[inst/examples/Ants/Ants.R:137:19:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L137) *warning:* **no visible binding for global variable ‘world’**
```r
  scentLeft <- of(world = world, var = varPatch, agents = pLeft)
                  ^~~~~
```
[inst/examples/Ants/Ants.R:139:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L139) *style:* **Variable or function name should be snake_case.**
```r
  whoTurtles <- of(agents = turtles, var = "who")
  ^~~~~~~~~~
```
[inst/examples/Ants/Ants.R:139:17:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L139) *warning:* **no visible global function definition for ‘of’, Did you mean 'df'?**
```r
  whoTurtles <- of(agents = turtles, var = "who")
                ^~
```
[inst/examples/Ants/Ants.R:140:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L140) *style:* **Lines should not be more than 80 characters.**
```r
  tRight <- turtle(turtles, who = whoTurtles[scentRight > scentLeft & scentRight > scentAhead])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:140:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L140) *style:* **Variable or function name should be snake_case.**
```r
  tRight <- turtle(turtles, who = whoTurtles[scentRight > scentLeft & scentRight > scentAhead])
  ^~~~~~
```
[inst/examples/Ants/Ants.R:140:13:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L140) *warning:* **no visible global function definition for ‘turtle’, Did you mean 'turtles'?**
```r
  tRight <- turtle(turtles, who = whoTurtles[scentRight > scentLeft & scentRight > scentAhead])
            ^~~~~~
```
[inst/examples/Ants/Ants.R:141:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L141) *style:* **Variable or function name should be snake_case.**
```r
  tRight <- right(turtles = tRight, angle = 45)
  ^~~~~~
```
[inst/examples/Ants/Ants.R:141:13:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L141) *warning:* **no visible global function definition for ‘right’, Did you mean 'pRight'?**
```r
  tRight <- right(turtles = tRight, angle = 45)
            ^~~~~
```
[inst/examples/Ants/Ants.R:142:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L142) *style:* **Lines should not be more than 80 characters.**
```r
  tLeft <- turtle(turtles, who = whoTurtles[scentLeft > scentRight & scentLeft > scentAhead])
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:142:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L142) *style:* **Variable or function name should be snake_case.**
```r
  tLeft <- turtle(turtles, who = whoTurtles[scentLeft > scentRight & scentLeft > scentAhead])
  ^~~~~
```
[inst/examples/Ants/Ants.R:142:12:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L142) *warning:* **no visible global function definition for ‘turtle’, Did you mean 'turtles'?**
```r
  tLeft <- turtle(turtles, who = whoTurtles[scentLeft > scentRight & scentLeft > scentAhead])
           ^~~~~~
```
[inst/examples/Ants/Ants.R:143:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L143) *style:* **Variable or function name should be snake_case.**
```r
  tLeft <- left(turtles = tLeft, angle = 45)
  ^~~~~
```
[inst/examples/Ants/Ants.R:143:12:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L143) *warning:* **no visible global function definition for ‘left’, Did you mean 'pLeft'?**
```r
  tLeft <- left(turtles = tLeft, angle = 45)
           ^~~~
```
[inst/examples/Ants/Ants.R:145:3:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L145) *style:* **Variable or function name should be snake_case.**
```r
  turtlesMoved <- turtleSet(tRight, tLeft)
  ^~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:145:19:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L145) *warning:* **no visible global function definition for ‘turtleSet’**
```r
  turtlesMoved <- turtleSet(tRight, tLeft)
                  ^~~~~~~~~
```
[inst/examples/Ants/Ants.R:146:1:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L146) *style:* **Lines should not be more than 80 characters.**
```r
  turtles <- turtleSet(turtlesMoved, other(agents = turtles, except = turtlesMoved))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[inst/examples/Ants/Ants.R:146:14:](https://github.com/PredictiveEcology/NetLogoR/blob/8926193a49b1f8d1469178532447c9d0ad9afe46/inst/examples/Ants/Ants.R#L146) *warning:* **no visible global function definition for ‘turtleSet’**
```r
  turtles <- turtleSet(turtlesMoved, other(agents = turtles, except = turtlesMoved))
             ^~~~~~~~~
```


It should not, no. >_<


Created multidev environment [kanopi-support#pr-develop](https://dashboard.pantheon.io/sites/ea4e0e46-baba-4a80-bd9b-1bc7603ef6e2#pr-develop).

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


Created multidev environment [continuity-pro#ci-106](https://dashboard.pantheon.io/sites/f4b4b00a-1cc1-4f25-a05d-4dce395bff80#ci-106).

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


Why revert this on master? That way we'll never get rid of these -dev paths in closures.


Hard to believe this change does anything, either -- free() in the standard C library is already null-safe. I'm guessing the change below this one in ParseStringConstant is the actual crash fix?


Haha. Hi UNIVERSE! I'm trying to commit and push file but I can't... Btw why you can write on my repository ? :dagger:


这里最好把continue;单独写在一行并加大括号


Esse switch aqui é muito estranhoooo.


aqui está meio mal formatado.


For your information: You can overwrite by setting the environmentvariable "_JAVA_OPTIONS" this default setting introduced by this change, when using openJDK/JRE or oracleJDK/JRE.

Best regards
Markus


aonde tu usa esta variavel `stream`?


I am aware that an AST would be the most complete way to do this. However we neither maintain one in the TS extension nor do we want to query the TS sever at this point. They already filter out completions in most false positive cases but please open a bug if you see unexpected behavior


@tatikamsetti I downloaded the Mac file zip file you have junk files in there. Please remove:

errorlog.txt
Resources/DeletedCourses
Resources/instructor_registration.json
Classes/TestCourse
Classes/Options.csv

The only thing we want aside from what an instructor downloads from the iclicker website is the extra configs. Just include only those extra files when repacking the files from iclicker.


@ChukCharles it is very confusing, I think so too. I just finished chapter 13, my tip for you is to stick with the book as close as possible, if you are getting stuck rather re-read parts of the chapter then trying to find something on the web (I should have done that, would have saved a lot of time).. Are you getting a test project with fltk to compile and run, at least?


saw approval from MonsieurNicolas
at https://github.com/MonsieurNicolas/stellar-core/commit/055d1c39d9aa2428041682e0b4209981f506fa3b


merging MonsieurNicolas/stellar-core/VS2017 = 055d1c39 into auto


MonsieurNicolas/stellar-core/VS2017 = 055d1c39 merged ok, testing candidate = 63a506b9


这里和后面的判断重复了


##### _Styled comment_

> writeTo(text, id) --> writeTo(text, id, doSet)

## What does doSet do?
Let's say we want to add something to `someID` instead of changing it completly
```html
<p id="someID">Look there's a </p>
```
Then we just do:
```javascript
writeTo(' tiger!', 'someID', false);
```
So now the `someID` will be
```html
<p id="someID">Look there's a tiger!</p>
```

### But I want to change it completely, how?
Then we just do:
```javascript
writeTo('Hello', 'someID', true);
```

So now the `someID` will be
```html
<p id="someID">Hello</p>
```


cos tu sie zaplatalo


This needs to call `super.dispose()`.  It's implementing a frame.

If there some reason you think it can't (or shouldn't) call `dispose()`, we should work that through.

Not calling `dispose'()` will eventually cause problems for users.


yay! its working


umknelo mi to, :+1:


this project suffers from a project leader who has no clue about coding in C. i mean @DCurrent . everytime he commits something, he breaks something. also when he merges stuff from other contributor without really knowing what goes on in the changed code. i'd suggest that @Plombo becomes the code master and every push has to be reviewed by him, since he's the only one in the remaining crew that actually does understand the language he's using.


Nope :) if you try yourself you're gonna notice no difference at all.

But there are situations when overriding is needed. For example now it turned out that new experimental EOSM lossless supporting build (thanks to dfort) has annoying bug which shifts the whole raw buffer to the right by 8 pixels. Hence all focus pixels are shifted to the right and standard focus pixel map is not working.


Mi Drive

damit es .... funktioniert


Removing this line adds a bug to the driver: the high bit of TL bytes is set on some operators according to algorithm in the original music files. By removing this reset, these values will have the high bit set and may incorrectly be clamped below, or may even overflow and not be clamped.


This commit has been mentioned on **Discourse Meta**. There might be relevant details there:

https://meta.discourse.org/t/unable-to-change-themes-video-demo/70800/13


没有缩进


I'd prefer committing stuff like this when it does not break dependencies. I am not sure how to fix `ibus-with-plugins` after this change, not knowing how ibus works and what these changes imply.

The other failures caused by postgresql I've fixed properly but I did not know how to fix this and this doesn't seem like something that should be lying around broken on master either.


Sure. Although I would think you want to keep compat with the earlier versions? @sebdesign


A small bug fix to support `Table` user asset type for `du` command. Otherwise, it throws an error:

> Cannot get size for asset type "Table"


einigen

Deine immer groß oder klein?


Os datasets ainda possuem inconsistências que podem transformar valores numéricos em factor dentro do R.


It, open source. You'll have to pay for private. You can do it also. Ole..


```
argv[2][i] <= 9
```
这句代码错了，应该是 **’9’**


Anrede: Deine, Dir, Sie, Euch, Ihre...