Calculate plot aspect ratio for geographic maps
mapasp(data, x = data$x, y = data$y)
data
x
y
diff(range(y))/diff(range(x))
image.data.frame, krige