Информация Diffusion

Question

У меня проблема с netlogo: я хочу распространять информацию в сети. У одной черепахи есть информация и дает ее своим соседям-связям с постоянной вероятностью. Это код, который я до сих пор:

to spread 
    if (count turtles with [informed? = true] > .7 * count turtles) [stop] 
    ask turtles with [ informed? = true ] 
    [ 
     ask link-neighbors 
     [ 
     if (random-float 1 <= 0.02) 
      [ 
      set informed? true 
      show-turtle 
      set color green 
      ] 
     ] 
     ] 

    set num-informed count turtles with [informed? = true] 
    tick 
end 

Теперь я хочу знать: Как я могу гарантировать, что каждая черепаха получает информацию только один раз и не сообщается дважды? Я попробовал «если не проинформирован?», Но это только достало мне сообщения об ошибках. И я получил команду «if (random-float 1 < = 0.02)», если я хочу, чтобы информация распространялась с постоянной вероятностью 2%?

Answer 1

Это должно работать (не проверено). Предполагается, что вы сделали set informed? FALSE, когда вы создали черепах.

to spread 
    if (count turtles with [informed?] > .7 * count turtles) [stop] 
    ask turtles with [ informed? ] 
    [ ask link-neighbors with [ not informed? ] ; **<= my change** 
    [ if (random-float 1 <= 0.02) 
     [ set informed? true 
     show-turtle 
     set color green 
     ] 
    ] 
    ] 

    set num-informed count turtles with [informed?] 
    tick 
end