search for: y2007

...main="A test lattice plot") ## lattice code doesn't give the desired plot ## Next try with the graphics package ## Seems to be easier to get the desired plot ##First, some preprocessing of data df2007<-dataf[dfyr==2007,];df2008<-dataf[dfyr==2008,];df2009<-dataf[dfyr==2009,]; y2007<-matrix(df2007$y,ncol=nb,nrow=na) y2008<-matrix(df2008$y,ncol=nb,nrow=na) y2009<-matrix(df2009$y,ncol=nb,nrow=na) colnames(y2007)<-vec_b;colnames(y2008)<-vec_b;colnames(y2009)<-vec_b; rownames(y2007)<-vec_a;rownames(y2008)<-vec_a;rownames(y2009)<-vec_a; ysmax<-ceiling(...

...EF=\"Y2006/\"><IMG border=\"0\" SRC=\" http://localhost:3128/squid-internal-static/icons/anthony-dir.gif\" ALT=\"[DIR] \"></A> <A HREF=\"Y2006/\">Y2006</A>. . . . . . . . . . . . . . Dec 23 2010 \n<A HREF=\"Y2007/\"><IMG border=\"0\" SRC=\" http://localhost:3128/squid-internal-static/icons/anthony-dir.gif\" ALT=\"[DIR] \"></A> <A HREF=\"Y2007/\">Y2007</A>. . . . . . . . . . . . . . Dec 23 2010 \n<A HREF=\"Y2008/\"&g...

...t;- read.csv("Total_Electricity_Net_Generation_(Billion_Kilowatthours).csv", sep = ",", dec = ".") >>>>> >>>>> >>>>> names(elect.gen.tot) <- c("id", "y2004", "y2005", "y2006", "y2007", "y2008") >>>>> >>>>> >>>>> >>>>> >>>>> # make sure the id column is in the same case for both sets >>>>> elect.gen.tot$id <- tolower(elect.gen.tot$id) >>>>> >>>>&...