跳过最后10行以便在csv文件中读取（未知行数）

Question

我知道skip

有read.csv()个选项

我知道如何跳过前10行，如下所示：

data2<-read.csv("book4.csv", skip=10, header=T)

跳过最后10行怎么样？

我的方法是

data2 <- data2[1:(dim(data2)[1]-10),]

还有其他方法吗？

由于

Answer 1

正如@Thomas建议您可以合并readLines和read.csv，例如：

df <- read.csv(text=paste0(head(readLines("file.csv"), -10), collapse="\n"))

但我不确定这种方法比你的data2 <- data2[1:(dim(data2)[1]-10),]更好。如果您的最后10行采用不同的格式并且中断read.csv，那将是更好的方法。

Answer 2

试试tihs：

data2 <- head(data2, -10)