跳过最后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

试试看:

data2 <- head(data2, -10)