ggplot等效于线框

Question

我想显示一个基于网格的数据集。目前，我正在为此使用线框功能：

library(lattice)
x <- 1:10
y <- 1:10
xy <- expand.grid(x,y)

a <- xy[,1] * 0.2  + xy[,2]^2 * -0.85
b <- xy[,2] * 0.2  + xy[,1]^2 * -0.5
abxy <- cbind(a,b,xy)
wireframe(a + b~ Var1 * Var2, data = abxy)

我将ggplot用于同一稿件中的其他图，并且线框图在美学上不适合它们。因此，我想知道是否可以使用ggplot2进行类似的绘图。

谢谢， 乔纳森