For Loop to calculate Euclidean distance in R using geosphere package

Question

I have succeeded following the instruction at Error in data.frame(..., check.names = FALSE) : Looping For to calculate the distance from ORIGIN to DESTINATION using geospher