使用R将文件导入数组

时间:2013-02-28 19:02:35

标签: arrays r loops import

我有多个csv文件在一个文件夹中。每个csv文件包含一个包含200行和200列的表。我可以单独引入每个文件并将其显示为矩阵。我也可以做一个目录并列出它们所在文件夹中的每个文件。我需要做的是引入每个文件,打开它们然后将它们组合成一个数组。当我这样做时,虽然我收到警告说没有这样的文件。

我的代码是

x <- dir(path=" ", pattern = ".csv")
num <- array(0,dim=c(200,200,length(x)))
for(i in 1:length(x)){
  temp <- read.csv(x[i], skip=1)
  temp2 <- temp[,2]
  num[,i]<-temp2

}

这给了我警告

Error in file(file, "rt") : cannot open the connection
In addition: Warning message:
In file(file, "rt") :
  cannot open file 'test_1.csv': No such file or directory

同样,当我处理单个文件时,我可以很好地导入它们并列出它们并将它们作为矩阵打开。为什么我收到这个警告?为什么当我一次做一个而不是一次多个时,R能够找到我的文件?

1 个答案:

答案 0 :(得分:2)

首先,您确定正在将文件列表正确地读入变量x。我认为你的for循环存在一些问题。您还确定自己与这些文件位于同一目录中吗?在dir命令中,为" "变量输入path,我不确定这意味着什么。试试这个

> x <- dir(pattern = ".csv")
> num <- array(0,dim=c(200,200,length(x))) # in my case `length(x)` is 9.
> m <- matrix(rnorm(200*200),nrow=200,ncol=200) # generate some 200x200 matrix
> for(i in 1:length(x)){
    num[,,i] <- m # notice its num[,,i] and not num[,i]
}
> num[1:4,1:4,9]
           [,1]        [,2]       [,3]       [,4]
[1,] -1.5674073  0.05364477  0.8367233  1.7995047
[2,] -0.8613244  1.00400787 -0.2464169 -1.2897856
[3,] -0.7907845 -1.40617992  1.0596680 -0.5270983
[4,] -0.5206049  0.66253519  1.6820722  1.2017410