NetLogo - 在 2 个正方形内找到海龟

Question

我正在尝试找出如何检查附近是否有任何海龟（我们将其称为基础海龟或基地）。我需要这个包括对角线，因为我在这些基地周围产卵，所以需要在基地周围空出 1 个完整的正方形。因此。生成基地时，我需要确保 2 个方格内没有其他人，包括对角线。

我尝试使用“turtles in-radius (2,3,4,...)”但它不起作用，因为半径命令似乎是圆形的。我该怎么办？

Answer 1

NetLogo 的neighbors 为您提供围绕海龟所在补丁的8 个补丁。你需要周围的 16 个补丁，还是需要 8 个？

在非环绕世界中，neighbors16 的一个简单过程可能是

to-report neighbors16
  ; can be called by a patch or a turtle
  ; assumes there is no wrapping of the world
  let xm max (list (pxcor - 2) min-pxcor)
  let xh min (list (pxcor + 2) max-pxcor)
  let ym max (list (pycor - 2) min-pycor)
  let yh min (list (pycor + 2) max-pycor)

  let ptchs no-patches
  foreach (range xm (xh + 1) 1) [x ->
    foreach (range ym (yh + 1) 1) [y ->
      set ptchs (patch-set patch x y ptchs)
    ]
  ]
  report ptchs with [self != patch [pxcor] of myself [pycor] of myself]
end

希望这会有所帮助， 查尔斯