I am trying to implement Adaboost from draft in R. I followed the algorithm for Adaboost. However, the error rate of the prediction result is as poor as 0.5. I would li