访问其他代理的列表

Question

我有两个所有代理制作的列表。我希望一位代理人查看代理人，看他的代理人号码是否在其他代理人的名单中。如果他在另一名代理人的名单中找到他的号码，他必须复制另一名代理人的号码。怎么样？

if attracted != nobody [set attractinglists fput ([who] of attracted) attractinglists] 

if attracted != nobody [set attrlists fput ([who] of attracting) attrlists] 

to-report contains-any? 
let attrlistss [attrlists] of myself 
if attractinglists != nobody [foreach attractinglists [if member? ? attrlistss [report true]] report false] 
end 

let lisstt list self contains-any? 

Answer 1

这听起来像每个乌龟都想有一个乌龟的龟的列表ID，他们被吸引到其他龟类的名单。这是一个简单的模型，可能会为您提供指导。一般来说，你不应该使用谁号码，这种模式不会。

turtles-own [ 
    attracted-to 
    attracted-to-me 
] 

to setup 
clear-all 
reset-ticks 
create-turtles 100 
ask turtles [ 
    ; each turtle picks 20 random turtles to be attracted to. 
    set attracted-to n-of 20 other turtles 
] 
end 

to go 
ask turtles [ 
    set attracted-to-me [self] of other turtles with [member? myself attracted-to] 
] 
ask turtles [show attracted-to-me] 
end 

希望这会有所帮助。