pch does not seem to be respected

[Tobias Verbeke]

library(yp.lattice)
.yagpenv$backend <- graphics_primitives()

data(diamonds, package = "ggplot2")
x11()
p <- xyplot(price/carat ~ color, data = diamonds,
    pch = 19, xlab = "color", ylab = "price/carat", alpha = 0.5)
p

[Tobias Verbeke]

works now:

library(imp.lattice)
x11()
.impenv$backend <- graphics_primitives
data(diamonds, package = "ggplot2")
p <- xyplot(price/carat ~ color, data = diamonds[1:100,],
    pch = 19, xlab = "color", ylab = "price/carat", alpha = 0.5)
p
p <- xyplot(price/carat ~ color, data = diamonds[1:100,],
    pch = 2, xlab = "color", ylab = "price/carat")
p