# NOT RUN {
pargam(lmoms(abs(rnorm(20, mean=10))))
# }
# NOT RUN {
pargam(lmomgam(vec2par(c(0.3,0.4,+1.2), type="gam")), p=3)$para
pargam(lmomgam(vec2par(c(0.3,0.4,-1.2), type="gam")), p=3)$para
# mu sigma nu
# 0.2999994 0.3999990 1.1999696
# 0.2999994 0.4000020 -1.2000567
# }
Run the code above in your browser using DataLab