从时间戳删除日期部分中的R
问题描述:
我有数据,看起来像这样:从时间戳删除日期部分中的R
timestamp volume
1 2013-10-29T00:00:00-05:00 650
2 2013-10-29T00:15:00-05:00 778
3 2013-10-29T00:30:00-05:00 683
4 2013-10-29T00:45:00-05:00 723
如何去消除之日起,(这部分2013-10-29T
),使我的专栏看起来像这样:
我使用lubridate
不好受。谢谢!
timestamp volume
1 00:00:00-05:00 650
2 00:15:00-05:00 778
3 00:30:00-05:00 683
4 00:45:00-05:00 723
答
我们可以使用sub
RO通过匹配的字符,直到T
即.*T
删除的日期部分包括T
和空白(""
)
df1$timestamp <- sub(".*T", "", df1$timestamp)
df1$timestamp
#[1] "00:00:00-05:00" "00:15:00-05:00" "00:30:00-05:00" "00:45:00-05:00"
答
取代它只需使用anytime()
R> library(anytime)
R> pt <- anytime(c("2013-10-29T00:00:00-05:00", "2013-10-29T00:15:00-05:00",
+ "2013-10-29T00:30:00-05:00", "2013-10-29T00:45:00-05:00"))
R> pt
[1] "2013-10-29 00:00:00 CDT" "2013-10-29 00:15:00 CDT"
[3] "2013-10-29 00:30:00 CDT" "2013-10-29 00:45:00 CDT"
R> format(pt, "%H:%M:%S")
[1] "00:00:00" "00:15:00" "00:30:00" "00:45:00"
R>
如果你想添加的偏移量,你可以这么做格式字符串:
R> format(pt, "%H:%M:%S-05:00")
[1] "00:00:00-05:00" "00:15:00-05:00" "00:30:00-05:00" "00:45:00-05:00"
R>
一般情况下,我stronly通过对正则表达式处理的日期和时间建议。你基本上是总是有明确的类型的强类型更好。他们存在的原因是有的。