mixAK package it is primarily used to calculate posterior summary for the difference of the
deviances of two competing models.
summaryDiff(x, y, prob=c(0.025, 0.5, 0.975), cut=c(-2*log(9), 0), na.rm=TRUE)x.NA's.cut values.set.seed(16336886)
x <- runif(100, 0, 100)
y <- runif(100, 0, 100)
sdiff <- summaryDiff(x, y)
Run the code above in your browser using DataLab