powered by
swissRe(c)
dmbbefd
pars<-swissRe(4) losses<-rmbbefd(n=1000,b=pars[1],g=pars[2]) mean(losses)
Run the code above in your browser using DataLab