powered by
dlaplacelike2(par, x)
estdlaplace2
ddlaplace2
p <- 0.25 q <- 0.7 x <- rdlaplace2(n=100, p, q) par <- estdlaplace2(x, "ML") -dlaplacelike2(par, x) # greater than... -dlaplacelike2(c(p, q), x)
Run the code above in your browser using DataLab