列表项改变！

wjcpcahu

to setup-environment
   set mylist-environment[]
# Q$ D" o/ x, U( ]: f   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
1 O, [8 z' X3 F/ J; z4 Q- {  T5 |end  
5 t' f$ G2 r( F; T3 y4 X
现在假设有一个概率p=0.6，mylist-environment中的每个元素都以这个概率改变，从1变成-1，或从-1变成1。从而形成一个新的列表，程序该怎么写呢？尝试了几下，没有成功，请大虾们赐教啊！

wjcpcahu

大概是这个意思
  v1 d; x- s2 Z+ D- U) w1 Xto setup-environment
   set mylist-environment[]
, z+ z2 o+ y# c% d  V   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
2 \4 v* e/ w$ f* o6 y  foreach  mylist-environment [if random-float 1 < 0.6
4 W- r/ o+ Z; Q                                                     [ set ?  -1 * ?]
                                                                        ]
end
6 C# g; x8 ?! M是针对已创建的列表，以0.6为概率对其中的每个item进行乘以-1的操作。从而形成新的列表，但set好像不行。

wjcpcahu

搞不定，郁闷中