列表项改变！

wjcpcahu

to setup-environment
1 K' S1 D( s2 C2 K: T. G2 V   set mylist-environment[]
   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
4 @; |. n4 ?' D( u* T/ Z* yend  
, E% W: f: j5 S0 d
现在假设有一个概率p=0.6，mylist-environment中的每个元素都以这个概率改变，从1变成-1，或从-1变成1。从而形成一个新的列表，程序该怎么写呢？尝试了几下，没有成功，请大虾们赐教啊！

wjcpcahu

大概是这个意思
to setup-environment
8 ?) \8 X+ m% h$ W1 g   set mylist-environment[]
6 [% I2 d" O1 e; O+ V# L   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
. U5 q9 b  p8 y. }+ m1 Y  foreach  mylist-environment [if random-float 1 < 0.6
+ D2 E) X! {% c5 V! e! L                                                     [ set ?  -1 * ?]
4 _4 O4 k, E, @) G# L  b6 X                                                                        ]
6 n; f" G4 K4 A; m$ u- N5 h( s" oend
是针对已创建的列表，以0.6为概率对其中的每个item进行乘以-1的操作。从而形成新的列表，但set好像不行。

wjcpcahu

搞不定，郁闷中