{

# read the files that contain the pdf statistics and plot them

#sets up the device to plot to

par(mfrow=c(3,2))

stype = "means"
source("boxplotsWithAnnGrouped.s")

stype = "sds"
source("boxplotsWithAnnGrouped.s")

stype = "skews"
source("boxplotsWithAnnGrouped.s")

stype = "corrs1"
source("boxplotsWithAnnGrouped.s")

stype = "max"	
source("boxplotsWithAnnGrouped.s")

stype = "min"
source("boxplotsWithAnnGrouped.s")

}