SIRthresholded (version 1.0.2)

plot.SIR_bootstrap: Graphical output of SIR_bootstrap

Description

Display the 10 first eigen values and the estimated index versus Y of the SIRbootstrap model.

Usage

# S3 method for SIR_bootstrap
plot(x, choice = "", ...)

Value

No return value

Arguments

x

A SIR_bootstrap object

choice

the graph to plot:

• "eigvals" Plot the eigen values of the matrix of interest.

• "estim_ind" Plot the estimated index by the SIR model versus Y.

• "" Plot every graphs (default).

...

arguments to be passed to methods, such as graphical parameters (not used here).

Examples

# Generate Data
set.seed(10)
n <- 500
beta <- c(1,1,rep(0,8))
X <- mvtnorm::rmvnorm(n,sigma=diag(1,10))
eps <- rnorm(n)
Y <- (X%*%beta)**3+eps

# Apply bootstrap SIR
res = SIR_bootstrap(Y, X, H = 10, B = 10)

# Eigen values
plot(res,choice="eigvals")

# Estimated index versus Y
plot(res,choice="estim_ind")