求助

hx435027

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

hx435027

set-default-shape turtles "circle"  ;;设置海龟的形状
create-turtles m0 [set color blue  ;; 创建m0只海龟，每只的颜色为蓝色，大小为1
$ f- s& B& T: K8 E3 h                              set size 1
                            ]
   while [count links < e0]
: [; _% H/ \7 X        [     ;; 创建e0条边
            ask one-of turtles [create-link-with one-of other turtles]
        ]
4 l3 T; t6 V; t: \ask n-of M turtles [set color red]   ;;  随机地选择M只海龟，颜色为红色就当作是一个群