我正在尝试创建一个作为“静态”单元在环境中移动的网络,即模拟中除了整体的位置和方向外没有任何变化,各个海龟相对于彼此的位置和方向由它们固定链接。海龟通过无向链接连接,这些链接被绑定并设置为“固定”绑定模式。
问题在于,在某些情况下,链路无法保持固定,链路长度开始发生变化。最初我注意到,在平均网络度数相对较低或网络是完整图的情况下,tie 原语起作用。然而,当创建链接以生成适度连接的图时,海龟之间的链接长度开始发生变化。经过进一步的实验,我可以创建一个具有相同数量的链接和海龟但配置不同的网络,即网络结构不同,有时会保持位置和链接长度,但在其他情况下则无法做到。
无论网络的连接程度或网络的配置如何,如何让网络作为一个单元移动?请参阅下面的示例代码,我在最后添加了代码,您可以在其中运行具有 6 个海龟和 6 个链接的网络的多个配置来亲自查看问题,尝试运行至少六次迭代。谢谢!
这产生了一个作为一个单元移动的网络
to setup
create-turtles 10
ask turtles [fd 2]
ask turtles [create-links-with other turtles [tie] ]
ask links [set tie-mode "fixed"]
reset-ticks
create-turtles 10
ask turtles [fd 2]
ask turtles [create-links-with other turtles [tie] ]
ask links [set tie-mode "fixed"]
reset-ticks
end
to go
ask turtles [lt 1 fd 1]
end
这会产生一个网络,其链接仍被绑定并设置为“固定”绑定模式,但会更改它们的链接长度。要求终止的链接越多,链接长度的变化就越大。
to setup
clear-all
create-turtles 10
ask turtles [fd 2]
ask turtles [create-links-with other turtles [tie] ]
ask links [set tie-mode "fixed"]
ask one-of links [die]
reset-ticks
end
to go
ask turtles [lt 1 fd 1]
end
这是显示链接长度更改的特定实例的附加代码。当按钮“use-seed-from-user”提示时,请输入种子 659269695。抱歉,如果代码笨拙,第一次使用随机种子。“打印长度”按钮是确认长度改变。
;USE seed: 659269695
to use-new-seed
let my-seed new-seed ;; generate a new seed
output-print word "Generated seed: " my-seed ;; print it out
random-seed my-seed ;; use the new seed
reset-ticks
end
;; Use a seed entered by the user
to use-seed-from-user
loop [
let my-seed user-input "Enter a random seed (an integer):"
carefully [ set my-seed read-from-string my-seed ] [ ]
ifelse is-number? my-seed and round my-seed = my-seed [
random-seed my-seed ;; use the new seed
output-print word "User-entered seed: " my-seed ;; print it out
reset-ticks
stop
] [
user-message "Please enter an integer."
]
]
end
to setup
clear-all
create-turtles 6
ask turtles [
fd 5
set shape "circle"
set size 1
set color yellow
if count links < 7 [ask one-of turtles [create-link-with one-of other turtles
[tie]]]]
reset-ticks
end
to go
ask turtles [lt 1 fd 1]
end
to print-lengths
print sort-by < [precision link-length 2] of links
end