R/abline2.R

In p3d: Plot 3d data and fitted surfaces

Defines functions abline2

Documented in abline2

##
## p3d:abline2.R
## 2011-12-22
##

abline2 <-
function( p1, p2, ...) {
            if ( is.list(p1)) abline2( p1[[1]], p1[[2]], ...)
            else do.call( abline, c(ab(p1,p2),...))
    }

Try the p3d package in your browser