列表项改变！

wjcpcahu

to setup-environment
   set mylist-environment[]
+ v  S; ]0 K! N+ s4 [   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
end  
/ \3 s; j" ~6 p" c. e' R
- f% @; r8 w$ K0 o现在假设有一个概率p=0.6，mylist-environment中的每个元素都以这个概率改变，从1变成-1，或从-1变成1。从而形成一个新的列表，程序该怎么写呢？尝试了几下，没有成功，请大虾们赐教啊！

wjcpcahu

大概是这个意思
) C/ \. I% E! M) W* Zto setup-environment
   set mylist-environment[]
   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
! J2 N4 A) @( J" A) H( i# K  foreach  mylist-environment [if random-float 1 < 0.6
; S; k% m1 Z% ~  W3 `) g6 g                                                     [ set ?  -1 * ?]
                                                                        ]
  a3 u$ [% J( s* j4 c- ?5 Send
+ y) n  l  A; T. b; N是针对已创建的列表，以0.6为概率对其中的每个item进行乘以-1的操作。从而形成新的列表，但set好像不行。

wjcpcahu

搞不定，郁闷中