EIplot: Plot the intervals between times against the times

In eventInterval: Sequential Event Interval Analysis

Description

Plot the intervals between times against the times.

Usage

 EIplot(event_times,main="",xlab="",ylab="",xaxticks=NA,xaxlabs=NA)

Arguments

event_times	A numeric vector of times of occurrence of events.
main	Title for the plot.
xlab	X axis label for the plot.
ylab	Y axis label for the plot.
xaxticks	Optional X tick mark positions.
xaxlabs	Optional X tick labels.

Details

EIplot calculates the intervals between the times passed in event_times and plots a scattergram of intervals against times. It adds a smoothed line and a "rug" of the event times to allow visual inspection for trend.

Value

nil

Author(s)

Jim Lemon

Examples

 # Florida hurricane analysis (20th century)
 data(florida_hurr20)
 oldloc<-Sys.setlocale("LC_TIME", "C")
 fh_dates<-
  as.Date(paste(florida_hurr20$day,florida_hurr20$month,
  florida_hurr20$year,sep="-"),"%d-%B-%Y")
 fh_days<-as.numeric(fh_dates)
 fh_ints<-diff(fh_days)
 fh_counts<-tabulate(florida_hurr20$year[-1]-1899,nbins=100)
 EIplot(fh_days,main="Florida hurricanes, 1900-1999",
  xlab="Year",ylab="Interval between hurricanes (days)",
  xaxticks=as.Date(as.character(seq(1900,2000,by=20)),"%Y"),
  xaxlabs=seq(1900,2000,by=20))
 Sys.setlocale("LC_TIME", oldloc)

Example output

[1] "C"

eventInterval documentation built on May 1, 2019, 9:22 p.m.