麻煩寫入文件

Question

我無法完成這個模型。這個概念是爲了向一系列海龜提出問題。每隻龜代表一個知識領域，每個問題應該包含多個隨機知識領域。要求其ID與問題中的一個域匹配的海龜被要求回答。然後根據烏龜的能力和專業知識對他們的答案進行評分。

我希望我有代碼的骨頭在一起，但我無法驗證，直到我可以得到一些輸出到Excel。任何人都可以通過我的「書寫」說明告訴我哪裏出錯了嗎？當我運行模型時，沒有文件被更新或創建。你能發現代碼中的其他缺陷嗎？

感謝， 約翰

globals 
[question 
answer] 

turtles-own 
[abilities 
expertise 
expert 
] 

to setup 
clear-all 
file-open "/Users/johnhayes/ProjectFile.csv" 
create-turtles 500 
set question [] 
set answer [] 
reset-ticks 
end 

to go 
ask turtles [initialise-turtles] 
create-question 
set answer [] 
ask turtles [give-an-answer] 
evaluate 
show (list "relevance quality" answer) 
stop 
tick 
if ticks >= 1000 [file-close stop] 
print-answers 
end 

to initialise-turtles ; turtle proc 1 
set abilities (random 10) ; abilities assigned randomly to each turtle. 
set expertise (random 10) ; expertise assigned randomly to each turtle. 
set expert (FALSE)   
end 

to create-question 
set question n-of 500 turtles 
end 

to give-an-answer ; turtle proc 2 
if member? self question 
[ set expert TRUE ] ; mark as expert  
end 

to evaluate ; turtle proc 3 
let expert-group no-turtles 
set expert-group (turtles with [expert = TRUE]) 
show (list ([abilities] of expert-group))   
show (list ([expertise] of expert-group))  
set answer lput (sum [abilities] of expert-group) answer set answer lput (sum[expertise] of expert-group) answer 
end 

to print-answers 
file-open "/Users/johnhayes/ProjectFile.csv" 
file-print answer  
file-close  
end  

Answer 1

「\」是的NetLogo轉義字符把它讀作\你必須把它加倍。

file-open "/Users/johnhayes/ProjectFile.csv" 

變爲

file-open "\\Users\\johnhayes\\ProjectFile.csv" 

然後項目將打開或創建。

您可能想要考慮使用BehaviorSpace進行輸出，它可以在工具下找到，並且可以讓您將模型的各種運行的所有輸出合併到一個.csv中單擊new並按照說明進行操作。

在你的情況使用答案作爲你的記者。

編輯斜線閱讀障礙。