heading: Heading between spatial points.

Description Usage Arguments Value Author(s) Examples

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.

Author(s)

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.