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

SCP

请注意，此问题与非常相似。