从时间戳删除日期部分中的R

Question

我有数据，看起来像这样：

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 

Answer 1

我们可以使用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" 

Answer 2

取代它只需使用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通过对正则表达式处理的日期和时间建议。你基本上是总是有明确的类型的强类型更好。他们存在的原因是有的。