如何使海龟以特定的颜色吸引人？

Question

我在玩Netlogo，我已经为两个不同的组分配了至少两种颜色。这两个群体代表着两种不同的定型观念--蓝色和红色。

我的目标是:我需要一个“红色”与所有其他的红色，蓝色的羊群与所有其他蓝色。

这是我目前的密码。

breed [ firstgroups firstgroup ]
breed [ secondgroups secondgroup ]

turtles-own[
  groupmates 
  nearest-neighbor
]

to setup
  clear-all
  crt population-blue
  [ set size 1.5
    set shape "person"
    setxy random-xcor random-ycor 
    set color blue
   ]
  crt population-green
  [ set size 1.5
    set shape "person"
    setxy random-xcor random-ycor 
    set color green
   ]
  reset-ticks
end

to go
  ;;ask turtles [ group ]
  ask turtles [ fd 1 ]
  tick
end

;;to group
;;  ifelse (

Answer 1

turtles-own[
  groupmates ; unused
  nearest-neighbor
]

to setup
  clear-all
  setup-globals
  create-firstgroups population-blue ;use your breeds
  [ set size 1.5
    ;set shape "person"
    setxy random-xcor random-ycor 
    set color blue
   ]
  create-secondgroups population-green
  [ set size 1.5
    ;set shape "person"
    setxy random-xcor random-ycor 
    set color green
   ]
  reset-ticks
end

to go
  ask turtles [ group ] ;use `group`
  ask turtles [ fd 1 ]
  tick
end

to group ;turtle proc
  ;let _partner min-one-of other breed [distance myself] ;form subgroups
  let _partner one-of other breed ;form big gropus
  set heading mean-heading (list heading towards _partner)
end

to-report mean-heading [ headings ] ;by Bryan Head
  let mean-x mean map sin headings
  let mean-y mean map cos headings
  report atan mean-x mean-y
end