如何在NetLogo中为Turtle与所属Patch创建链接或绘制包围线？

一、关于海龟与补丁的链接问题 #

NetLogo的链接机制只支持同类型主体间创建链接：要么是海龟（turtle）之间，要么是补丁（patch）之间，跨类型的海龟和补丁无法直接用create-links-with建立链接。

其实你已经通过patch-owner（补丁记录所属海龟）和my-patches（海龟筛选自己的补丁）实现了两者的关联，完全不需要额外创建链接。后续海龟要操作自己的补丁，直接调用my-patches即可；补丁要找所属海龟，用patch-owner就行，这种关联方式比链接更直接高效。

二、绘制海龟所属补丁的包围线 #

要实现包围线，最简洁的方式是利用NetLogo的convex-hull命令，它能自动计算一组补丁的凸包顶点，然后基于这些顶点绘制闭合线条。以下是修改后的完整代码：

patches-own [
  state 
  patch-owner  
]

turtles-own [
  property 
]

to setup
  clear-all
  create-turtles 10 [
    move-to one-of patches with [not any? turtles-here]
    set color random 14 + 1 ; 给每个海龟设置不同颜色，方便区分包围线
  ]
  setup-patches
  draw-ownership-bounds ; 替换原来的set-ownership
end

to setup-patches
  ask patches [
    let closest-turtle min-one-of turtles [distance myself]
    set patch-owner closest-turtle
    set color [color] of closest-turtle - 2 ; 补丁颜色比所属海龟稍暗，直观区分归属
  ]
end

to draw-ownership-bounds
  ask turtles [
    let my-patches patches with [patch-owner = myself]
    ; 计算补丁集合的凸包顶点坐标列表
    let hull convex-hull my-patches
    ; 凸包至少需要3个点才能形成闭合区域
    if length hull >= 3 [
      ; 创建临时海龟绘制包围线
      create-turtles 1 [
        set color [color] of myself
        set pen-size 2
        pen-down
        ; 沿着凸包顶点移动画线
        foreach hull [
          move-to ?
        ]
        move-to first hull ; 回到起点，闭合线条
        pen-up
        die ; 完成绘制后删除临时海龟
      ]
    ]
  ]
end

关键代码说明 #

• convex-hull my-patches：接收一组补丁，返回该组补丁构成区域的凸包顶点坐标列表（每个元素对应一个补丁的位置）。
• 临时海龟绘制：通过创建临时海龟完成画线操作，避免影响原有主体，绘制完成后自动删除临时海龟。
• 颜色关联：给海龟和所属补丁设置相近颜色，让归属关系更直观。

如果需要非凸区域的精确轮廓，可以借助NetLogo的edges扩展，但convex-hull是最通用的方案，适合大多数场景。

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