列表项改变！

wjcpcahu

to setup-environment
   set mylist-environment[]
   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
' c# }8 ]% Q' p1 uend  
% l2 N6 E* c7 @* c3 K1 |5 Z
* s/ ~5 J# S$ ], k9 p现在假设有一个概率p=0.6，mylist-environment中的每个元素都以这个概率改变，从1变成-1，或从-1变成1。从而形成一个新的列表，程序该怎么写呢？尝试了几下，没有成功，请大虾们赐教啊！

wjcpcahu

大概是这个意思
+ s7 E8 \) k( |/ `- ]to setup-environment
% ^" T8 d* Z. |) x1 n  F( h/ t! k   set mylist-environment[]
' Z/ {8 M% e  z# s! `   set mylist-environment n-values 50 [ifelse-value (random-float 1 < 0.5) [-1][1] ]      
  foreach  mylist-environment [if random-float 1 < 0.6
' Q1 z# I% {+ g# J                                                     [ set ?  -1 * ?]
8 ^( v/ \* ~' ]+ C  y. N                                                                        ]
- z- f# J/ I1 @- Y+ {+ H$ A, r: iend
; J# N$ b: ^6 Q7 v/ s. u: }是针对已创建的列表，以0.6为概率对其中的每个item进行乘以-1的操作。从而形成新的列表，但set好像不行。

wjcpcahu

搞不定，郁闷中