尝试仅通过晶格使用时间信息绘制时间序列数据

Question

我有不同产品的日内价格变化的时间序列数据，例如：

Date.Time          Price Product
12/1/2012 13:12:01 15    A
12/1/2012 14:12:05 16    A
15/2/2012 09:09:10 11    B
15/2/2012 08:08:12 10    B

我想通过晶格绘制这个时间序列数据，以比较产品之间的价格变化。

library(lattice)
xyplot(Price~as.POSIXct(strptime(Date.Time, "%d/%m/%Y %H:%M:%S"))|Product, data=temp, type="o")

因为每件产品的日期可能相隔数天，所以我无法想象随时间推移的价格变化。

我想绘制时间信息而不是完整的日期时间信息。

我怎样才能做到这一点？