Displaying 1 result from an estimated 1 matches for "pkvs".
Did you mean:
pkgs
2009 Mar 23
1
using xyplot
...panel.lmline(x,y, col='red',lwd=1.5,...)
}
nms <- names(tmp7)[c(3:7,9)]
for (i in nms) {
tmp1 <- xyplot(i~pk, data=tmp7, # different y's in the loop; x is same for
all
as.table=T,panel=myPanel,main=paste('PK vs',i,'- overall'))
pdf(paste("pkvs",i,"a.pdf",sep=""),w=10,h=8)
print(tmp1)
dev.off()
}
The above code does not seem to work. I was not able to use sapply with a
FUN=xyplot, either.
I was, however, able to generate the plots (with xyplot) when I hard-code
the index value!
Could you please help me trou...