climdex.pcic (version 1.1-11)

climdex.r95ptot: Total Daily Precipitation Exceeding 95%ile Threshold

Description

This function computes the climdex index R95pTOT.

Usage

climdex.r95ptot(ci)

Arguments

ci

Object of type climdexInput.

Value

A vector containing an annual timeseries of precipitation exceeding the threshold.

Details

This function takes a climdexInput object as input and computes the climdex index R95pTOT: the annual sum of precipitation in days where daily precipitation exceeds the 95th percentile of daily precipitation in the base period.

References

http://etccdi.pacificclimate.org/list_27_indices.shtml

See Also

climdexInput.raw, climdexInput.csv.

Examples

# NOT RUN {
library(PCICt)

## Create a climdexInput object from some data already loaded in and
## ready to go.

## Parse the dates into PCICt.
tmax.dates <- as.PCICt(do.call(paste, ec.1018935.tmax[,c("year",
"jday")]), format="%Y %j", cal="gregorian")
tmin.dates <- as.PCICt(do.call(paste, ec.1018935.tmin[,c("year",
"jday")]), format="%Y %j", cal="gregorian")
prec.dates <- as.PCICt(do.call(paste, ec.1018935.prec[,c("year",
"jday")]), format="%Y %j", cal="gregorian")

## Load the data in.
ci <- climdexInput.raw(ec.1018935.tmax$MAX_TEMP,
ec.1018935.tmin$MIN_TEMP, ec.1018935.prec$ONE_DAY_PRECIPITATION,
tmax.dates, tmin.dates, prec.dates, base.range=c(1971, 2000))

## Create an annual timeseries of the R95pTOT index.
r95ptot <- climdex.r95ptot(ci)
# }