题目:部分数据集展示如下,我现在能想到的分离办法就是写正则表达式,还有没有更方便的办法?
x <- c('2019-06-30 21:44:44', '2019-06-30 21:32:29', '2019-06-30 12:14:25')
N 版
y <- strptime(x, format = '%Y-%m-%d %H:%M:%S') format(y, '%Y')
## [1] "2019" "2019" "2019"
format(y, '%m')
## [1] "06" "06" "06"
T 版
lubridate::year(x)
## [1] 2019 2019 2019
lubridate::month(x)
## [1] 6 6 6