合并 csv 文件时带引号的字符串警告中的 EOF
EOF within quoted string warning when merging csv files
我有 70 多个 CSV 文件,我正在尝试按行合并它们(它们都有相同的列)。我尝试使用此代码将它们组合起来:
library(tidyverse)
library(plyr)
library(readr)
setwd("*\data")
myfolder="test"
allfiles= list.files(path=myfolder, pattern="*.csv", full.names = T)
allfiles
combined_csv= ldply(allfiles, read.csv)
一旦我 运行 此代码,我就会收到一条警告消息:
Warning message:
In scan(file = file, what = what, sep = sep, quote = quote, dec = dec, :
EOF within quoted string
看起来我丢失了一些行。我该如何解决这个问题?
试试这个:
library(dplyr)
library(readr)
myfolder="test"
df <- list.files(path=myfolder, full.names = TRUE) %>%
lapply(read_csv) %>%
bind_rows
不同文件中的相同列可能被读取为不同的类型,因为其中一些具有一些 'character' 元素而一些只是数字。这是一种方法,可以读取指定为“字符”列的所有列,rbind
元素,然后使用 type.convert
根据其具有的值自动转换列 类
library(data.table)
out <- rbindlist(lapply(list.files(path=myfolder, full.names = TRUE),
fread, colClasses = "character"))
out <- type.convert(out, as.is = TRUE)
我有 70 多个 CSV 文件,我正在尝试按行合并它们(它们都有相同的列)。我尝试使用此代码将它们组合起来:
library(tidyverse)
library(plyr)
library(readr)
setwd("*\data")
myfolder="test"
allfiles= list.files(path=myfolder, pattern="*.csv", full.names = T)
allfiles
combined_csv= ldply(allfiles, read.csv)
一旦我 运行 此代码,我就会收到一条警告消息:
Warning message:
In scan(file = file, what = what, sep = sep, quote = quote, dec = dec, :
EOF within quoted string
看起来我丢失了一些行。我该如何解决这个问题?
试试这个:
library(dplyr)
library(readr)
myfolder="test"
df <- list.files(path=myfolder, full.names = TRUE) %>%
lapply(read_csv) %>%
bind_rows
不同文件中的相同列可能被读取为不同的类型,因为其中一些具有一些 'character' 元素而一些只是数字。这是一种方法,可以读取指定为“字符”列的所有列,rbind
元素,然后使用 type.convert
根据其具有的值自动转换列 类
library(data.table)
out <- rbindlist(lapply(list.files(path=myfolder, full.names = TRUE),
fread, colClasses = "character"))
out <- type.convert(out, as.is = TRUE)