求助

hx435027

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

hx435027

set-default-shape turtles "circle"  ;;设置海龟的形状
create-turtles m0 [set color blue  ;; 创建m0只海龟，每只的颜色为蓝色，大小为1
0 k% r: @' u" D% {# ^                              set size 1
                            ]
1 ?& T$ f2 K  K+ b   while [count links < e0]
& ^; g3 m( H$ Q. K: g) w+ _5 S3 N3 y        [     ;; 创建e0条边
            ask one-of turtles [create-link-with one-of other turtles]
$ W, _9 F5 n& T3 n8 E+ z        ]
  h$ L1 e1 C, f3 iask n-of M turtles [set color red]   ;;  随机地选择M只海龟，颜色为红色就当作是一个群