仅从字符和数字数据中提取数字数据

Question

我想从开始到当前时间从时间戳中拉出几小时。

以下示例：

 x<-Sys.time();
 x;
 #[1] "2013-11-05 15:39:38 CST"
 y<-Sys.time();
 y;
 #[1] "2013-11-05 16:06:06 CST"
 y-x;
 #Time difference of 26.46707 mins

我想要的是y和x之间的时差，只有数字部分      ＃26.46707

我的数据中有多个时间戳，我将从起点减去得到几个小时的消息。在此之后我想要做的是构建一个带有小时数据的数据框来制作变量图。如何让26.46707被隔离，任何想法都会很棒。谢谢大家。