Skip to main content

Browse the archive

swh:1:snp:a4c99a50dc49f82b591f268001b320f8c3ca0041
Raw File
Tip revision: ce60f670aac0a708d3a9af5f0cf46a752d46ba8a authored by John M Chambers on 28 October 2020, 07:59:48 UTC
version 1.0-6.1
Tip revision: ce60f67
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