csv - NETLOGO:查找目录中的所有csv文件并读取它们

Question

我不知道我的目录区有多少CSV文件。但是，我想将它们全部读入并保存在连续编号的全局变量中。

在 R 中，它看起来像这样:

datapath = "D:\\example"
files <- dir(datapath)

for (i in 1:length(files)) {
assign(paste("data",i, sep="_"), read.csv(paste(datapath,files[i], sep="\\"), header=FALSE))
}

这给了我几个名为 data_1、data_2、data_3、.... 的数据框

我怎样才能在 NETLOGO 中做同样的事情？？？我将 NetLogo 模型 (.nlogo) 和 CSV 文件 (.csv) 保存在同一个文件夹中。

Answer 1

您始终可以使用 R 扩展。

extensions[r]

然后您可以对 R 中的 csv 文件做任何您想做的事，然后在 netlogo 中取回数据或获取 csv 文件列表(这就是下面的示例所做的)。

r:eval "source(MyFunctionScript.r)"
r:eval "data = getDatafunction()"
let data r:get "data"

r 函数看起来像这样:

getDatafunction <- function(){
    datapath = "D:\\example"
    files <- dir(datapath)

    for (i in 1:length(files)) {
         assign(paste("data",i, sep="_"), read.csv(paste(datapath,files[i], sep="\\"), header=FALSE))
    }

    return(data)
}