En resumen, la distancia puede estar en error hasta aproximadamente 22 km o 0.3%, dependiendo de los puntos en cuestión. Es decir:
El error puede expresarse de varias maneras naturales y útiles , como (i) error (residual), igual a la diferencia entre las dos distancias calculadas (en kilómetros), y (ii) error relativo, igual a la diferencia dividida por el valor "correcto" (elipsoidal). Para producir números convenientes para trabajar, multiplico estas razones por 1000 para expresar el error relativo en partes por mil .
Los errores dependen de los puntos finales. Debido a la simetría rotacional del elipsoide y la esfera y sus simetrías bilaterales (norte-sur y este-oeste), podemos colocar uno de los puntos finales en algún lugar a lo largo del meridiano principal (longitud 0) en el hemisferio norte (latitud entre 0 y 90 ) y el otro punto final en el hemisferio oriental (longitud entre 0 y 180).
Para explorar estas dependencias, he trazado los errores entre los puntos finales en (lat, lon) = (mu, 0) y (x, lambda) en función de la latitud x entre -90 y 90 grados. (Todos los puntos están nominalmente a una altura elipsoide de cero). En las figuras, las filas corresponden a valores de mu en {0, 22.5, 45, 67.5} grados y las columnas a valores de lambda en {0, 45, 90, 180} grados Esto nos da una buena visión del espectro de posibilidades. Como se esperaba, sus tamaños máximos son aproximadamente el aplanamiento (alrededor de 1/300) veces el eje mayor (alrededor de 6700 km), o alrededor de 22 km.
Errores
Errores relativos
Dibujo de contorno
Otra forma de visualizar los errores es arreglar un punto final y dejar que el otro varíe, contorneando los errores que surjan. Aquí, por ejemplo, hay un diagrama de contorno donde el primer punto final está a 45 grados de latitud norte, 0 grados de longitud. Como antes, los valores de error están en kilómetros y los errores positivos significan que el cálculo esférico es demasiado grande:
Puede ser más fácil de leer cuando se envuelve el mundo:
El punto rojo en el sur de Francia muestra la ubicación del primer punto final.
Para el registro, aquí está el código de Mathematica 8 utilizado para los cálculos:
WGS84[x_, y_] := GeoDistance @@ (GeoPosition[Append[#, 0], "WGS84"] & /@ {x, y});
sphere[x_, y_] := GeoDistance @@
(GeoPosition[{GeodesyData["WGS84", {"ReducedLatitude", #[[1]]}], #[[2]], 0}, "WGS84"] & /@ {x, y});
Y uno de los comandos de trazado:
With[{mu = 45}, ContourPlot[(sphere[{mu, 0}, {x, y}] - WGS84[{mu, 0}, {x, y}]) / 1000,
{y, 0, 180}, {x, -90, 90}, ContourLabels -> True]]