根据格更改日志:
格子的变化0.19
=======================o添加新参数
'grid'并'abline'在panel.xyplot().
所以你可以在一行中完成:
require(lattice)
X <- data.frame(xx=runif(20), yy=rnorm(20))
xyplot(yy~xx, X, abline=list(h=0))
Run Code Online (Sandbox Code Playgroud)

如果你想要panel.grid线条样式,那么很好的技巧:
xyplot(yy~xx, X, abline=c(list(h=0),trellis.par.get("reference.line")))
Run Code Online (Sandbox Code Playgroud)

如果您正在使用包lattice(暗示xyplot),您可以使用panel.abline在标记的刻度线上绘制线条.
my.df <- data.frame(a = runif(10, min = -1, max = 1), b = runif(10, min = -1, max = 1))
my.plot <- xyplot(b ~ a, data = my.df)
update(my.plot, panel = function(...) {
panel.abline(h = 0, v = 0, lty = "dotted", col = "light grey")
panel.xyplot(...)
})
Run Code Online (Sandbox Code Playgroud)
