NetLogo中让智能体从CSV列随机抽取参数实现移动转向

问题背景 #

我有一个名为Males.csv的CSV文件，包含turning_angles、speed、step_length三列。目前已在空白NetLogo环境中创建了如下基础智能体模型：

to set-up 
  clear-all
  reset-ticks
  ask patches [set pcolor green]
  ask n-of home patches [set pcolor brown]
  ask patches with [pcolor = brown] [
    sprout n-turtles [set breed turtle set shape "arrow" set sex one-of ["male" "female"]]
  ]
end

我希望编写step和turn过程，让智能体从CSV的对应列中抽取参数进行移动与转向，同时想确认是否可以将CSV列转换为列表，再从中随机选取数据使用。以下是我构思的伪代码示例：

turtles-own [step-length turn]

to step 
  ask turtle fd random step-length from_column "step_length" "Males.csv"
end 

to turn 
  ask turtle fd random turn from_column "turning_angles" "Males.csv"
end

to go 
  ask turtles [step turn]
end 

实现方案 #

1. 准备工作：启用CSV扩展 #

首先需要在NetLogo的扩展管理器中启用csv扩展，否则无法使用CSV读取相关命令。

2. 定义全局变量存储CSV数据列表 #

在模型开头定义全局变量，用于缓存CSV中提取的列数据，避免重复读取文件：

globals [
  male-step-lengths  ; 存储Males.csv中step_length列的所有数据
  male-turning-angles ; 存储Males.csv中turning_angles列的所有数据
]

3. 在初始化过程中加载CSV并转换为列表 #

修改set-up过程，添加CSV读取逻辑，将目标列转换为可随机选取的列表：

to set-up 
  clear-all
  reset-ticks
  ; 读取CSV文件，确保文件与模型在同一目录，或使用绝对路径
  let male-data csv:from-file "Males.csv"
  ; 获取表头行，定位目标列的索引
  let headers first male-data
  let step-col-index position "step_length" headers
  let turn-col-index position "turning_angles" headers
  ; 提取数据行（跳过表头），转换为数值列表
  ; 若CSV数据为字符串格式，需用read-from-string转换为数值
  set male-step-lengths map [row -> read-from-string (item step-col-index row)] but-first male-data
  set male-turning-angles map [row -> read-from-string (item turn-col-index row)] but-first male-data
  ; 原有模型初始化逻辑
  ask patches [set pcolor green]
  ask n-of home patches [set pcolor brown]
  ask patches with [pcolor = brown] [
    sprout n-turtles [set breed turtle set shape "arrow" set sex one-of ["male" "female"]]
  ]
end

4. 编写移动与转向过程 #

基于全局列表随机选取数据，仅让雄性海龟使用Males.csv中的参数：

; 移动过程：从step_length列表随机选取数值前进
to step
  ask turtles with [sex = "male"] [
    let chosen-step one-of male-step-lengths
    fd chosen-step
  ]
end

; 转向过程：从turning_angles列表随机选取数值转向
to turn
  ask turtles with [sex = "male"] [
    let chosen-turn one-of male-turning-angles
    rt chosen-turn ; 如需左转，替换为lt chosen-turn
  ]
end

5. 完善主运行过程 #

调整执行顺序（先转向再移动更符合逻辑），并添加tick推进：

to go
  ask turtles [turn step]
  tick
end

关键说明 #

• 完全支持将CSV列转换为列表：通过csv:from-file读取文件后，提取目标列并转为全局列表，后续用one-of命令即可随机选取元素，效率远高于每次读取CSV
• 建议仅让雄性海龟使用Males.csv的数据，避免逻辑混淆
• 若CSV中存在空值或非数值数据，需提前清理或添加异常处理逻辑

内容的提问来源于stack exchange，提问作者Kilian Murphy