Travel Mode Choice Prediction to Pursue Sustainable Transportation and Enhance Health Parameters Using R | Synapse