Displaying 1 result from an estimated 1 matches for "yfc_plot".
2013 Apr 18
1
Arranging two different types of ggplot2 plots with axes lined up
...)
#make test precipitation plot
yp_plot<-ggplot(yp) + geom_point() + geom_line() + aes(year, y=precip) +
opts(title="Site X \n ", axis.text.x=theme_text(angle=45, hjust=1,
vjust=1)) +
ylab("Annual Precipitation (in.) \n ") + xlab("")
#make test fecal coliform plot
yfc_plot<-ggplot(yfc) + geom_boxplot() + aes(x=as.factor(year2), y=fc) +
opts(axis.text.x=theme_text(angle=45, hjust=1, vjust=1)) +
xlab(" \n Date") + ylab("Fecal coliforms (cfu/100 mL) \n ") +
geom_smooth(stat='smooth', aes(group=1), size=1.5) + scale_y_log10()
#arrange plot...