swh:1:snp:a4c99a50dc49f82b591f268001b320f8c3ca0041
Raw File
Tip revision: dc000f2a5f006d137f66716b086025d618bf8306 authored by John M Chambers on 14 July 2008, 00:00:00 UTC
version 1.0-5
Tip revision: dc000f2
perpOperator.R
set.seed(779)
`%perp%` <- function(y,x)
      lsfit(x,y, intercept  = FALSE)$residuals
x <- 1:10
y <- x + .25 * rnorm(10)
y %perp% x
back to top