ggplot：在多个日期上绘制时间图

我想绘制一个线图，用x轴时间（hh：mm）（这是一个特定的时间间隔），和y轴平均价格。ggplot：在多个日期上绘制时间图

我想要图形显示多行（每天一行）。

目前我的数据帧是这样的（我有一些其他变量，以及，但我没有在我的图形使用它们相关的有如下）：

AV.PRICE DATE  TIME 
180  2014-01-20 13H 0M 0S 
179  2014-01-20 13H 1M 0S 
175  2014-01-20 13H 2M 0S 
179  2014-01-20 13H 3M 0S

...等等，日期继续，但时间只需要在价值观13:00至15:00，每天

Date类是日期间，AV.PRICE是NUM，时间就是如果我的提问阶段（使用lubridate）

没有明确，这就是我正在寻找的，在时间o上绘制日期不可知论图NLY轴，但我使用GGPLOT2在R：plotting data for different days on a single HH:MM:SS axis

编辑：
当我尝试绘图原来的DF与ggplot，它不承认时间变量。 ggplot(df, aes(x=TIME, y=AV.PRICE, group = DATE)) + geom_line()给error: cannot compare Period to Duration

dput

structure(list(AV.PRICE = c(178.841368677043, 178.837478586724, 
178.811640304183, 178.8395125, 178.858236768802, 178.860812464589 
), DATE = structure(c(16098, 16098, 16098, 16098, 16098, 16098 
), class = "Date"), TIME = structure(c(0, 0, 0, 0, 0, 0), year = c(0, 
0, 0, 0, 0, 0), month = c(0, 0, 0, 0, 0, 0), day = c(0, 0, 0, 
0, 0, 0), hour = c(13, 13, 13, 13, 13, 13), minute = c(0, 1, 
2, 3, 4, 5), class = structure("Period", package = "lubridate"))), .Names = c("AV.PRICE", 
"DATE", "TIME"), row.names = c(NA, 6L), class = "data.frame")

来源

2016-12-30 shoestringfries

它看起来像你的数据已经是长格式的，你想用'melt'做什么？ – Nate

当我尝试用ggplot绘制原始df时，它不能识别时间变量。 ggplot（df，aes（x = TIME，y = AV.PRICE，group = DATE））+ geom_line（）会给出错误：无法比较期间与持续时间： – shoestringfries

也许你可以在你的问题中发布dput（df）看看有没有人可以帮助你。 – Psidom

我觉得你的问题是不是与时间有df$TIME类= “周期”。所有你需要做的就是强迫它回到POSIXt。

df <- data.table::fread("AV.PRICE DATE  TIME 
180  2014-01-20 13H0M0S 
179  2014-01-20 13H1M0S 
175  2014-01-20 13H2M0S 
179  2014-01-20 13H3M0S 
182  2014-01-21 13H0M0S 
181  2014-01-21 13H1M0S 
177  2014-01-21 13H2M0S 
181  2014-01-21 13H3M0S")

我添加日期一个额外的值与用于显示目的偏移AV.PRICE。对不起，我无法正确加载你的dput，或者我从那里开始。另外fread不喜欢输入中的空格，但可以在实际的df $ TIME列中使用类似collapse和as.character的内容。

df$TIME %<>% lubridate::parse_date_time("HMS") # make it class = "POSIXt 

ggplot(data = df, aes(x = TIME, y = AV.PRICE, color = DATE)) + 
    geom_line()

您可以用+ scale_x_time()玩，如果你想太多，但默认看起来是渲染所需的输出。

来源

2016-12-30 20:57:24 Nate

感谢您的建议，我最终使用了parse_date_time2，因为有些解析失败，必须先将TIME强制转换为字符。最后的日子是01-01-0000 ..所以这种工作：df $ TIME < - parse_date_time2（as.character（df $ TIME），orders =“HMS”）我不知道为什么parse_date_time2工程..它似乎只有更少的参数 – shoestringfries

ggplot：在多个日期上绘制时间图

回答

相关问题