R Function Multiple Inputs Using Splitwise Travel