Bayes factor code + document