netlogo检查补丁颜色

Question

用简单的话说，我正在努力做的是：

if（任何补丁的颜色=红色）然后执行一些代码

Answer 1

if any? patches with [pcolor = red] [
  print "yes, there is at least one red patch"
]

Answer 2

只有一只乌龟可以检查pcolor。所以这有效：

ask turtles [show pcolor]

但这不起作用（输入Observer＆gt;提示符）：

show pcolor