囚徒困境仿真.doc

Star Logo仿真实验 —基于Star Logo仿真工具的应用 实验要求 1、掌握Star Logo仿真工具和程序编写 2、制定“囚徒困境”的决策策略，设计主体的行为规则，编写相应程序。 3、要求11月5日交打印稿或手写稿，并在课堂上演示建模与仿真情况。内容包括：主体的决策策略、行为规则等，以及仿真结果分析报告。 实验案例 囚徒困境仿真—— 实验结果 程序： ——在海龟窗口中的程序： turtles-own [ totalpay pay ] to placeunique if count-turtles-here = 1 [stop] setxy random screen-width random screen-height placeunique end to getpay let [ :currentdir 0 :current 0 ] set pay 0 repeat 8 [set :current ( one-of-turtles-towards :currentdir 1 ) ifelse color = blue [if (color-of :current) = blue [set pay pay + 10]] [if (color-of :current) = red [ set pay pay + profit]] set :currentdir :currentdir + 45 ] set totalpay totalpay + pay end to move fd 1 rt random 360 placeunique end to decide let [ :current 0 :currentdir 0 :max 0 :maxcurrent 0] repeat 8 [set :current (one-of-turtles-towards :currentdir 1) if :current > -1 [if (totalpay-of :current) > :max [set :max totalpay-of :current set :maxcurrent :current ]] set :currentdir :currentdir + 45] setc color-of :maxcurrent end 棗d在观察者的窗口中的编程： to setup ca crt screen-width * screen-height * (pctcover / 100) ask-turtles [ifelse (random 100) < copercent [setc blue][setc red]] ask-turtles [setshape square-shape placeunique] end to go ask-turtles[getpay move decide] end 实验结论： （1）当利润率<=10%是最终的状态时所有企业都采取合作的策略。如下图： 所有的方块都为蓝色（代表合作）。 （2）当利润率>=10%是最终的状态时所有企业都采取不合作，背叛的策略。如下图： 所有方块都变为红色（代表背叛） 系统仿真作业 3