NetLogo中实现超市与配送中心一一无重复连接的技术咨询

问题根源 #

当前代码中，每个配送中心的海龟（粉色小车）在选择目标超市时，仅通过min-one-of supermarkets [distance myself]选取最近的超市，但没有标记已被配对的超市，导致多个配送中心可能选中同一个超市，出现重复连接的情况。

核心修改方案 #

给超市地块添加一个标记变量，记录该超市是否已被分配给配送中心，后续配送中心仅从未被分配的超市中选择目标，确保一对一唯一配对。

具体代码修改 #

1. 新增地块变量

在patches-own中添加标记变量，用于追踪超市的分配状态：

patches-own [ is-assigned? ] ; 标记超市是否已被分配给配送中心

2. 初始化超市的分配状态

修改setup-supermarkets过程，在创建超市时初始化标记为未分配：

to setup-supermarkets
  ;; 创建5x5绿色区域用于放置超市
  ask patches with[
    pxcor >= -2.5 and pxcor <= 2.5 and
    pycor >= -2.5 and pycor <= 2.5
  ] [
    set pcolor green
  ]
  
  ask n-of M patches with [pcolor = green] [
    set pcolor blue
    set is-assigned? false ; 初始化为未分配状态
  ]
 
  set supermarkets patches with [pcolor = blue]
end

3. 修改配送中心的目标选择逻辑

修改setup-distribution-centers过程，仅从未被分配的超市中选最近的目标，并标记该超市为已分配：

to setup-distribution-centers
  ask n-of M patches with [pcolor = black] [
    set pcolor red
    
    sprout 1 [
      set visited false
      set color pink
      set shape "car"
      set block patch-here
      ;; 筛选出未被分配的超市
      let available-supermarkets supermarkets with [not is-assigned?]
      ;; 从可用超市中选最近的作为目标
      set target min-one-of available-supermarkets [distance myself]
      ;; 标记选中的超市为已分配，避免重复配对
      ask target [ set is-assigned? true ]
    ]
  ]
  set distribution-centers patches with [pcolor = red]
end

4. 可选：处理超市与配送中心数量不匹配的情况

如果超市数量（M）和配送中心数量不一致，可能出现无可用超市的情况，可添加判断逻辑：

to setup-distribution-centers
  ask n-of M patches with [pcolor = black] [
    set pcolor red
    
    sprout 1 [
      set visited false
      set color pink
      set shape "car"
      set block patch-here
      let available-supermarkets supermarkets with [not is-assigned?]
      if any? available-supermarkets [
        set target min-one-of available-supermarkets [distance myself]
        ask target [ set is-assigned? true ]
      ] else [
        print "无可用超市可分配" ; 输出提示，或添加其他处理逻辑
      ]
    ]
  ]
  set distribution-centers patches with [pcolor = red]
end

修改后效果 #

每个超市只会被一个配送中心选中，实现一对一的唯一配对，彻底解决重复连接的问题，符合每周单配送中心对应单超市的需求。

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