vip
computes the influence on the $Y$-responses
of every predictor $X$ in the model.vip(object)
"pls"
or "spls"
.vip
produces a matrix of VIP coefficients for each $X$ variable (rows) on each
variate component (columns).VIP allows to classify the $X$-variables according to their explanatory power of $Y$. Predictors with large VIP, larger than 1, are the most relevant for explaining $Y$.
pls
, spls
, summary
.data(linnerud)
X <- linnerud$exercise
Y <- linnerud$physiological
linn.pls <- pls(X, Y)
linn.vip <- vip(linn.pls)
barplot(linn.vip,
beside = TRUE, col = c("lightblue", "mistyrose", "lightcyan"),
ylim = c(0, 1.7), legend = rownames(linn.vip),
main = "Variable Importance in the Projection", font.main = 4)
Run the code above in your browser using DataLab