R: Plotting Time-Series Objects

plot.ts {base}

R Documentation

Plotting Time-Series Objects

Description

Plotting methods for objects of inheriting from class "ts" or "mts" (multivariate time-series).

Usage

## S3 method for class 'ts'
plot(x, y = NULL, type = "l", frame.plot = axes,
     plot.type = c("multiple", "single"),
     xy.labels = n <= 150, xy.lines = do.lab, panel=lines, ...)

lines(x, ...)

Arguments

x, y

time series objects, usually of class "ts".

type

the type of plot, see plot. When y is present, the default will depend on xy.labels, see below.

frame.plot

a function to give the ‘frame’ for each panel.

plot.type

for multivariate time series, should the series by plotted separately (with a common time axis) or on a single plot?

xy.labels

logical, indicating if text() labels should be used for an x-y plot, or character, supplying a vector of labels to be used.

xy.lines

logical, indicating if lines should be drawn for an x-y plot. Defaults to the value of xy.labels if that is logical, otherwise to TRUE.

panel

a function(x, col, bg, pch, type, ...) which gives the action to be carried out in each panel of the display for plot.type="multiple". The default is lines.

...

additional graphical arguments, see plot, plot.default and par.

Details

If y is missing, these functions create time series plots, for multivariate series of one of two kinds depending on plot.type,

If y is present, both x and y must be univariate, and a “scatter” plot y ~ x will be drawn, enhanced by using text if xy.labels is TRUE or character, and lines if xy.lines is TRUE.

Examples


## Multivariate
z <- ts(matrix(rt(300, df = 3), 100, 3), start=c(1961, 1), frequency=12)
plot(z, type = "b")    # multiple
plot(z, plot.type="single", lty=1:3, col=4:2)

## A phase plot:
data(nhtemp)
plot(nhtemp, c(nhtemp[-1], NA), cex = .8, col="blue",
     main = "Lag plot of New Haven temperatures")
## a clearer way to do this would be
## Not run: library(ts)
plot(nhtemp, lag(nhtemp, 1), cex = .8, col="blue",
     main = "Lag plot of New Haven temperatures")

## End(Not run)

library(ts)  # normally loaded

data(sunspots)
## xy.lines and xy.labels are FALSE for large series:
plot(lag(sunspots, 1), sunspots, pch = ".")

data(EuStockMarkets)
SMI <- EuStockMarkets[, "SMI"]
plot(lag(SMI,  1), SMI, pch = ".")
plot(lag(SMI, 20), SMI, pch = ".", log = "xy",
     main = "4 weeks lagged SMI stocks -- log scale", xy.lines= TRUE)