R-Project for Kaggle Bike Sharing Competition