January temperature at New Bedford, MA

x<-read.table("newbedfordTempMonth.Data");

names(x)<-c("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec");

##postscript("nbTempBox.eps");

##boxplot(x, col="orange", cex.lab=1.5, cex.axis=1.5, font=2);

##dev.off();

##postscript("nbTempBoxJan.eps");

boxplot(x[,1], col="orange", cex.lab=1.5, cex.axis=1.5, font=2);

##dev.off();