Skip to content

Overlapping plot in lattice

3 messages · Kang Min, Dennis Murphy, Gabor Grothendieck

Original
Kang Min
# 
Hi all,

I was wondering if there's an equivalent to par(new=T) of the plot
function in lattice. I'm plotting an xyplot, and I would like to
highlight one point by plotting that one point again using a different
symbol.

For example, where 6 is highlighted:
plot(1:10, xlim=c(0,10), ylim=c(0,10))
par(new=T)
plot(6,6, xlim=c(0,10), ylim=c(0,10), pch=16)

Is there a way to do this in lattice?

Thanks,
Kang Min
Dennis Murphy
# 
Hi:

One way is to create a vector of pch values that you can pass into xyplot, e.g.,

dd <- data.frame(x = 1:10, y = 1:10, pch = c(rep(1, 5), 16, rep(1, 4)))
library('lattice')
xyplot(y ~ x, data = dd, pch = dd$pch, col = 1)

HTH,
Dennis
On Fri, Sep 30, 2011 at 12:01 AM, Kang Min <ngokangmin at gmail.com> wrote:
Gabor Grothendieck
#
On Fri, Sep 30, 2011 at 3:01 AM, Kang Min <ngokangmin at gmail.com> wrote:
Try this:

library(lattice)
xyplot(1:10 ~ 1:10, xlim=c(0,10), ylim=c(0,10))
trellis.focus()
panel.points(6, 6, pch = 6)
trellis.unfocus()