# NOT RUN {
ModeDeltaPoisNPP(CompStat = list(n0 = 50, mean0 = 10, n1 = 50, mean1 = 10), npoints = 1000,
prior = list(lambda.shape = 1/2, lambda.scale = 100,
delta.alpha = 1, delta.beta = 1))
ModeDeltaPoisNPP(CompStat = list(n0 = 50, mean0 = 10, n1 = 50, mean1 = 9.5), npoints = 1000,
prior = list(lambda.shape = 1/2, lambda.scale = 100,
delta.alpha = 1, delta.beta = 1))
ModeDeltaPoisNPP(CompStat = list(n0 = 50, mean0 = 10, n1 = 50, mean1 = 9), npoints = 1000,
prior = list(lambda.shape = 1/2, lambda.scale = 100,
delta.alpha = 1, delta.beta = 1))
# }
Run the code above in your browser using DataLab