Showing posts with label Manchester. Show all posts
Showing posts with label Manchester. Show all posts

Monday, October 27, 2014

10 24 2014 Manchester Fall Maintenance

Manchester WA

Cloudy, High 50's/Low 60's

Participants: Sean Bennett and Jake Heare



Performed a full workup on the trays at Manchester: counted live/dead, imaged for size, collected samples and morts. We then transferred the oysters from the trays to cages. Mortality was slight but still somewhat low. Less than 10 animals per tray on average.

Numbers as follow

4H9-12
Live   52
Dead  6

4S13-16
Live  73
Dead  6

4N1-4
Live   55
Dead   0

4S9-12
Live    57
Dead    1

4H1-4
Live    77
Dead    2

4N9-12
Live     46
Dead    3

4S5-8
Live     66
Dead    0

4H13-16
Live    60
Dead    1

4N13-16
Live    64
Dead   0

4H5-8
Live    60
Dead   6

4S1-4
Live     62
Dead    1

4N5-8
Live    62
Dead    5



























Monday, October 20, 2014

10 20 2014 Growth Rate Comparison Graphs

growthratecomparison.R
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"))

plot of chunk unnamed-chunk-1