# setup DF <- expand.grid(x=1:3, y=1:3) DF$z <- (DF$x+DF$y)
# Traditional "base" graphics: image(x=1:3, y=1:3, z=array(DF$z, dim=c(3,3)))
contour(x=1:3, y=1:3, z=array(DF$z, dim=c(3,3)), add=T)
# Lattice hack: lvlplt <- levelplot(z~x*y, DF)
cont <- contourplot(z~x*y, DF)
print(lvlplt, more=T)
print(cont, position=c(0, 0, 0.9055, 1))
##################
By comparison, the same ugly hack in S-Plus required 0.952 instead of 0.955. Is this the best we can currently get with a modest effort?
Thanks, spencer graves
______________________________________________ [EMAIL PROTECTED] mailing list https://www.stat.math.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html