Plotting irregular functional data
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 signature 'irregFunData,missing' plot(x, y, ...)
x |
An object of class |
y |
Missing. |
obs |
A vector of numerics giving the observations to plot. Defaults to all observations in
|
type |
The type of plot. Defaults to |
pch |
The point type. Defaults to |
col |
The color of the functions. Defaults to the |
xlab, ylab |
The titles for x- and y-axis. Defaults to |
xlim, ylim |
The limits for x- and y-axis. Defaults to the total range of the data that is to
plot. See |
log |
A character string, specifying the axis that is to be logarithmic. Can be |
add |
Logical. If |
... |
Additional arguments to |
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)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.