
Last chance! 50% off unlimited learning
Sale ends in
This function plots observations of irregular functional data on their domain.
plot.irregFunData(x, y, obs = seq_len(nObs(x)), type = "b", pch = 20,
col = grDevices::rainbow(length(obs)), xlab = "argvals", ylab = "",
xlim = range(x@argvals[obs]), ylim = range(x@X[obs]), log = "",
add = FALSE, ...)# S4 method for irregFunData,missing
plot(x, y, ...)
An object of class irregFunData
.
Missing.
A vector of numerics giving the observations to plot. Defaults to all observations in
x
.
The type of plot. Defaults to "b"
(line and point plot). See
plot
for details.
The point type. Defaults to 20
(solid small circles). See
par
for details.
The color of the functions. Defaults to the rainbow
palette.
The titles for x- and y-axis. Defaults to "argvals"
for the x-axis and no
title for the y-axis. See plot
for details.
The limits for x- and y-axis. Defaults to the total range of the data that is to
plot. See plot
for details.
A character string, specifying the axis that is to be logarithmic. Can be ""
(non-logarithmic axis, the default), "x", "y", "xy"
or "yx"
. See
plot.default
for details. This parameter is ignored, if add =
TRUE
.
Logical. If TRUE
, add to current plot (only for one-dimensional functions).
Defaults to FALSE
.
Additional arguments to plot
.
plot.funData
, '>irregFunData
,
plot
# NOT RUN {
oldpar <- par(no.readonly = TRUE)
# Generate data
argvals <- seq(0,2*pi,0.01)
ind <- replicate(5, sort(sample(1:length(argvals), sample(5:10,1))))
object <- irregFunData(argvals = lapply(ind, function(i){argvals[i]}),
X = lapply(ind, function(i){sample(1:10,1) / 10 * argvals[i]^2}))
plot(object, main = "Irregular functional data")
par(oldpar)
# }
Run the code above in your browser using DataLab