Calculates a new point [X,Y] based on defined bearing and distance

bearing.distance(x, y, distance, azimuth, EastOfNorth = TRUE)

Arguments

x

x coordinate

y

y coordinate

distance

Distance to new point (in same units as x,y)

azimuth

Azimuth to new point

EastOfNorth

Specified surveying convention

Value

a new point representing location of baring and distance

Note

East of north is a surveying convention and defaults to true.

Author

Jeffrey S. Evans <jeffrey_evans@tnc.org>

Examples

pt <- cbind( x=480933, y=4479433) bearing.distance(pt[1], pt[2], 1000, 40)
#> X Y #> [1,] 481575.8 4480199