shroArlPfaCedNorm(mean0=10,
sd=3,
n=5,
delta=0.5,
tau=10,
w=99,
seed=123)
shroArlPfaCedPois(lambda0=5,
delta=0.5,
tau=10,
w=99,
seed=123)
shroArlPfaCedNorm(mean0=15,
sd=3,
n=5,
delta=0.5,
tau=NA,
w=99,
seed=123)
Run the code above in your browser using DataLab