como utilizar a função near em R