列表项改变！

wjcpcahu

to setup-environment
   set mylist-environment[]
9 d. g2 y1 E% G9 a! n/ z. N   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
end  
, H( Y/ X# q* x' a+ t' [7 T
; E8 A8 Q6 ^- Q* d; ]现在假设有一个概率p=0.6，mylist-environment中的每个元素都以这个概率改变，从1变成-1，或从-1变成1。从而形成一个新的列表，程序该怎么写呢？尝试了几下，没有成功，请大虾们赐教啊！

wjcpcahu

大概是这个意思
  T1 C5 \& m5 m$ Z* \& d1 V  Eto setup-environment
   set mylist-environment[]
0 q, ]3 V; M8 B2 ^  R2 W( p   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
1 B( |6 Y! ~# |- V$ t4 ^0 e  foreach  mylist-environment [if random-float 1 < 0.6
                                                     [ set ?  -1 * ?]
" O9 ], k$ ]! [- ?4 m% l                                                                        ]
end
是针对已创建的列表，以0.6为概率对其中的每个item进行乘以-1的操作。从而形成新的列表，但set好像不行。

wjcpcahu

搞不定，郁闷中