列表项改变！

wjcpcahu

to setup-environment
% o' X! h  f. [' k' @. B   set mylist-environment[]
   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
end  
; T8 T* D/ n: L4 ]# }5 h
! u; k% k4 r. e4 a7 M* p现在假设有一个概率p=0.6，mylist-environment中的每个元素都以这个概率改变，从1变成-1，或从-1变成1。从而形成一个新的列表，程序该怎么写呢？尝试了几下，没有成功，请大虾们赐教啊！

wjcpcahu

大概是这个意思
to setup-environment
$ w' e  R8 [  R: a. p5 R+ [   set mylist-environment[]
   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
  foreach  mylist-environment [if random-float 1 < 0.6
                                                     [ set ?  -1 * ?]
: L# q5 t6 [& H* f( K) K4 U: a1 x                                                                        ]
7 u" Y# l6 A- y2 `1 d9 aend
! E& ~0 I) g& Q0 @: B0 N, N是针对已创建的列表，以0.6为概率对其中的每个item进行乘以-1的操作。从而形成新的列表，但set好像不行。

wjcpcahu

搞不定，郁闷中