10(多主体仿真4).pptVIP

Lecture 10Multiagent Simulation with NetLogo(Part 4) NetLogo常用建模技术(续) NetLogo常用建模技术(续) 子程序和函数 不带参数的子程序 （略） 带参数的子程序 （右例） NetLogo常用建模技术(续) 子程序和函数 不带参数的函数 （略） 带参数的函数 （右例） NetLogo常用建模技术(续) 列表(list) NetLogo常用建模技术(续) 列表(续) NetLogo常用建模技术(续) 列表(续) NetLogo常用建模技术(续) 列表(续) NetLogo常用建模技术(续) 串(string) NetLogo常用建模技术(续) 随机数和随机分布 random-float 5 ; 生成服从在[0,5)内的均匀分布随机变量 random-normal 5 1 ; 生成均值为5，标准差为1的正态分布随机变量 mean [ 3 4 5 ] ; 列表的均值（=4） max [ 3 4 5 ] ; 列表的最大值 modes [ 3 3 4 5 ] ; 列表的众数，结果是列表 ( = [3] ) standard-deviation [ 3 4 5 ] ; 列表的标准差 random-seed num NetLogo常用建模技术(续) 重要流程控制语句 条件 (if, ifelse, ifelse-value) 循环 (while, repeat) 跳出循环 出错 逻辑(and, or, not) 真实时间(wait, every) to, ask, ask-concurrent NetLogo常用建模技术(续) 仿真管理 Behavior space 批量运行多个情景 多次重复实验 自动保存重要结果 Last revision June 7, 2003 Last revision June 7, 2003 to draw-polygon [num-sides len] ;; turtle procedure pen-down repeat num-sides [ fd len rt 360 / num-sides ] end To test_polygon ca create-turtles 1 ask turtles [ draw-polygon 8 who ] end 此例程带两个参数 调用方式 to-report absolute-value [number] ifelse number = 0 [ report number ] [ report (- number) ] end To test_absolute print absolute-value -5 end 返回表达式。 注意：不修改原始值 turtles-own [my_property my_stocks] to print_label ; a turtle procedure set label (word property: my_property stocks: my_stocks) end to setup ca create-turtles 1 [ set size 3 set my_property [ ] set my_stocks n-values 5 [0] print_label ] end 空的列表 初始化为 [0 0 0 0 0] Word 是个万能字串连接函数 to add_property ask turtle 0 [ ifelse _left = true [ set my_property fput new_pro my_property ] [ set my_property lput new_pro my_property ] print_label ] end to remove_property ask turtle 0 [ set my_property remove new_pro my_property print_label ] end to remove_dup_pro ask turtle 0 [ set my_property remove-duplicates my_property print_label ] end _left和new_pro是界面全局变量 fput（lput）是左（右）端添加 将my_property中