我有多个字符列(大约 20 个),我想将它们全部更改为日期格式并使用 r 删除时间。我尝试过循环
、变异
和应用
。
这是一些仅使用两列的示例数据
col1 = c("2017-04-01 23:00:00", "2017-03-03 00:00:01", "2017-04-02
00:00:01")
col2 = c("2017-04-10 08:41:49", "2017-04-10 08:39:48", "2017-04-10
08:41:51")
df <- cbind(col1, col2)
我已经尝试过:
df <- df %>% mutate(df, funs(ymd))
和
df <- df %>% mutate(df, funs(mdy))
两者都给了我一个错误。我还尝试将所有列名称放入列表中并执行
for(i in namedlist) {
as_date(df[i])
glimpse(df)
}
这也不起作用。
我尝试使用 Convert multiple columns to dates with lubridate and dplyr 中的答案但这也不起作用。该帖子希望转换某些变量。我希望转换所有变量,以便 var
命令不适用。
有什么建议可以有效地做到这一点吗?谢谢。
最佳答案
如果您要应用到所有列,则可以使用 lapply
进行一次非常简短的调用。我将使用 data.table
将其传递到此处:
library( data.table )
setDT( df )
df <- df[ , lapply( .SD, as.Date ) ]
根据您的测试数据,这给出:
> df
col1 col2
1: 2017-04-01 2017-04-10
2: 2017-03-03 2017-04-10
3: 2017-04-02 2017-04-10
注意:您的测试数据实际上会生成一个 matrix
,因此您需要首先将其转换为 data.frame
(或直接转换为 data.frame)。表
)。
您可以仅使用基本的R
做同样的事情,但我个人更喜欢上面的解决方案:
df <- as.data.frame( lapply( df, as.Date ) )
> df
col1 col2
1 2017-04-01 2017-04-10
2 2017-03-03 2017-04-10
3 2017-04-02 2017-04-10
关于r - 将多个字符列更改为日期,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/48501059/