powered by
subdiag.thresh(R, lam, w = NULL)
(p-1)
w[l,]
l
w[l,m]=sqrt(2 * l)/(l - m + 1)
m <= l<="" code="">=>