如何在Netlogo中更改一定比例的黑色补丁？

Question

我想知道是否有人能够帮助我的Netlogo编写代码，在中间补丁的某个半径范围内改变一定百分比的随机黑色补丁。谢谢！

Answer 1

基本上，问他们n在哪里n是你要指定的百分比改变的补丁数量。

  let radius 5
  let percentage .5
  ask patch 0 0
  [
    let close-patches patches in-radius radius with [pcolor = black]
    ask  n-of (percentage * count close-patches) close-patches
    [set pcolor green]
  ]