我正在尝试加载一些数据-CSV文件列表。下面的代码适用于我的其他数据集,但不适用于此数据集。
setwd("~/Dropbox/prime/word/data")
file.age <- setwd("~/Dropbox/prime/word/data")
age_names <- dir(file.age)
one <- do.call(bind_rows,lapply(age_names,read.csv))
我得到以下信息:
错误:!无法组合..1$Reaction.Time
和..2$Reaction.Time
。回溯:
- base::do.call(bind_rows,lapply(age_names,read.csv((
- dplyr(本地(
<fn>
(…( - vctrs:vec_rbind(!!!个点,.names_to=.id(
浏览一些数据。。。在";反应时间";列中有时有一个";"加载延迟";值而不是数值。。。这可能是问题所在吗?
如果是的话,有没有办法在进来的路上把它过滤掉?我试过附加"%>%filter(reaction_time!="LOADING DELAY"(;代码,但我遇到了同样的问题。
提前感谢!
我们可以在读取时将特定列的列类型指定为character
,然后它应该可以工作
library(dplyr)
library(readr)
library(purrr)
map_dfr(age_names, ~ read_csv(.x, col_types = cols(Reaction.Time = "c")))