## Description

Determines the heading between spatial points.

## Usage

 ``` 1 2 3 4 5 6 7 8 9 10 11 12 13``` ```heading(from, to) ## S4 method for signature 'SpatialPoints,SpatialPoints' heading(from, to) ## S4 method for signature 'matrix,matrix' heading(from, to) ## S4 method for signature 'matrix,SpatialPoints' heading(from, to) ## S4 method for signature 'SpatialPoints,matrix' heading(from, to) ```

## Arguments

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

## Value

The heading between the points, in degrees.

Eliot McIntire

## Examples

 ``` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25``` ```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)) heading(prev, curr) # 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"))) heading(prev, curr) #using both prev <- SpatialPoints(cbind(x = x1, y = y1)) curr <- matrix(c(x0, y0), ncol = 2, dimnames = list(NULL, c("x","y"))) heading(prev, curr) prev <- matrix(c(x1, y1), ncol = 2, dimnames = list(NULL, c("x","y"))) curr <- SpatialPoints(cbind(x = x0, y = y0)) heading(prev, curr) ```

SpaDES.tools documentation built on July 15, 2018, 9:01 a.m.