流量问题,Netlogo
Flow issue, Netlogo
以下代码行告知海龟(入店行窃者)是否 1) 他们对风险的感知低到足以尝试入店行窃,以及 2) 他们是否因入店行窃而被捕。
如果风险感知为 60 或以下并且他们之前没有被阻止入店行窃,他们会尝试入店行窃。
- 98% 的尝试都成功了。
- 在 2% 的失败尝试中,5% 的尝试被阻止了。入店行窃没有成功,也没有任何影响。
- 在未被阻止的 95% 中,这些商店扒手中有 99% 被安全人员逮捕。
- 1% 的入店行窃者因安全逃脱而被捕,因此成功入店行窃。
忧虑有两个作用。对于被抓住的入店行窃者,97% 的非专业入店行窃者的恐惧让他们不再入店行窃。对于打算以同一家商店为目标的多达 5 名潜在入店行窃者,他们对该商店入店行窃风险的感知增加了 5。
我的问题是:explanation/code 旁边有星号的那一行,这样行吗?我正在努力提高与被逮捕的海龟共享同一目标商店的海龟的风险感知。
to number-shoplifts
ask shoplifters [ if [pcolor] of patch-here = lime and
perception-of-risk <= 60 and forever-deterred = 0
[ifelse (random-float 1 < 0.98) [
set successful-shoplifts successful-shoplifts + 1 ]
[ifelse (random-float 1 < 0.05) [
set successful-shoplifts successful-shoplifts + 0 ]
[ifelse (random-float 1 < 0.99 ) [
set security-apprehension security-apprehension + 1
if professional = 0 and (random-float 1 < 0.97) [set forever-deterred 1]
*** ask n-of 5 shoplifters [if target-store = patch-here [ set perception-of-risk perception-of-risk + 5 ]]
]
[set successful-shoplifts successful-shoplifts + 1 ]
]]]]
end
测试此类功能是否有效的最简单方法是添加一些可见的更改。将指示的行替换为:
ask n-of 5 shoplifters
[ write target-store write " with risk " print perception-of-risk
if target-store = patch-here
[ set perception-of-risk perception-of-risk + 5
set color red
show perception-of-risk ]
]
我们的想法是让一些输出告诉您正在发生的事情。
以下代码行告知海龟(入店行窃者)是否 1) 他们对风险的感知低到足以尝试入店行窃,以及 2) 他们是否因入店行窃而被捕。
如果风险感知为 60 或以下并且他们之前没有被阻止入店行窃,他们会尝试入店行窃。
- 98% 的尝试都成功了。
- 在 2% 的失败尝试中,5% 的尝试被阻止了。入店行窃没有成功,也没有任何影响。
- 在未被阻止的 95% 中,这些商店扒手中有 99% 被安全人员逮捕。
- 1% 的入店行窃者因安全逃脱而被捕,因此成功入店行窃。
忧虑有两个作用。对于被抓住的入店行窃者,97% 的非专业入店行窃者的恐惧让他们不再入店行窃。对于打算以同一家商店为目标的多达 5 名潜在入店行窃者,他们对该商店入店行窃风险的感知增加了 5。
我的问题是:explanation/code 旁边有星号的那一行,这样行吗?我正在努力提高与被逮捕的海龟共享同一目标商店的海龟的风险感知。
to number-shoplifts
ask shoplifters [ if [pcolor] of patch-here = lime and
perception-of-risk <= 60 and forever-deterred = 0
[ifelse (random-float 1 < 0.98) [
set successful-shoplifts successful-shoplifts + 1 ]
[ifelse (random-float 1 < 0.05) [
set successful-shoplifts successful-shoplifts + 0 ]
[ifelse (random-float 1 < 0.99 ) [
set security-apprehension security-apprehension + 1
if professional = 0 and (random-float 1 < 0.97) [set forever-deterred 1]
*** ask n-of 5 shoplifters [if target-store = patch-here [ set perception-of-risk perception-of-risk + 5 ]]
]
[set successful-shoplifts successful-shoplifts + 1 ]
]]]]
end
测试此类功能是否有效的最简单方法是添加一些可见的更改。将指示的行替换为:
ask n-of 5 shoplifters
[ write target-store write " with risk " print perception-of-risk
if target-store = patch-here
[ set perception-of-risk perception-of-risk + 5
set color red
show perception-of-risk ]
]
我们的想法是让一些输出告诉您正在发生的事情。