?read.table head(obs.Ptdata) st <- 1 q() lengt(par) length(par) length(unique(par)) unique(par) 79-17 head(df1) q() install.packages() install.packages("gridExtra") pdfPlot ") head(df0) q() n load("../R.data/annualUpdate.RData") setwd("~/Dropbox/wg/wgbie15/wgbie15/runs/run1/scripts/scripts.diag") load("../R.data/annualUpdate.RData") library (gridExtra) library (ggplot2) library(RColorBrewer) library(lattice) setwd("~/Dropbox/wg/wgbie15/wgbie15/runs/run1/scripts") lastYear <- 2014 save(list=c("lastYear"), file= "R.data/annualUpdate.RData")