Machine Learning Algorithm implement with R