gpt4 book ai didi

r - 将冒号插入时间戳 hhmmss

转载 作者:行者123 更新时间:2023-12-02 17:36:00 26 4
gpt4 key购买 nike

我是 stackoverflow 和 R 编程的新手。

假设我有以下数据:

time<-as.factor(c(142250,101449,85829))
as.data.frame(time)

这将返回以下内容:

    time
1 142250
2 101449
3 85829

我想要的是将上面的转换成带有分号的时间戳,例如:

142250 将是 14:22:50

我能够使用 chron 包找到以下代码:

library('chron')
times(gsub("(..)(..)(..)", "\\1:\\2:\\3", date))

返回

[1] 14:22:50 10:14:49 **<NA>**  

如您所见,问题是如果少于 6 个字符,它将返回 NA。

我想要的输出是返回以下结果:

[1] 14:22:50 10:14:49 8:58:29  

我相信我可能需要进行某种循环,但我不确定该怎么做?

任何帮助将不胜感激。

最佳答案

因此,为了达到您想要的输出,您可以使用 sprintf 并添加前导 0 以防字符串短于 6,但请参阅@Rolands 评论提供更多清晰度

library('chron')
time <- sprintf("%06d", as.numeric(as.character(time)))
times(gsub("(..)(..)(..)", "\\1:\\2:\\3", time))
## [1] 14:22:50 10:14:49 08:58:29

关于r - 将冒号插入时间戳 hhmmss,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/26840913/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com