Calculates distance in miles between two US zip codes in R