列表项改变！

wjcpcahu

to setup-environment
   set mylist-environment[]
' Z  w; s7 k7 _* j: |; B5 H' I6 C   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
1 b1 D: }6 O- Z0 O0 R$ g) D# V, _end  

现在假设有一个概率p=0.6，mylist-environment中的每个元素都以这个概率改变，从1变成-1，或从-1变成1。从而形成一个新的列表，程序该怎么写呢？尝试了几下，没有成功，请大虾们赐教啊！

wjcpcahu

大概是这个意思
# y. p$ @2 ]6 pto setup-environment
- x- X8 h. Z, d: h& A   set mylist-environment[]
0 f/ a# b/ `0 a7 k* d. i   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
  foreach  mylist-environment [if random-float 1 < 0.6
! _3 I) y& |4 y8 c                                                     [ set ?  -1 * ?]
' [2 [% n7 \3 P! V                                                                        ]
9 L8 T3 ^/ u7 k& M. ~end
是针对已创建的列表，以0.6为概率对其中的每个item进行乘以-1的操作。从而形成新的列表，但set好像不行。

wjcpcahu

搞不定，郁闷中