具有次y轴的多面ggplot？

Question

我使用ggplot函数创建了多个方面facet_wrap，但找不到能让我为所有绘图创建特定变量的辅助y轴的东西。

我曾尝试在google中找到http://rpubs.com/kohske/dual_axis_in_ggplot2，但我不确定如何从这里转到多方面的情节。

我融合了数据集以获得不同的方面图，但无法计算如何为组中的特定变量放入辅助y轴。

fig4bplot<-    ggplot(fig4b,aes(x=as.Date(time),y=value,group=variable,color=variable))+geom_line(size=2,alph    a=4/5)+facet_wrap(~ Area)+theme_bw()
fig4bplot<-fig4bplot + theme(legend.position="bottom",legend.direction   ="vertical")+opts(axis.text.x = theme_text(angle = 90))
fig4bplot<-fig4bplot+xlab("Time")+ylab("One-Step Ahead Squared Forecast Error")+theme(text  = element_text(size = 30),
axis.title =     element_text(size = 30),
axis.text.x = element_text(size = 20,))