求助

hx435027

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

hx435027

set-default-shape turtles "circle"  ;;设置海龟的形状
6 O6 A: [: E( v; Bcreate-turtles m0 [set color blue  ;; 创建m0只海龟，每只的颜色为蓝色，大小为1
                              set size 1
6 L- L* V5 t  Z/ y2 g                            ]
9 \$ f/ W0 p7 I# R   while [count links < e0]
        [     ;; 创建e0条边
            ask one-of turtles [create-link-with one-of other turtles]
( p1 y$ K# k2 X, U        ]
) Z4 a9 j. g# [' b( Uask n-of M turtles [set color red]   ;;  随机地选择M只海龟，颜色为红色就当作是一个群