Я думаю, это то, что вы хотите:
to move
let count-tick 5
if var >= 9.5 [
set count-tick count-tick - 1
if count-tick = 0 [
let nearest-group min-one-of (patches with [count turtles >= 3] in-radius 3 ) [ distance myself ]
move-to nearest-group ;; go to the biggest crowd near you
set shape "star"
set color red
]
]
end
Во-первых, вы уже находитесь в блоке кода ask turtles
из процедуры, вызывающей эту процедуру перемещения.Таким образом, вам не нужны дополнительные ask turtles
.Посмотрите ask
в словаре NetLogo, он просматривает черепах, выполняя весь код для каждой черепахи по очереди.
Во-вторых, вам нужно count turtles
вместо sum turtles
, поскольку sum
означаетсуммируйте значения.
Обратите внимание, что при этом нет проверки ошибок, у вас могут возникнуть проблемы, если в радиусе 3 нет патчей, у которых есть как минимум 3 черепахи.