将"0000“转换为R中的lubridate
将"0000“转换为R中的lubridate
提问于 2018-03-13 14:27:18
看起来很简单的东西，对我来说是一个脑筋急转弯。我知道了
times1 <- c(0000, 0720, 2315, 0600, 1150, NA, 0000)我想用hm函数将这个数字转换成小时和分钟，我得到了一个lubridate格式。
非常感谢您的帮助！祝你好运，罗宾
回答 2
Stack Overflow用户
发布于 2018-03-13 14:32:14
尝试此选项：
times1 <- c('0000', '0720', '2315', '0600', '1150', NA, '0000')
ts <- ifelse(is.na(times1),
NA,
paste0(substr(times1, 1, 2), ":", substr(times1, 3, 4), ":00"))
x <- hms(ts)Stack Overflow用户
发布于 2018-03-13 15:13:14
由于您的目标是转换为小时和分钟，因此需要使用hm函数，而不是hms函数：
times1 <- c('0000', '0720', '2315', '0600', '1150', NA, '0000')
hm(sub("(\\d{2})","\\1:",times1))
[1] "0S" "7H 20M 0S" "23H 15M 0S" "6H 0M 0S" "11H 50M 0S"
[6] NA "0S" 页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/49249594
复制相关文章
相似问题
腾讯云开发者
