Displaying 1 result from an estimated 1 matches for "hours8".
Did you mean:
hours
2010 Sep 10
1
modifying axis labels in lattice panels
...g[,"PC"], labels = paste("PC",1:2));
xyplot(Comp ~ time | PC ,data = Xlong, pane1l = WeekhourPanel, scales =
list(x=list(at = Hours24-4*3600,
labels=as.character(format(Hours24-4*3600,"%H")))));
WeekhourPanel <- function(x,y,...){
r <- range(x);
#print(r)
Hours8 <- seq(r[1], r[2], by=8*3600);
Hours24 <- seq(r[1]+12*3600, r[2], by=24*3600)
#axis.POSIXct(1, at= Hours8, format="%H");
panel.xyplot(x,y, type="l", ...);
panel.grid(0,3);
panel.abline(v= Hours24-4*3600, lty=2, col = rgb(0,0,1,0.5));
panel.abline(v=Hours24+6*36...