10 20 2014 Growth Rate Comparison Graphs

growthratecomparison.R

Jake H

Mon Oct 20 16:39:06 2014

require(ggplot2)

## Loading required package: ggplot2

require(scales)

## Loading required package: scales

require(plyr)

## Loading required package: plyr

require(splitstackshape)

## Loading required package: splitstackshape
## Loading required package: data.table

picsize7=read.csv('imagejsizefixed1.csv')
picsize8<-concat.split.multiple(picsize7, "Tray", " ")
mansize<-subset(picsize8, Site %in% c("Manchester","manchester"))
mansize$Date<-as.Date(mansize$Date, "%m/%d/%Y")
ggplot(mansize, aes(Date,Length.mm, group=Tray_1, color=Tray_1))+geom_point()+geom_smooth(method=lm)+scale_colour_manual(values=c("#3366CC","#CC66CC","#FF9900"))