對象未找到[R

Question

我創建了一個循環，通過一組文件進行迭代，並指定在文件中的數據給一個變量

for(i in 1:8){ 
    infile <-paste("coauthor", i,".csv",sep="") 
    coa[i]<-read.csv(infile,header = TRUE, sep="\t") 
} 

然而，我不斷收到錯誤交替

Error in read.table(file = file, header = header, sep = sep, quote = quote, : 
    object 'infile' not found 

並更頻繁地

Error in paste("coauthor", i, ".csv", sep = "") : object 'i' not found 

我在這裏錯過了什麼？

Answer 1

首先，不需要for循環。其次，如果你這樣做，你需要預先定義coa。第三，您必須適當地使用setwd(...)或read.csv(...)才能找到這些文件。

setwd("<directory with coauther files...>") 
# this just creates a bunch of files so we can read them back in... 
df <- data.frame(x=1:3, y=4:6, z=7:9) 
lapply(1:5, function(i)write.csv(df,paste0("coauthor",i,".csv"))) 

# this is the code that reads them in. This is all you need. 
coa <- lapply(1:5, function(i)read.csv(paste0("coauthor",i,".csv"))) 

注意coa現在是具有5個元素，每個包含的文件中的一個的內容的列表。

coa[1] 
# [[1]] 
# X x y z 
# 1 1 1 4 7 
# 2 2 2 5 8 
# 3 3 3 6 9