modified adaboost.R, add more comments