设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 9973|回复: 2

[求助] 代碼的问题需要求助..

[复制链接]
发表于 2008-6-3 17:42:03 | 显示全部楼层 |阅读模式
10仿真币
我想请问各位大大高手帮我解决我的问题
) x3 n0 O, I8 R. T; c+ U我先简述一下我所要做的模型,我的模型里,整体有两种人,政府与民众。 ; W! J- Q  i* h; P" U
那政府里又分为四种策略的人faithfuls ,trigger-punishments ,trigger-punishments , mixeds
4 |, J4 ~8 p! ]# Q9 `! H3 M那政府要与民众互动,选择合作与不合作,政府合作和民众合作可得分(energy)
3 q2 X9 j% O% j" L/ M2 B) ^,相对的不合作也有得分但当我要开始写规则的时候,却发现程式无法照我的意思去跑,想请问各位高手能帮我看看是哪里出问题了吗?% e, `2 j6 ~/ u* w% y
breed [peoples people]
/ [. i. s' R, a. Ubreed [faithfuls faithful]8 {# p7 R8 e$ t# g' H2 ~
breed [trigger-punishments trigger-punishment]$ s# J1 G% J; w+ G
breed [tit-for-tats tit-for-tat]
0 ?; p, o6 P% Z* Obreed [mixeds mixed]   
* Q+ E, l) g4 d" Z* `turtles-own [cooperate?  energy]" D* `6 w$ @- z6 W! l
% E/ z# U) t7 F( O) n
to setup
: {' l3 C$ s5 q$ Hset-default-shape turtles "person"
; b8 \. X6 D1 a# r" p: i& v  clear-all               + p' g) [$ l* g/ A- d. E" L
  setup-peoples  
/ w7 Q% H( z+ O  setup-goverments
5 _/ r3 u% V# S* I0 ^ask faithfuls  [ set energy 0 ]
' |' o7 K7 P' ]: U& H  Uask trigger-punishments  [set energy 0 ]
; G& w) Y1 D$ ]3 h' ?ask tit-for-tats  [set energy 0 ]/ E9 E, \1 h/ T) H1 [
ask mixeds  [set energy 0 ]
: G0 o+ e/ c8 `! `# _& B7 p* {ask peoples  [set energy 0 ]
- _8 a; C8 S! N4 B+ eend9 H9 |9 P* E  V- O1 Q

- r- d* H- ^, y* b: Z$ `; |4 ito setup-peoples
/ ~: M7 z5 w" \0 E7 Z9 T$ I' \' W
: x" _8 U: c" `0 n2 N! O6 h5 |ask patches with [-1 < pxcor and pxcor < 20 and pycor = 0]
- |  B3 U4 c9 P4 A0 r( l* ~[sprout-peoples 1 [ set color blue set heading 0 ]
4 t; ~- s) F7 m7 P7 q! E1 [
/ I' Z3 W) l' p& ~]
, A# \5 n0 Z  ]3 o6 v: Nend7 v: v: Y, E& |6 K2 ~- k
0 N; w% c0 A+ S/ Y0 z
to  setup-goverments
. _3 I* M- i7 N$ |+ ^7 B& O8 q3 bcreate-faithfuls  5 [set color red set heading 180] 0 z" i5 k" \& l7 W; ]5 ~8 k
create-trigger-punishments  5 [set color green set heading 180]( e0 P: F% }6 G- h$ I
create-tit-for-tats  5 [set color white set heading 180]
7 B% \# U4 n) X8 q5 screate-mixeds  5 [set color pink set heading 180]) Y- T% n$ I4 G, m4 Z% H  o
ask turtles with [ color != blue ] [while [any? other turtles-here] [setxy random 20 1]* _, X) w. ]: U  m$ m5 j9 F3 X
]% t2 f# f4 \2 d6 A. B* ^$ z4 w
end' |  Z" b; E& p) m" f* {1 H
: R+ U2 ?5 Y) i0 D5 D3 s
to go
2 e, R' z$ |/ `, N* t( K+ h$ uask  peoples [ set cooperate? random 2] + J5 [4 N( G( C6 f2 l7 e0 `7 G1 G, T
  ask  faithfuls [  set cooperate? random 2] * T/ M; ^! f0 l
  ask  trigger-punishments [ set cooperate? random 2]
1 h3 ~4 f' {9 T" w  ask  tit-for-tats [ set cooperate? random 2]
7 C6 r( B2 ?. ]+ l9 A1 F+ Q  ask  mixeds [ set cooperate? random 2]8 \9 F" u; n. f/ H0 u' @% H7 v7 _
  
! _; r3 h" @, k7 F  ask faithfuls [ ! ?; y2 Z  j, O/ l: T; J0 R
  if ( cooperate? = [cooperate?] of peoples-on patch-ahead 1 )
8 E+ m" |3 L' q& f6 \" I8 Z   [  set energy  energy + 8
5 D) V& k/ }6 p* }1 }- ^# R      ask peoples-on patch-ahead 1 [ set energy  energy + 2] ]
2 Z  d0 R; [$ s; M: e5 D6 V; [; r      ]         就是这里出问题了无法照我的意思去跑
0 H+ h9 g/ k2 J5 x0 ^/ G  ifelse (show-energy?)" S) U% E- S2 n6 d$ M1 O  d2 i
    [ ask turtles [ set label (energy) ] ]
" p# }, w: F+ w& |& M7 r$ p4 v    [ ask turtles [ set label "" ] ]  O; U, B7 a* y' v. ]
  end) x7 s( i1 f6 j" t% K! {# s# R: R8 |7 d
希望大家能帮我解决一下不然我没办法继续写下去
, ?1 D$ s. P$ g- Y( _& {* c7 }
; c7 w" `% @3 o. V: j( r[ 本帖最后由 h64914110 于 2008-6-4 10:51 编辑 ]

最佳答案

查看完整内容

为什么不考虑用patches设定政府,假设政府不能够移动,民众可以通过用脚投票选择政府。这样也许可以解决你说的问题。
发表于 2008-6-3 17:42:04 | 显示全部楼层
为什么不考虑用patches设定政府,假设政府不能够移动,民众可以通过用脚投票选择政府。这样也许可以解决你说的问题。
 楼主| 发表于 2008-6-4 11:57:22 | 显示全部楼层
简单点说好了模型固定分为上下两排,上为政府下为民众
( o& `8 \, r* }  R# h每一个政府类的人对应一个民众
, C# b6 g' n$ v# a2 X上下两两对应  但我现在问题就是  我不知道turtles是否有互相对应到% \& L3 s" s7 w4 }4 u1 L
那如果没对应到    要让turtles互相对应的语法又该怎么写?
+ ?" z) o- t% U, q# K/ }, n) l我是新手  麻烦大家帮帮忙  传短讯给我也可以  谢谢
1 o# D) U9 ~1 u8 a, `: H
$ O% m  r/ Q0 u" Z# ]* o  r[ 本帖最后由 h64914110 于 2008-6-4 11:58 编辑 ]
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2026-9-15 16:09 , Processed in 0.015434 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表