在 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)