在R中向Scatterplot添加行

Question

如何在图表中添加线条？ 我做了以下

dat <- data.frame(xvar = 1:20 - rnorm(20,sd=10),
                  yvar = 1:20 - rnorm(20,sd=10),
                  zvar = 1:20 - rnorm(20,sd=10))
plot(dat[,1:3])

但是我需要在所有变量的零值处使用水平和垂直线，就像这样

Answer 1

像这样的东西可能会起作用：

##define a function to use in pairs
plotfun <- function(x,y,...){
    points(x,y,...) #plot them
    abline(h = 0) #horizontal line
    abline(v = 0) #vertical line
}
pairs(dat, upper.panel = plotfun)

请注意，这个问题是非常相似的这一个 。