# NOT RUN {
data("CarTask", package = "bayesbr")
bbr = bayesbr(probability~task + NFCCscale,data = CarTask,
iter = 100, mean_betas = c(1, 0.5,1.2))
loglik = bbr$loglik
loglikPlot(loglik)
# }
Run the code above in your browser using DataLab