added bayes_factor function for model selection