Is The Mid-Range Shot Dying in the NBA? An R Analysis in Kaggle