Find the distance in R using Imap