Compute a weighted average azimuth (using angular statistics) of multiple line segments

See this slide deck where Bryan pulled this formula from: http://webspace.ship.edu/pgmarr/Geo441/Lectures/Lec%2016%20-%20Directional%20Statistics.pdf

mean_azimuth(azi, len)

Arguments

azi

Azimuth of line in decimal degrees

len

Length of line in planar unit (e.g., feet)

Value

Weighted average azmimuth of line segments in decimal degrees

Examples

mean_azimuth(c(355,5),c(10,5))
#> [1] 358.3296