如何在NetLogo Web中用import-a和fetch扩展实现智能体数据导入

核心实现思路 #

NetLogo Web不支持file-read，需通过fetch扩展读取文件文本，将文本解析为结构化数据后，循环为每个智能体赋值属性。

完整代码示例 #

extensions [fetch]

to load-agent-data
  ;; 调用文件选择对话框，异步读取文件内容
  fetch:user-file-async [file-text ->
    ;; 将文件文本按行分割，过滤空行
    let data-lines filter [line -> not empty? line] (split file-text "\n")
    ;; 遍历每行数据创建智能体
    foreach data-lines [line ->
      ;; 将每行按空格/制表符分割为属性值列表，转为对应数据类型
      let attrs map read-from-string (split line "\s+")
      ;; 创建单个people智能体并赋值
      create-people 1 [
        set num item 0 attrs
        set CP item 1 attrs
        set KB item 2 attrs
        ;; 继续添加其他属性赋值，对应列表索引即可
      ]
    ]
    show (word "成功创建 " count people " 个智能体")
  ]
end

关键细节说明 #

• 文本解析：split file-text "\n"把文件内容拆成每行，split line "\s+"把每行的属性值按空白字符分割（支持空格或制表符分隔），read-from-string自动将字符串转为数值/布尔等对应类型。
• 智能体创建：用foreach遍历每行数据，每次创建1个智能体，避免一次性批量创建时的异步同步问题。
• 异步处理：fetch:user-file-async是异步操作，所有数据处理、智能体创建逻辑必须放在回调函数内部，确保文件读取完成后再执行后续操作。

适配原Desktop版本逻辑 #

如果原文件格式是每个智能体的属性分多行存储（比如一行一个属性），可按每组属性行数分割数据：

;; 假设每个智能体对应3行属性数据，按每3行一组处理
let grouped-data group data-lines 3
foreach grouped-data [agent-attrs ->
  create-people 1 [
    set num read-from-string item 0 agent-attrs
    set CP read-from-string item 1 agent-attrs
    set KB read-from-string item 2 agent-attrs
  ]
]

内容的提问来源于stack exchange，提问作者Robert Fligg