NetlogoのパッチのマトリックスデータをExcelファイルに出力するには？

Question

私は特にNetlogoの "Flocking"モデルを扱っています。私が望むのは、エージェントを選択して、選択したエージェントの次の3つのパッチに対して他のエージェントが存在するかどうかを調べることです。エージェントの周りすべてをチェックして、マトリックス形式のデータを取得し、 excel/cvsファイル。

Answer 1

残念ながら私はあなたのための決定的な答えを持っていないが、私はあなたが並べ替えの何かをしたいと思う想像：

globals 
[ output_matrix] 
patches-own 
    [occupied?] 
to setup 
clear-all 
reset-ticks 
    create-turtles 50 
    set output_matrix [] 
end 
to go 
    move 
    tick 
end 
to move 
    ask turtles [set heading random-float 361 forward random-float 2 ] 
    ask patches with [count turtles-here > 0] [set occupied? 1] 
    ask patches with [count turtles-here = 0] [set occupied? 0] 
    check_surroundings 
end 
to check_surroundings 
    ask turtles [ ifelse any? turtles-on patch-ahead 1 
    [set output_matrix lput 1 output_matrix] 
    [set output_matrix lput 0 output_matrix]] 
    ask turtles [ ifelse any? turtles-on patch-ahead 2 
    [set output_matrix lput 1 output_matrix] 
    [set output_matrix lput 0 output_matrix]] 
    ask turtles [ ifelse any? turtles-on patch-ahead 3 
    [set output_matrix lput 1 output_matrix] 
    [set output_matrix lput 0 output_matrix]] 
end 

あなたに2つのオプションを与えること。 1の場合、ビヘイビア空間を使用して、各パッチが占有されているかどうかを表す簡単な0または1でファイル（ビヘイビア空間で指定する）に完全なパッチリストを出力することができます。 2番目のオプションは、これが作成するoutput_matrixリストを使用することです（最終的なゲームが何であるかはわかりません）。これは、毎ティックごとに各カメの3つの0と1の系列を与えます（時間の経過とともに集計がどのようになっているかを見積もりたい場合は、これがより有用かもしれません）。

はまた

あなたには、いくつかのサンプルコードを生成する場合、私は確信しているが、コミュニティがさらにあなたを助けることができるようになります/ファイルクローズプリミティブ出力 - 印刷およびファイル・オープンに見てみたいことがあります。

Answer 2

globals [rpts] ;write your code to set global only once 

to test 
    ca 
    set rpts moore-offsets 3 
    ask n-of 50 patches [sprout 1 [set color red]] 
    ask one-of turtles [ 
    ask patches at-points rpts [set pcolor yellow] 
    print any? other turtles-on patches at-points rpts 
    ] 
end 

to-report moore-offsets [#n] ;includes center ... 
    let _result [] 
    let _xs n-values (1 + 2 * #n) [? - 3] 
    foreach _xs [ 
    let _y ? 
    foreach _xs [ 
     let _x ? 
     set _result lput (list _x _y) _result 
    ] 
    ] 
    report _result 
end