列表项改变！

wjcpcahu

to setup-environment
   set mylist-environment[]
0 p0 `6 v$ F- Y9 x  K   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
7 i0 A4 z2 U- t: W, H6 tend  
! Z9 \2 c* f; S. N7 v
5 _8 p) M( f% H, l+ D4 W: }. G/ w现在假设有一个概率p=0.6，mylist-environment中的每个元素都以这个概率改变，从1变成-1，或从-1变成1。从而形成一个新的列表，程序该怎么写呢？尝试了几下，没有成功，请大虾们赐教啊！

wjcpcahu

大概是这个意思
. ]  j) h5 J# c( j4 Y& Q! Kto setup-environment
. m1 G, n( k5 ]  T   set mylist-environment[]
   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
( j8 G! T) H: ]# g5 Q  foreach  mylist-environment [if random-float 1 < 0.6
6 V; f' y/ Z: A* X/ I9 t                                                     [ set ?  -1 * ?]
                                                                        ]
5 f  w. @1 Z9 r2 h1 r5 b* o7 I% t2 rend
/ V9 w1 d; c  m* p是针对已创建的列表，以0.6为概率对其中的每个item进行乘以-1的操作。从而形成新的列表，但set好像不行。

wjcpcahu

搞不定，郁闷中