【发布时间】:2016-01-21 10:02:58
【问题描述】:
我在一个文件夹中有 7 个 .csv 文件(每个代表一个位置 - Site1、Site2、Site3...Site7),每个 .csv 文件包含 5 列:ID、月份、年份、物种(大约 30 个级别;不同的物种),值(1、2、3、4 - 每个数字代表开花的强度)。我不想将所有文件组合在一起,因为它们包含不同的物种和 ID,但我想应用相同的代码来执行大量剪切、插值并为所有文件创建时间序列的命名列表。最后,代码给出了每个物种的时间序列列表。目前,我创建了一个只能应用于一个站点的代码。
data_list <- list() #create a list to fill in later
for(sp in levels(Site1$Species)){
dat.sp <- Site1[Site1$Species == sp,] # Distinguish between all Species
tree_list <- list()
for (i in unique(dat.sp$ID)){
other bit of code that cuts the data,
interpolates it and makes it as time
series.
data_list[[sp]]<-tree_list
我应该如何创建循环以对每个站点运行相同的代码?
【问题讨论】:
-
lapply()在文件名向量上使用适用于构建结果的一个文件的函数。lapply()的结果是结果列表。