如何使用滑块为 R 扩展的 r:get 调用设置参数？

Question

我想设置 netlogo 海龟的 xy 坐标，遵循来自 R 的 beta 分布，通过 R 扩展获得：

  extensions [r]
  create-turtles 1000 [
    set color red
    set shape "circle"
    setxy r:get "rbeta(1,2,3)*100" r:get "rbeta(1,2,3)*100"
  ]

对 rbeta ( ) 的调用在 NetLogo 代码中作为字符串给出。您如何编写它以便可以通过全局变量设置 r:get 调用中 rbeta( ) 的参数？

Answer 1

您可以使用 word 连接滑块值和函数调用字符串。对于下面的示例，您只需将临时 s1 和 s2 变量替换为您的滑块变量：

extensions [r]

to setup
  ca

  let s1 2
  let s2 3

  crt 10 [
    set shape "circle"
    let betaCall ( word "rbeta(1," s1 ", " s2" ) * 100") 
    setxy r:get betaCall r:get betaCall
  ]
  reset-ticks
end

如何使用滑块为 R 扩展的 r:get 调用设置参数？

How do I set the arguments for an r:get call of the R extension using a slider?

r

netlogo