R/wtheta.fun.R

"wtheta.fun" <-
function (S,J,theta) 
{
  pred <- E.S(theta,J)
  var.pred <- Var.S(theta,J)
  (S-pred)/sqrt(var.pred)
}

Try the hubbell package in your browser

Any scripts or data that you put into this service are public.

hubbell documentation built on May 2, 2019, 5:40 p.m.