Question

我正在使用示例Flocking代码作为示例，如果有人熟悉的话

NLCommand("set population 1")
NLCommand("setup")
nruns <- 10
timedata <- list()
for(i in 1:nruns) {
NLCommand("go")
timedata[[i]] <- NLGetAgentSet(c("who","xcor","ycor"),"turtles",
as.data.frame=T,df.col.names=c("who","xcor","ycor")) }
timedata

问题是它为每个模型迭代生成新的标头。所以我得到以下内容而不是仅出现一次的标题：

[[1]]
 who     xcor      ycor
1   0 34.56833 -26.47777

[[2]]
 who     xcor      ycor
1   0 35.19765 -25.70063

非常感谢任何帮助

Answer 1

在http://groups.yahoo.com/neo/groups/netlogo-users/conversations/topics/15551（OP问同一个问题）上有很好的讨论和答案。 NetLogo R扩展的作者Jan Thiele写道：

如果你真的想在R中拥有所有的乌龟坐标，那么更合适的函数是NLGetAgentSet并在循环中执行此操作。我编写了一个RNetLogo包附带的教程（请参阅RNetLogo安装目录）。第11.5章（时间滑动可视化）中有一个例子，其中完成了类似的事情。使其适应植绒模型，它可能如下所示：[...]

我想使用RNetLogo包从NetLogo中提取坐标数据

1 个答案: