 Usage:  {datt, risk} = stein (dat, var)  

 

 Input:



  dat                    p vector of input data 

                         

  var                    scalar, variance 

                         

 Output:



  datt                   p vector, thresholded estimate 

                         

  risk                   scalar, minimal risk 

                         

--------------------------------------------------------------

(C) MD*TECH Method and Data Technologies, 21.9.2000

