在R中的levelplot上显示数据值

Question

我想知道是否可以在R中的 levelplot(网格包)上显示数据值.如果有人帮我这样做,我会很感激.提前致谢.

Answer 1

您可以编写自己的面板功能,例如:

library("lattice")
x <- seq(pi/4, 5*pi, length.out=10)
y <- seq(pi/4, 5*pi, length.out=10)
r <- as.vector(sqrt(outer(x^2, y^2, "+")))
grid <- expand.grid(x=x, y=y)
grid$z <- cos(r^2)*exp(-r/(pi^3))

p <- levelplot(z~x*y, grid, 
               panel=function(...) {
                       arg <- list(...)
                       panel.levelplot(...)
                       panel.text(arg$x, arg$y, round(arg$z,1))})
print(p)