Skip to content

Instantly share code, notes, and snippets.

@aurielfournier
Last active February 11, 2016 18:40
Show Gist options
  • Select an option

  • Save aurielfournier/2ec53221f143a6e94230 to your computer and use it in GitHub Desktop.

Select an option

Save aurielfournier/2ec53221f143a6e94230 to your computer and use it in GitHub Desktop.
(pp <- ggplot()+
geom_line(data=fit, aes(x=x, y=y, group=year))+
geom_ribbon(data=fit, alpha=0.6, aes(x=x, ymin=lower, ymax=upper, fill=year))+
scale_fill_manual(values=mypal)+
theme_krementz()+
scale_x_continuous(breaks=seq(225,300,5),limits=c(225,300),
labels=c("August 10","August 15","August 20", "August 25","August 30","September 4","September 9","September 14","September 19","September 24","September 29","October 4","October 9","October 14","October 19","October 24"))+
xlab("Date")+
ylab("Sora per Hectare"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment