pointer.plot: Plot pointer years for multiple sites

In pointRes: Analyzing Pointer Years and Components of Resilience

Description

The function creates a dot plot showing positive and (or) negative pointer years from lists of the type as produced by either pointer.norm or pointer.rgc.

Usage

pointer.plot(list.sites, sign = c("both", "pos", "neg"),
             start.yr = NULL, end.yr = NULL, labels = NULL,
             x.tick.major = 10, x.tick.minor = 5)

Arguments

list.sites	a list with lists as produced by either pointer.norm or pointer.rgc for individual sites (created using list(site1, site2,..)).
sign	a character string specifying whether both positive and negative ("both"), or only positive ("pos") or negative ("neg") pointer years should be displayed. Defaults to "both".
start.yr	an integer specifying the first year to be plotted. Defaults to the first year with data if start.yr is NULL.
end.yr	an integer specifying the last year to be plotted. Defaults to the last year with data if end.yr is NULL.
labels	a character vector with labels for the sites. Defaults to 'site 1, 2, .., i'.
x.tick.major	an integer controlling the major x-axis tick labels. Defaults to 10 years.
x.tick.minor	an integer controlling the minor x-axis ticks. Defaults to 5 years.

Details

The function makes a dot plot showing pointer years for multiple sites. Positive and negative pointer years are indicated with different symbols. If event years were defined using method.thresh "Neuwirth" (pointer.norm), different tones of gray indicate weak, strong and extreme pointer years, based on the most common event year class.

Value

Dot plot.

Author(s)

Marieke van der Maaten-Theunissen and Ernst van der Maaten.

Examples

## Plot negative pointer years for multiple sites from pointer.rgc output
data(s033)
site1 <- pointer.rgc(s033, nb.yrs = 4)
site2 <- pointer.rgc(s033, nb.yrs = 6)
sites <- list(site1, site2)
pointer.plot(sites, sign = "neg", start.yr = 1950, end.yr = NULL) 

## Plot pointer years for multiple sites from pointer.norm output (method "Neuwirth")
data(s033)
site1 <- pointer.norm(s033, window = 5, method.thresh = "Neuwirth")
site2 <- pointer.norm(s033, window = 11, method.thresh = "Neuwirth")
sites <- list(site1, site2)
site.names <- c("schneetal5", "schneetal11")
pointer.plot(sites, start.yr = 1950, end.yr = NULL, labels = site.names) 
           

Example output

Loading required package: ggplot2

pointRes documentation built on May 1, 2019, 8:45 p.m.