[inst/examples/Ants/Ants.R:12:2:](https://github.com/PredictiveEcology/NetLogoR/blob/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/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/3ed7e554571ef5295246108bbcb98a2d3c845b9f/inst/examples/Ants/Ants.R#L146) *warning:* **no visible global function definition for ‘turtleSet’**
```r
  turtles <- turtleSet(turtlesMoved, other(agents = turtles, except = turtlesMoved))
             ^~~~~~~~~
```


performance optimization for dup_delay_max=0


It should be:
`var url = options.templateUrl || options.templateId,
tplPromise = $http.get(url).then(function(response){`

Instead of:
`var url = options.templateUrl || options.templateId;
tplPromise = $http.get(url).then(function(response){`


you could implement a basic implementation instead of an abstract method


Looks good now


actually the best way to use the extension mechanism instead of this if else


Please increase patch numbers of `JvmMetadataVersion` and `JsMetadataVersion`


Yes; the task returned from `await Task.WhenAny` should be awaited. This often doesn't happen right away, but it does in this case - hence the double `await`. There's more discussion under the `Task.WhenAny` section of this blog post: https://blog.stephencleary.com/2015/01/a-tour-of-task-part-7-continuations.html


完全に冗長だが全パターンに対してdestroyed判定もしたくない。


FixIntervalScheduleInterpolation (JasonGlazer) - x86_64-Linux-Ubuntu-14.04-gcc-4.8-IntegrationCoverage-Debug: OK (2176 of 2177 tests passed, 0 test warnings)

Failures:

integration Test Summary
 * Passed: 612
 * Failed: 1

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


It looks like openal gets the positions and calculated the distance itself


This is a program to delete files left in the test folder.

This can be done either by clicking the BAT file, or automated with Windows Task Scheduler.
If the test folder is not already created, it will check first and then create the folder in the current working directory.  The file can be moved anywhere and still work as long as the garbage files are left in the "TEMPFILES" folder.

I personally use it to clear up my download folder full of random updates and junk. This was my first batch script created.


Created multidev environment [ciccweb#pr-resource](https://dashboard.pantheon.io/sites/cbc91b53-e053-4c27-8ad4-7502151a02ed#pr-resource).

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


Can the constructor variable 'Word' technically have any number of input variables, including zero?


FixIntervalScheduleInterpolation (JasonGlazer) - x86_64-Linux-Ubuntu-14.04-custom_check: OK (0 of 0 tests passed, 0 test warnings)

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


Looks like an (upstream) Ubuntu repository issue - the package should be there:
https://packages.ubuntu.com/xenial/libgles1-mesa-dev
But there are no download options for it:
https://packages.ubuntu.com/xenial/armhf/libgles1-mesa-dev/download


Gui №1


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

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


Please check your vue-loader version and make sure it's up to version 13.x.

If it still doesn't work, please provide detailed log information


Fixes #11


//google like


To which line are you referring - the "MinGW users may manually define..." line?


![](https://github.trello.services/images/mini-trello-icon.png) [Product Research](https://trello.com/c/y2BpllSH/7-product-research)


Also did some small edits on the text and continued tests on the contact form.


> So wouldn't it therefore make sense to rename VFT_DLL to VFT_DRV

No, because wpcap.dll is a DLL, not a driver.

> or is that something that concerns only the packet library?

It doesn't concern packet32.dll, either, because that's *also* a DLL, not a driver.

The NPF module that gets loaded into the kernel is the driver, and `npf.sys`, or whatever it's called, should be tagged as VFT_DRV, with the appropriate subtype.


Created multidev environment [ciccweb#ci-80](https://dashboard.pantheon.io/sites/cbc91b53-e053-4c27-8ad4-7502151a02ed#ci-80).

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


@benlesh Just looking around at rxjs to learn it and came across this...what do these characters mean? Is it related to the marble thing?


Workaround - with Debian package - or wait?


Now MLV App can fix focus dots w/o .fpm files in the working directory, but If .fpm exists it will be used instead of the internal generator. There is also Crop rec pattern generator. Everything works so far ( hopefully ;) )