Я не могу установить разные цвета для своих пород - PullRequest
0 голосов
/ 04 июля 2018

Если я запускаю этот код несколько раз в Netlogo, иногда я получаю один зеленый и два красных, а иногда три красных, это ошибка или что-то не так с кодом?

breed [greens a-green]
breed [reds a-red]

to setup 
clear-all
create-greens 1
ask greens[set color green setxy random-xcor random-ycor]
create-reds 2
ask reds [ set color red setxy random-xcor random-ycor]
reset-ticks

1 Ответ

0 голосов
/ 04 июля 2018

Похоже, что с вашим кодом все в порядке: я просто запускал несколько упрощенную версию 10000 раз, и у меня не было случаев, где имелись какие-либо другие показатели, кроме 1 зеленого и 2 красного. Попробуйте эту слегка модифицированную версию вашей установки:

breed [greens a-green]
breed [reds a-red]

globals [ green-count red-count ]

to setup 
  create-greens 1 [
    set color green 
    setxy random-xcor random-ycor
  ]
  create-reds 2 [
    set color red 
    setxy random-xcor random-ycor
  ]
end

И запустить это несколько раз и отследить количество каждого цвета:

to colors-check
  ca
  set green-count []
  set red-count []
  repeat 10000 [
    ask turtles [ die ]
    setup
    set green-count lput count turtles with [ color = green ] green-count
    set red-count lput count turtles with [ color = red ] red-count
  ]
  print word "Green counts recorded: " remove-duplicates green-count
  print word "Red counts recorded: " remove-duplicates red-count
  reset-ticks
end

Вывод для меня:

Green counts recorded: [1]
Red counts recorded: [2]

, который говорит мне, что для всех этих 10000 повторений количество цветов было таким, как ожидалось (в противном случае вы увидите другие числа при удалении дубликатов). Возможно, после вашей настройки запускается какая-то другая команда?

...