论坛 › NetLogo › 网络边的平均距离

qy987 发表于 2008-11-12 02:09:33

网络边的平均距离

请教在netlogo中
对于一个非完全连接的网络
如何求它的平均节点距离
即如何计算以及如何网络边的总长度，再以之除网络边的总数

qy987 发表于 2008-11-12 02:13:48

继续

我写的这个计算语句，调试时通过，但是运行时出现了不知名的错误
请达人帮我指出错误好改进

to find-distance
let i 0
let nodedistance 0
let linknumber 0
while
[
if link-neighbor? turtle i
    of turtle i))
   set linknumber (linknumber + count of turtle i)]
if linknumber != 0
[
set average-node-distance (nodedistance / linknumber)
]
set i i + 1
]
end

[ 本帖最后由 qy987 于 2008-11-12 02:18 编辑 ]

qy987 发表于 2008-11-12 09:24:44

供参考

我新调试好的程序如下，应该是对的，供参考
因为特殊要求，这里的边的长度是二维座标内的空间距离

to find-distance
let i 0
let j 0
let nodedistance 0
let linknumber 0

   while
   [
       while
          [if link-neighbor? turtle i
                        
                        ask turtle j of turtle i]
                        ]
            set i i + 1
      ]
   set j j + 1
]
set average-path-length nodedistance / (linknumber * 2)
end

查看完整版本: 网络边的平均距离