Determines the heading between spatial points.

heading(from, to)

# S4 method for SpatialPoints,SpatialPoints

# S4 method for matrix,matrix

# S4 method for matrix,SpatialPoints

# S4 method for SpatialPoints,matrix
heading(from, to)

## Arguments

from The starting position; an object of class SpatialPoints. The ending position; an object of class SpatialPoints.

## Value

The heading between the points, in degrees.

Eliot McIntire

## Examples

library(sp)
N <- 10L                # number of agents
x1 <- stats::runif(N, -50, 50) # previous X location
y1 <- stats::runif(N, -50, 50) # previous Y location
x0 <- stats::rnorm(N, x1, 5)   # current X location
y0 <- stats::rnorm(N, y1, 5)   # current Y location

# using SpatialPoints
prev <- SpatialPoints(cbind(x = x1, y = y1))
curr <- SpatialPoints(cbind(x = x0, y = y0))
#>     9.429387 357.792578 114.226407  46.160104 121.907463 204.460955
#>   348.354403 113.683822 339.436266  58.097934
# using matrix
prev <- matrix(c(x1, y1), ncol = 2, dimnames = list(NULL, c("x","y")))
curr <- matrix(c(x0, y0), ncol = 2, dimnames = list(NULL, c("x","y")))
#>     9.429387 357.792578 114.226407  46.160104 121.907463 204.460955
#>   348.354403 113.683822 339.436266  58.097934
#using both
prev <- SpatialPoints(cbind(x = x1, y = y1))
curr <- matrix(c(x0, y0), ncol = 2, dimnames = list(NULL, c("x","y")))