遍历 Netlogo 中的列表

Question

在这里旋转我的轮子！

• 我正在使用我想放入 NetLogo 的 20K 节点网络（最终目标是对 model 库的简单病毒营销模型进行旋转）（让这个工作得很好！）

• 我已经使用 Python 预煮了我想在 Netlogo 中工作的特定节点。 例如，这是我的图中按介数中心度排列的前 20 个节点的列表： set nodelist ["73647" "52658" "78667" "97632" "22987" "101425" "97788" "15439" "46269" "45942 ""46016""95372""83259""22757""91392""101355""12915""905""95940""88071"]

• 这些节点代表我图中的前 20 个节点，按中介中心性降序排列（在 Python Networkx 中大约需要 25 分钟才能得到这个）

所以，我想做的是：

1. 对于一个称为预算 (n,0-19) 的任意数字，取第一个 n
   node_ids 来自 nodelist（海龟自己的变量称为 node_id）

2. 查找与 node_id 匹配的对应 Who

3. 用 Who number 询问海龟做某事，例如，[set 采用？ =真]

非常感谢任何帮助或建议！

Answer 1

您可以通过许多不同的方式查看列表。 一种是使用“foreach”命令。 另一种方法是对索引号使用显式循环，从零开始。

这是他们两个的演示。 “setup”运行setup“go”一旦找到项目并使它们变大并显示它们的标签“go”再次使它们再次变小。

globals [ NUMTURTLES BUDGET NODELISTSIZE nodelist ]
turtles-own [ adopt?  node_id]

to setup
  clear-all
  let rseed random 999999;
  print (word "random seed being used for this run is : " rseed );
  random-seed rseed;
  
  ;; globals or sliders, low values to see what's going on
  set BUDGET random  5;  ( 0 to 19 )
  set NUMTURTLES    30;
  set NODELISTSIZE  10; ;; something bigger than BUDGET!
  
  print (word "BUDGET = " BUDGET );
  
  
  create-turtles NUMTURTLES 
      [ setxy random-xcor random-ycor  
        set adopt? false 
        set node_id random 999999
       ]
  
  set nodelist [];
  ask N-of NODELISTSIZE turtles [ set nodelist lput node_id nodelist ]
  show nodelist;
  
  reset-ticks
end

to go
  if ( ticks = 0)
  [    ;; option #1: make a sublist and use the "foreach" command to walk down it
       let worklist sublist nodelist 0 BUDGET
       show worklist
       foreach worklist [ 
             a -> print (word "next item in worklist " a)
         ask one-of turtles with [ node_id = a ] [ set adopt? true set size 3 set label a]
          ]
  ]
  
  ;; undo the above a different way
  
  if ( ticks = 1 )  
  [   ;; option #2:  use effectively for i = 0 to BUDGET to process list item i
      ;; do NOT forget the "set i ( i + 1 )" or this will run forever! 
      let i 0
      repeat BUDGET [
      let b item i nodelist
      print (word "item " i " which is " b " will be undone");
      ask one-of turtles with [ node_id = b ] [ set adopt? false set size 1 ]
      set i ( i + 1 )
      ]
    
  ]
  tick
end