move (version 2.1.0)

plotBursts: Plotting the centroids of a track

Description

The plotBursts function plots bursted Move objects (see ?burst for how to create a bursted Move Object). For every single burst a circle is plotted at the center of every segment of a track. A segment represents consecutive coordinates that belong to a single burst. The properties of the plotted circles (size and color) can represent different information (see Details).

Usage

# S4 method for list
plotBursts(object, add=TRUE, 
			      sizeFUN=function(x) {as.numeric(diff(range(timestamps(x))), 
							      units ="mins")}, 
			      col = NA, breaks = 3, ...)
  # S4 method for .MoveTrackSingleBurst
plotBursts(object, add=TRUE, 
					       sizeFUN=function(x) {
					       as.numeric(diff(range(timestamps(x))), 
								       units ="mins")
					       }, 
					       col = NA, breaks = 3, ...)

Arguments

object

a SpatialPointsDataFrame or a list of these that include coordinates and color, and size of the centroid indicators

add

logical, if FALSE a new plot is generated, default is TRUE

sizeFUN

a function to calculate the size of the plotted circles (see details)

breaks

how many size classes should the circles have, default is 3

col

a vector of color codes with the same length as the burstID. By default the standard colors from 1:8 are used. If there are more than 8 burstIDs the colors are recycled

...

additional plot attributes

Details

Circle colors correspond to burstIDs. The size of the circles is defined by a function. By default this function calculates the relative duration of a segment compared to the whole duration. The function can be adjusted to use a different measure using the sizeFUN argument. Note, it is possible to define break points by using the breaks argument.

Examples

# NOT RUN {
data(leroy)
behav <- c(rep(1:4,each=200), rep(5, 118))
testb <- burst(leroy, f=behav)
plot(coordinates(leroy),type="l")
plotBursts(testb, breaks=3, add=TRUE, pch=19)
plotBursts(testb, breaks=5, add=FALSE, pch=19)

##plotBursts(leroy_b, breaks=c(-Inf,4000,6000, Inf), add=FALSE, pch=19) 

#bursting track by realtive segment length
plotBursts(object=testb, breaks=3, sizeFUN=function(x) sum(seglength(x)), pch=19, add=FALSE)

# }