Create LearnBayes.R