R/horizon.R
In geosphere: Spherical Trigonometry

horizon <- function(h, r=6378137) {
	x = cbind(as.vector(h), as.vector(r))
	h = x[,1]
	r = x[,2]
	
	b = 0.8279
	sqrt( 2 * r * h / b ) 
}

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

geosphere documentation built on May 2, 2019, 5:16 p.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the geosphere package in your browser