distance metrics code snippets in r

find the closest 10 neighbors of a time series in r