R/sdiag.R

Defines functions sdiag

Documented in sdiag

sdiag <- function(x){ if(length(x)<2L) matrix(x) else diag(x) }

Try the ica package in your browser

Any scripts or data that you put into this service are public.

ica documentation built on May 24, 2018, 9:04 a.m.