powered by
m
tdecomp(m)
discrcoord
x <- rnorm(10) y <- rnorm(10) z <- cov(cbind(x,y)) tdecomp(z)
Run the code above in your browser using DataLab