inst/snippet/prob5-09.R

x <- c(0.90,0.78,0.93,0.64,0.45,0.85,0.75,0.93,0.98,0.78)
mean(x)
mom <- (1 / (1-mean(x))) - 2; mom
mle <- ( - length(x) / sum(log(x)) ) - 1; mle

Try the fastR package in your browser

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

fastR documentation built on May 2, 2019, 5:53 p.m.