Mixing weight from posterior median threshold
Given a threshold value, find the mixing weight for which this is the threshold of the posterior median estimator. If a vector of threshold values is provided, the vector of corresponding weights is returned.
wfromt(tt, prior = "laplace", a = 0.5)
threshold value or vector of values
specification of prior to be used; can be "cauchy" or "laplace"
scale factor if Laplace prior is used. Ignored if Cauchy prior is used.
The numerical value or vector of values of the corresponding weight is returned.
ebayesthresh and http://www.bernardsilverman.com