Inverse Distance Weighting In R