NetLogo海龟配对孵化后死亡异常：启动即全死亡排查

核心问题 #

你的海龟在第一个tick全部死亡，主要源于以下代码逻辑错误：

1. 海龟可能将自己选为配对同伴 #

partner-up过程中，turtles-at 0 0会包含当前执行操作的海龟自身。当该斑块没有其他未配对海龟时，one-of (turtles-at 0 0) with [ not partnered? ]会选中海龟自己，导致它被标记为partnered? true，最终在death过程中被杀死。

2. 配对后未避免重复孵化（加剧逻辑混乱） #

所有已配对的海龟都会执行birth中的孵化操作，同一对的两只海龟会重复触发孵化，同时误配对自己的海龟也会执行孵化，最终全部进入死亡流程。

修复代码 #

ask turtles [
    partner-up
  ]
  birth
  death
  tick
end


to partner-up
  if (not partnered?) [
    rt (random-float 90 - random-float 90) fd 1
    ; 排除自身，仅寻找同斑块未配对的其他海龟
    let potential-partners other turtles-here with [ not partnered? ]
    if any? potential-partners [
      set partner one-of potential-partners
      set partnered? true
      ask partner [
        set partnered? true
        set partner myself
      ]
    ]
  ]
end

to birth
  ; 仅让每对中的一只海龟执行孵化，避免重复操作
  let paired-leaders turtles with [ partnered? and who < [who] of partner ]
  ask paired-leaders [
    calculate-score
    hatch (score + 1)
  ]
end

to death
  let partnered-turtles turtles with [ partnered? ]
  ask partnered-turtles [
    die
  ]
end

关键修改说明 #

• 排除自身配对：用other turtles-here替代turtles-at 0 0，确保只寻找同斑块的其他海龟，彻底避免选中自己的情况。
• 避免重复孵化：通过who < [who] of partner筛选每对中的一只海龟执行孵化，防止同一对两只海龟重复触发孵化逻辑。
• 严谨配对判断：只有当存在潜在同伴时才执行配对操作，避免partner为nobody时仍标记为已配对的错误。

内容的提问来源于stack exchange，提问作者Deffo