R/rorthogonal.R

Defines functions rorthogonal

rorthogonal <- function(n,p) {
  M <- matrix(rnorm(n*p), n, p)
  X <- svd(M)$u
  return(X)
}
pat-alt/fromScratchR documentation built on Dec. 31, 2020, 1:14 a.m.