求助

hx435027

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

hx435027

set-default-shape turtles "circle"  ;;设置海龟的形状
% w: l& |# q  c( m5 p; j1 hcreate-turtles m0 [set color blue  ;; 创建m0只海龟，每只的颜色为蓝色，大小为1
1 Q& H, [/ D; x                              set size 1
                            ]
$ B2 G' d2 h( f* D/ O1 @   while [count links < e0]
7 J% ~+ N0 M, t2 S% c  ]9 v$ e        [     ;; 创建e0条边
            ask one-of turtles [create-link-with one-of other turtles]
        ]
, c5 |$ R( v2 K: C2 {ask n-of M turtles [set color red]   ;;  随机地选择M只海龟，颜色为红色就当作是一个群