R/theil.gamma.R

theil.gamma <-
function(p){ # exact from Kleiber p.164
  Theil<-1/p+digamma(p)-log(p)
  return(Theil)
}

Try the acid package in your browser

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

acid documentation built on May 1, 2019, 10:14 p.m.