read.table 返回额外的行

Question

我正在处理包含不同数量元素的许多长行的文本文件。行中的每个元素都由 \t 分隔，当然行由 \n 终止。我正在使用 read.table 来读取文本文件。示例文件如下：https://www.dropbox.com/s/6utslbnwerwhi58/samplefile.txt

示例文件有 60 行。

读取文件的代码：

sampleData <- read.table("samplefile.txt", as.is=TRUE, fill = TRUE);
dim(sampleData);

dim 返回 70 行，而实际上它应该是 60。当我尝试 nrows=60 时

sampleData <- read.table("samplefile.txt", as.is=TRUE, fill = TRUE, nrows = 60);
dim(sampleData);

它确实有效，但是，我不知道这样做是否会删除一些信息。我的怀疑是某些行的最后部分被添加到新行中。但是，我不知道为什么会这样，因为我有 fill = TRUE;

我也试过了

na.strings = "NA", fill=TRUE, strip.white=TRUE, blank.lines.skip = TRUE，stringAsFactors=FALSE，quote = ""，comment.char = ""

但无济于事。

有人知道会发生什么吗？

Answer 1

如果没有可重现的示例，请尝试以下操作：

# Make some fake data
R <- c("1 2 3 4","2 3 4","4 5 6 7 8")
writeLines(R, "samplefile.txt")

# read line by line
r <- readLines("samplefile.txt")

# split by sep
sp <- strsplit(r, " ")

# Make each into a list of dataframes (for rbind.fill)
sp <- lapply(sp, function(x)as.data.frame(t(x)))

# now bind
library(plyr)
rbind.fill(sp)

如果这与您的实际问题相似，无论如何。