在NetLogo中獲得最接近的鏈接

Question

獲得最接近netlogo中某個特定點的鏈接的最佳方式是什麼？

最好的將是一個鏈接記者link-distancexy接受一個xcor和並輸出從該點距離最近的鏈路上的一個點。接下來最好的將只是一個總記者closest-link-xy，它需要和xcor和並報告最接近的鏈接。

這個問題很複雜的包裝邊界，但不完善的解決方案仍將不勝感激。

Answer 1

吉姆·里昂的回答向我指出使用基本的三角幾何形狀的精確解：

to-report link-distance [ x y ] 
    let a [ distancexy x y ] of end1 
    let b [ distancexy x y ] of end2 
    let c link-length 
    let d (0 - a^2 + b^2 + c^2)/(2 * c) 
    if d > c [ 
    report a 
    ] 
    if d < 0 [ 
    report b 
    ] 
    report sqrt (b^2 - d^2) 
end 

這既適用於包裝和非包裝的世界。

Answer 2

此功能可能適用於您的目的。它使用鏈接VAR both-ends並從給定的點返回鏈路的長度和距離從鏈路的兩端的總和之間的區別：

to-report dist [ #x #y ] ;-- by link -- 
    report sum [distancexy #x #y] of both-ends - link-length 
end 

下面是一個短的測試程序，它顯示在行動。爲了達到最佳效果關閉包裝：

to test 
    clear-all 
    ask n-of 12 patches [ sprout 1 [ set color red ] ] 
    ask turtles [ create-links-with n-of 2 other turtles ] 
end 

to go ;-- by observer, forever -- 
    ask links [ set color gray ] 
    ask min-one-of links [dist mouse-xcor mouse-ycor] [ set color yellow ] 
    display 
end