Netlogo：プロットの相対周波数

Question

はい、同様の質問がここでNetLogo: histogram relative frequencyと尋ねられましたが、私の知る限り、答えは与えられていません。もう一度もう一度聞くことができますか？私は質問の下にコメントを追加したが、私は許可されていないだろう。

私は、カメからの距離が遠くなるにつれて特定の色のパッチの相対頻度をプロットしたいと思います。これまでに試したこと：

ask turtle [ 
    set-current-plot "plot 1" 
    set-plot-y-range 0 1 
    set-plot-pen-mode 1 
    histogram [distance myself] of patches with [pcolor = red]] 

これは私に絶対周波数を与えます。私は、カメからの距離が遠くなるにつれて、各パッチの色の相対的な頻度をプロットしたいと思います。だから距離= 1離れてタートルから、どのくらいの数のパッチは、パッチの数は赤です。私は

histogram [distance myself ] of patches with [ ]/count patches with [distance myself = 1] ; when x-axis = 1, and so for increasing x 

を追加しようとしたが、原始的なヒストグラムは、リストを期待するので、特定の構文上の問題がありました。私は、Netlogoの辞書を見てもプロットセットの下にy軸を設定するものは見つけられませんでしたので、y軸を（距離のxのパッチの絶対数/総数）に設定する簡単な方法があると思います-upコマンド。

この問題に関するアドバイスをいただければ幸いです。あなたの時間をありがとう。

Answer 1

赤とトータルのパッチの割合をプロットするように思えます。これにはヒストグラムを使用しません。

代わりに、プロットします。

最も遠いパッチの距離を取得する必要があります。各距離よりも、その距離にあるパッチの総数に対する赤の割合を計算します。

（亀はむしろ0または1よりXCOR 0.5を持っている場合、すなわち）カメがパッチからオフセンターかもしれないので、あなたの人生をより簡単にするために、あなたは距離を丸めることが

to setup 
    clear-all 

    crt 1 [ setxy random-xcor random-ycor] 
    ask patches [ set pcolor ifelse-value (random 100 < 30) [red][black]] 

    ask turtle 0 
    [ 
    let max-distance round max [distance myself] of patches 
    set-current-plot "example-plot" 
    set-plot-x-range 0 max-distance 
    set-plot-y-range 0 1 
    foreach n-values max-distance [?] 
    [ 
    let percent-red (count patches with [ round (distance myself) = ? and pcolor = red])/(count patches with [ round (distance myself) = ?]) 
    plotxy ? percent-red 
    ] 

    ] 

end