NetLogo直方图数据

Question

我尝试将此帖子发布到雅虎的NetLogo用户组，但未能成功接收帖子。所以我在这里尝试。

NetLogo可以绘制直方图。有没有办法访问直方图数据，即为直方图绘制的数据？感谢。

Answer 1

节日快乐，拉斯！

我认为不可能获得价值。虽然如果你想为数据实现自己的直方图，你可以使用类似的东西：

to-report calc-histogram [ aList numBars aMaxValue ]
  let minValue min aList
  let interval (aMaxValue - minValue) / numBars
  let hist []
  foreach n-values numBars [?] [
   let lowerBound minValue + (? * interval)
   let upperBound lowerBound + interval
   let x (lowerBound + upperBound) /  2
   let y length filter [? >= lowerBound and ? < upperBound] aList
   set hist lput (list x y ) hist
  ]
  report hist 
end

示例用法：

observer> calc-histogram [0 1 18 2 3 4 5 6 7 7 7 9 10 7 15 7 17 18 19 ] 5 20
observer: [[2 4] [6 8] [10 2] [14 1] [18 4]]