r - 在 read.table() : incomplete final line found by readTableHeader

Question

当我尝试 read.csv() 时，我有一个 CSV该文件，我收到警告警告消息:

In read.table(file = file, header = header, sep = sep, quote = quote,  :
  incomplete final line found by readTableHeader on ...

尽管在 StackOverflow 和 R-help 中寻找解决方案，但我无法隔离问题。

这是数据的 Dropbox 链接:https://www.dropbox.com/s/h0fp0hmnjaca9ff/PING%20CONCOURS%20DONNES.csv

Answer 1

这不是 CSV 文件，每一行是一列，您可以手动解析它，例如:

file <- '~/Downloads/PING CONCOURS DONNES.csv'
lines <- readLines(file)
columns <- strsplit(lines, ';')
headers <- sapply(columns, '[[', 1)
data <- lapply(columns, '[', -1)
df <- do.call(cbind, data)
colnames(df) <- headers
print(head(df))

请注意，您可以忽略警告，因为缺少最后一个行尾。