用 fread 替换 read.csv 后的 R 出现不正确的维数错误

Question

我正在加载我的 csv 文件：

baseData <- read.csv(datafile)

但由于我想加载更大的数据集，我已移至 data.table package

baseData <- fread(input = paste("zcat < ", datafile, sep=""))

似乎一切正常，数据加载速度更快，但是当我点击以下行时：

d <- baseData[baseData$some_prop==0,]
d <- d[!is.na(d[,"col"]) & (d[,"col"] == 0 | d[,"col"] == 1),]

incorrect number of dimensions 出现错误

使用read.csv 时一切正常。 知道会出什么问题吗？

Answer 1

在 data.table 中，子集的 j 部分旨在返回一个新值，并且不应引用列名，否则您将得到该值。

例子：

>d<-data.table(A=1:5,B=5:10)
> d[,A]
[1] 1 2 3 4 5 1
> d[,B]
[1]  5  6  7  8  9 10
> d[,"B"]
[1] "B"

因此，对于您的特殊情况，删除列名周围的引号应该可以解决错误。

如果您的代码很长并且使用data.frame 方法，您可以使用setDF(d) 使其在重构之前按原样运行。

完整地说，出现错误是因为您的逻辑语句的长度为 1（"col" == whatever 只返回一个值 TRUE 或 FALSE），与 data.table 对象的行数不匹配。