R/CalcLatitude.R

Defines functions CalcLatitude

Documented in CalcLatitude

CalcLatitude <-
function(initialLat, distance, bearing) #distance in meters
{
	initialLat<-initialLat/360*2*pi
	er<-6371000# earths radius in meters
	asin(sin(initialLat)*cos(distance/er)+cos(initialLat)*sin(distance/er)*cos(bearing)) #Latitude Rad
}

Try the TrackReconstruction package in your browser

Any scripts or data that you put into this service are public.

TrackReconstruction documentation built on Dec. 11, 2021, 10:07 a.m.