Calculating Euclidean Distance within Groups in R: A Comparative Approach Using dist() and for Loop