ylab.right is perfect. However, I am drawing scales on the right axis (outside) (see code 1). When ylab.right is set to something it overlaps with the scale labels.
see http://imgur.com/Gs3JS I seem to have asked the question: http://tolstoy.newcastle.edu.au/R/e5/help/08/09/1887.html But the same thing appears to happen. Is there a padding option for the right hand side label? Code: axis.PCT<- function(side, ...) { ylim <- current.panel.limits()$ylim print(panel.number()) switch(side, left = { prettyF <- pretty(ylim) panel.axis(side = side, outside = TRUE,text.cex=0.5,rot=0, at = prettyF, labels = prettyF) }, right = { prettyF <- pretty(ylim) yat = round(scaleTo(prettyF, scaler[[panel.number()+1]]),2) ## this wont work!!!! scalar is my own list. panel.axis(side = side, outside = TRUE,text.cex=0.5,rot=0, at = prettyF, labels = yat) }, axis.default(side = side, ...)) } library(grid) library(lattice) u=xyplot(this~buildnum|as.factor(version),data=wsimple2,type=c('p','l'),cex=0.5 ,pch=16,scales=list(x=list(rot=80,cex=0.45,tick.number=10,relation='free') ,y = list(relation='free',tick.number=10,tck=0.5,alternating=3)) ,ylab=list('Red Line: % Change over Median of Last 3 BuildIDs',cex=0.75) ,ylab.right=list('Blue Line: % Change over FF10',cex=0.75) ,panel=function(x,y,subscripts,...){ panel.abline(v=x[back.window],col='black',lty=3) panel.abline(h=0,col='black',lty=3) panel.loess(x,wsimple2[subscripts,"past"],col='#0000ff40',lwd=2) z <- (predict(loess(y~x,span=0.65),x,se=TRUE)) yup <- z$fit+2.32*z$se.fit ylo <- z$fit-2.32*z$se.fit yw <- which(y > yup | y < ylo) panel.points(x[yw],y[yw],col='#ff000010',cex=0.7,pch=16) panel.points(x[yw],y[yw],col='red',cex=0.5,pch=1,lwd=0.1) panel.lines(x,z$fit,col='#ff000040',lwd=4) out=sprintf("Outlier Pct=%s",round(length(yw)/length(y)*100),2) grid.text(out,x=unit(0,"npc"),y=unit(0.05,"npc"),just=c("left","bottom"),gp=gpar(cex=0.75)) } ,axis=axis.PCT ,main=VNAME ,layout=c(1,2),subset=as.numeric(version)>10) data set: http://people.mozilla.com/~sguha/tmp/tmpa.txt -- View this message in context: http://r.789695.n4.nabble.com/Y-axis-label-on-the-right-hand-side-in-lattice-tp4478959p4479481.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
