Haversino lygtis programoje Excel

...

Norėdami apskaičiuoti atstumą tarp dviejų Žemės rutulio taškų, naudokite Haversine lygtį.

Haversine lygtis yra viena iš pagrindinių lygčių navigacijai vandenyne; jis naudojamas atstumui tarp dviejų rutulio taškų generuoti, jei žinote abiejų taškų platumą ir ilgumą bei sferos skersmenį. Iš esmės jis buvo automatizuotas į GPS įrenginius. Kai kurie žmonės, užsiimantys geocaching, mėgsta, kad ši lygtis būtų įkelta į vietinę Excel kopiją jie gali tiesiog įvesti savo pradžios ir pabaigos tašką, kad nustatytų atstumą, kurį turi kelionė.

Kintamųjų nustatymas

Haversine lygtis reikalauja keturių platumos ir ilgumos įvesties kintamųjų. Norėdami tai nustatyti programoje „Excel“, programoje „Excel“ nurodykite tam tikrus langelius ir nurodykite tuos langelių pavadinimus formulėje. Galite pavadinti langelį programoje „Excel“ spustelėdami langelį ir įvesdami pavadinimą baltoje erdvėje formulės juostos kairėje. Spustelėkite langelį „A1“ ir priskirkite jam pavadinimą „Platuma_1“. Spustelėkite langelį „A2“ ir priskirkite jam pavadinimą „Platuma_2“. Spustelėkite langelį „B1“ ir priskirkite jam pavadinimą "Ilguma_1." Spustelėkite langelį „B2“ ir priskirkite jam pavadinimą „ilguma_2“. Pravartu pakeisti šių langelių spalvas, kad galėtumėte jas atpažinti vėliau.

Dienos vaizdo įrašas

Konstantų nustatymas

Kita Haversino lygties dalis yra naršomos sferos spindulys. Paprastai tai yra Žemė. Kaip ir anksčiau pateiktuose platumos ir ilgumos skaičiuose, pavadinkite langelius, kuriuose yra šie kintamieji. Spustelėkite „C1“ ir pavadinkite jį „RadMiles“, spustelėkite langelį „C2“ ir pavadinkite jį „RadKilom“. C1 langelyje įveskite „3959“; langelyje C2 įveskite „6371“. C3 langelyje nustatykite duomenų patvirtinimą spustelėdami juostelės sąsajos dalį „Duomenys“ ir pasirinkdami „Duomenų patvirtinimas“. Kaip patvirtinimo tipą pasirinkite „Sąrašas“ ir tam skirtoje vietoje įveskite „Miles, Kilometers“ be citatos ženklų. C3 langelis taps išskleidžiamuoju sąrašu su dviem įrašais: mylios ir kilometrai.

Įėjimas į formulę

C4 langelyje įveskite šią formulę:

=ACOS(COS(RADIANAI(90-Platuma_1)) COS(RADIANAI(90-platuma_2)) +SIN(RADIANAI(90-platuma_1)) SIN(RADIANAI(90-Platuma_2)) COS(RADIANAI(ilguma_1-ilguma2)) IF(C3="Miles",RadMiles, RadKilom)

Naudojant Haversino lygtį

Norėdami naudoti skaičiuoklę, kurioje yra Haversino lygtis, langeliuose A1 ir B1 įveskite pradinio taško platumą ir ilgumą laipsniais. Tada langeliuose A2 ir B2 įveskite paskirties taško platumą ir ilgumą, taip pat laipsniais. Pasirinkite vienetus, kuriais norite matuoti atstumą tarp taškų, pasirinkdami C3 langelio išskleidžiamąjį meniu (mylės arba kilometrai). C4 langelyje bus rodomas atstumas tarp dviejų taškų.