为两个系列添加第二个y比例,并在x轴上减少日期 - ggplot

时间:2015-02-02 17:10:16

标签: r ggplot2 time-series

我是学习蜜蜂的学生,也是R的新生。我有蜂窝内部的2个温度和湿度传感器的数据,并希望将它们绘制在两个y尺度的同一图表上,一个用于温度,一个用于相对湿度。

数据:

            time  DHT22_t DHT11_t DHT22_h DHT11_h
1 10/5/2014 12:52    15.7      17    77.0      83
2 10/5/2014 13:52    16.7      18    71.6      81
3 10/5/2014 14:51    15.7      18    79.0      81
4 10/5/2014 15:51    15.8      18    77.0      81
5 10/5/2014 16:51    16.0      18    77.0      81
6 10/5/2014 17:50    14.3      17    80.2      81

我使用mel来重新排列数据时间:

meltdf <- melt(Hive1_4days,id="time")

              time variable value
1 10/5/2014 12:52  DHT22_t  15.7
2 10/5/2014 13:52  DHT22_t  16.7
3 10/5/2014 14:51  DHT22_t  15.7
4 10/5/2014 15:51  DHT22_t  15.8
5 10/5/2014 16:51  DHT22_t  16.0
6 10/5/2014 17:50  DHT22_t  14.3

使用ggplot:

ggplot(meltdf,aes(x=time,y=value,colour=variable,group=variable)) + geom_line()

enter image description here

而不是这个,我想在右边有一个湿度标尺。 此外,x轴饱和了日期(传感器记录数据〜每分钟18次),我想将比例改为每隔几小时或半天或其他什么。有任何想法吗? 谢谢!

编辑:

pizza<- ggplot(meltdf,aes(x=time,y=value,colour=variable,group=variable)) + geom_line()
pizza+scale_x_date(breaks=date_breaks("1 days"))

产生这个:

enter image description here

哪个没用。有没有办法改变影响绘图的轴?

0 个答案:

没有答案