设置红色和绿色色块的精确百分比

Question

在设置中，我尝试设置整体色块红色 pcolor 或绿色 pcolor 的精确百分比。
我使用的是标准补丁环境，总共有1089个补丁。
我有两个滑块：

• slider1（用于设置最多 250 只绿海龟）
• 滑块 2（用于设置最多 250 只红海龟）

有没有办法设置 1089 个总色块的准确百分比为红色，剩余百分比为绿色？
根据之前在此网站上发布的有用问答改编代码，我有这个草稿编码：

to color-patches

  let total slider1 + slider2
  let p-red   slider1 / total
  let p-green slider2 / total
 
  ask patches [
    let x random-float 1.0
    if x <= p-red [set pcolor red]
    if x <= p-green [set pcolor green]
  ]
end

Answer 1

你想要

n-of

！

ask n-of (p-red * count patches) patches [ set pcolor red ]
ask patches with [ pcolor != red ] [ set pcolor green ]