Wie konvertiert man den Breiten- oder Längengrad in Meter?

Hier ist eine javascript-Funktion:

function measure(lat1, lon1, lat2, lon2){  //generally used geo measurement function
    var R = 6378.137; //Radius of earth in KM
    var dLat = lat2 * Math.PI / 180 - lat1 * Math.PI / 180;
    var dLon = lon2 * Math.PI / 180 - lon1 * Math.PI / 180;
    var a = Math.sin(dLat/2) * Math.sin(dLat/2) +
    Math.cos(lat1 * Math.PI / 180) * Math.cos(lat2 * Math.PI / 180) *
    Math.sin(dLon/2) * Math.sin(dLon/2);
    var c = 2 * Math.atan2(Math.sqrt(a), Math.sqrt(1-a));
    var d = R * c;
    return d * 1000; //meters
}

Erklärung: https://en.wikipedia.org/wiki/Haversine_formula

Die haversine Formel bestimmt, der great circle Distanz zwischen zwei Punkten auf einer Kugel aufgrund Ihrer breiten-und Längengrade.

InformationsquelleAutor der Antwort b-h-

Gegeben, die Sie suchen für eine einfache Formel, dies ist wahrscheinlich der einfachste Weg, es zu tun, vorausgesetzt, dass die Erde eine Kugel ist der Umfang 40075 km.

Länge in Meter 1° Breitengrad = immer 111.32 km

Länge in Meter 1° Längengrad = 40075 km * cos( Breitengrad ) /360

InformationsquelleAutor der Antwort Ben

Gibt es viele tools, die machen das einfach. Sehen monjardin Antwort für mehr details über das, was beteiligt.

Allerdings tun dies nicht unbedingt schwer. Es klingt wie Sie Java verwenden, so würde ich empfehlen, sich in so etwas wie GDAL. Es bietet java-wrappers für Ihre Routinen, und Sie haben alle die erforderlichen tools zum konvertieren von Lat/Lon (geographische Koordinaten) in UTM-Projektion-Koordinatensystem) oder einen anderen vernünftigen Kartenprojektion.

UTM ist nett, denn es ist Meter, also einfach, mit zu arbeiten. Allerdings werden Sie brauchen, um das entsprechende UTM-zone für Sie zu tun, einen guten job. Es gibt einige einfache codes zur Verfügung, die über googeln zu finden, eine geeignete zone für einen lat/long-pair-Mädchen.

InformationsquelleAutor der Antwort Reed Copsey

Einer seemeile (1852 Meter) ist definiert als eine arcminute des Längengrades am äquator. Jedoch, Sie müssen definieren, eine Kartenprojektion (siehe auch UTM), in dem Sie arbeiten, damit die Konvertierung wirklich Sinn machen.

InformationsquelleAutor der Antwort Judge Maygarden

Gibt es durchaus ein paar Möglichkeiten, um diese zu berechnen. Sie alle nutzen die aproximations der sphärischen Trigonometrie, wo der radius ist das one von der Erde.

versuchen http://www.movable-type.co.uk/scripts/latlong.html für ein bisschen von Methoden und code in verschiedenen Sprachen.

InformationsquelleAutor der Antwort rcaval

    'below is from
'http://www.zipcodeworld.com/samples/distance.vbnet.html
Public Function distance(ByVal lat1 As Double, ByVal lon1 As Double, _
                         ByVal lat2 As Double, ByVal lon2 As Double, _
                         Optional ByVal unit As Char = "M"c) As Double
    Dim theta As Double = lon1 - lon2
    Dim dist As Double = Math.Sin(deg2rad(lat1)) * Math.Sin(deg2rad(lat2)) + _
                            Math.Cos(deg2rad(lat1)) * Math.Cos(deg2rad(lat2)) * _
                            Math.Cos(deg2rad(theta))
    dist = Math.Acos(dist)
    dist = rad2deg(dist)
    dist = dist * 60 * 1.1515
    If unit = "K" Then
        dist = dist * 1.609344
    ElseIf unit = "N" Then
        dist = dist * 0.8684
    End If
    Return dist
End Function
Public Function Haversine(ByVal lat1 As Double, ByVal lon1 As Double, _
                         ByVal lat2 As Double, ByVal lon2 As Double, _
                         Optional ByVal unit As Char = "M"c) As Double
    Dim R As Double = 6371 'earth radius in km
    Dim dLat As Double
    Dim dLon As Double
    Dim a As Double
    Dim c As Double
    Dim d As Double
    dLat = deg2rad(lat2 - lat1)
    dLon = deg2rad((lon2 - lon1))
    a = Math.Sin(dLat /2) * Math.Sin(dLat /2) + Math.Cos(deg2rad(lat1)) * _
            Math.Cos(deg2rad(lat2)) * Math.Sin(dLon /2) * Math.Sin(dLon /2)
    c = 2 * Math.Atan2(Math.Sqrt(a), Math.Sqrt(1 - a))
    d = R * c
    Select Case unit.ToString.ToUpper
        Case "M"c
            d = d * 0.62137119
        Case "N"c
            d = d * 0.5399568
    End Select
    Return d
End Function
Private Function deg2rad(ByVal deg As Double) As Double
    Return (deg * Math.PI /180.0)
End Function
Private Function rad2deg(ByVal rad As Double) As Double
    Return rad /Math.PI * 180.0
End Function

InformationsquelleAutor der Antwort dbasnett

Wenn Ihr nahe genug sind, können Sie sich mit der Behandlung von Ihnen, wie die Koordinaten auf einer flachen Ebene. Dies funktioniert auf sagen, die Straße oder die Stadt-Ebene, wenn perfekte Genauigkeit ist nicht erforderlich und alles, was Sie brauchen, ist eine grobe Schätzung auf die Entfernung zu vergleichen mit einer willkürlichen Grenze.

InformationsquelleAutor der Antwort

Müssen Sie zum konvertieren von Koordinaten in Bogenmaß zu tun, die sphärische geometrie. Einmal konvertiert, dann kann man berechnen einer Entfernung zwischen den beiden Punkten. Der Abstand kann dann umgewandelt werden, um jede Maßnahme, die Sie wollen.

InformationsquelleAutor der Antwort Arlie Winters