求助

hx435027

在一个初始有m0个节点e0条边的网络中，怎么样用程序实现在每个时间步里随机选取M个（M〈 m0 ）节点作为一个群。程序是在Netlogo里实现

hx435027

set-default-shape turtles "circle"  ;;设置海龟的形状
  f3 N" }5 N$ vcreate-turtles m0 [set color blue  ;; 创建m0只海龟，每只的颜色为蓝色，大小为1
                              set size 1
* U- i  s5 k6 @! Y6 J+ y$ [                            ]
   while [count links < e0]
1 x. q( h6 x# |7 J9 g        [     ;; 创建e0条边
( I6 m" f' C% b  }6 }, b+ t! v            ask one-of turtles [create-link-with one-of other turtles]
        ]
ask n-of M turtles [set color red]   ;;  随机地选择M只海龟，颜色为红色就当作是一个群