powered by
soft.thresholding(sigma, threshold = 0.5)
data(m.excess.c10sp9003) cov.SAM <- cov(m.excess.c10sp9003) soft.thresholding(cov.SAM, threshold = 0.001)
Run the code above in your browser using DataLab