Netlogo：既存の（文字列）リストから変数に値を割り当てる方法

Question

（フランチャイズ）スーパーマーケットに場所を割り当てるときに問題があります。私はスーパーマーケットブランドごとにリストを持っています。スーパーマーケットブランドは、その都市でスーパーマーケットブランドが持つコンセントの数倍の回数繰り返されています。

しかし、私が使用しているコードでは、リストにある都市の正確な量を割り当てることはできません。毎回ランダムに変化しています。私は上記のリストがあれば、私は次のことを試みた

;to create coop franchisees 
    create-Fs 32 [ 
    set HQ-brand "Coop" 
    set fcoop-location-outlet ["Zuidlaren" "Zuidlaren" "Nijmegen" "Nijmegen" "Nijmegen" "Nijmegen" "Nijmegen" "Nijmegen" "Nijmegen" "Nijmegen" "Nijmegen" "Nijmegen" "Ba neveld" "Barneveld" "Doetinchem" "Doetinchem" "Doetinchem" "Zutphen" "Huissen" "Amstelveen" "Amstelveen" "Amstelveen" "Zwolle" "Zwolle" "Rotterdam" "Rotterdam" "Rotterdam" "Rotterdam" "Rotterdam" "Rotterdam" "Rotterdam" "Rotterdam"] 
] 

、

試験1

ask Fs with [(HQ-brand = "Coop") and (location-outlet = 0)] [ set location-outlet one-of fcoop-location-outlet ] 

試験2

（ブランドごとに）各加盟店に都市出口を割り当てます

ask Fs with [(HQ-brand = "Coop") and (location-outlet = 0)] [ foreach fcoop-location-outlet [set location-outlet one-of fcoop-location-outlet] ] 

トライアル3

ask Fs with [(HQ-brand = "Coop") and (location-outlet = 0)] [ set location-outlet n-of 32 fcoop-location-outlet ] 

私は、1つのCoopロケーションリストを32個のCoopアウトレットのそれぞれに割り当てることを考えましたが、それはランダムです。それがうまくいかず、foreachがうまくいくかもしれないと思ったのですが、コーディングの方法と同じです。

Coopの店舗の1つに割り当てられた都市のリストのすべてのアイテムを取得するたびに、このコードを作成するにはどうすればよいですか？これを行う簡単な方法が必要ですが、私はそれを見つけ出すことはできません。

（これは他の8つのスーパーマーケットで行っています）

Answer 1

私は方法を見つけました！友人は店のすべての場所を持っているリスト最初なので、この

で私を助けた：

fcoop-location-outlet 

代わりに各コンセントの変数のグローバルとすることが必要です。

そして、コードは次のようになります

ask Fs with [(HQ-brand = "Coop") and (location-outlet = 0)] [ 
set location-outlet item 0 fcoop-location-outlet 
set fcoop-location-outlet remove-item 0 fcoop-location-outlet 
] 

をそのようにして、それがないように、位置出口変数に追加されるアイテム（位置）は、メインリストから削除されます繰り返される。

Answer 2

実際に動作するものを書くには十分なコードがありません。リストを変更したくないので、イテレータを作成してください。このようなものはうまくいくはずです。 askはランダムな順序であるため、リストの順序をランダム化する必要はありません。私は-1から始めましたので、割り当ての前に増やすことができました（最後のカメのリストの最後から外れません）。

to assign-locations 
    let iterator -1 
    ask turtles 
    [ set iterator iterator + 1 
    set my-location item iterator fcoop-location-outlet 
    ] 
end