PCAiv.RdPrincipal Component Analysis with Instrumental Variables
PCAiv(Y, X, row.w = NULL, ncp = 5)data frame with only numeric variables
data frame of instrumental variables, which can be numeric or factors. It must have the same number of rows as Y.
Numeric vector of row weights. If NULL (default), a vector of 1 for uniform row weights is used.
number of dimensions kept in the results (by default 5)
Principal Component Analysis with Instrumental Variables consists in two steps :
1. Computation of one linear regression for each variable in Y, with this variable as response and all variables in X as explanatory variables.
2. Principal Component Analysis of the set of predicted values from the regressions in 1 ("Y hat").
Principal Component Analysis with Instrumental Variables is also known as "redundancy analysis"
An object of class PCA from FactoMineR package, with X as supplementary variables, and an additional item :
the share of inertia explained by the instrumental variables
.
Bry X., 1996, Analyses factorielles multiples, Economica.
Lebart L., Morineau A. et Warwick K., 1984, Multivariate Descriptive Statistical Analysis, John Wiley and sons, New-York.)
library(FactoMineR)
data(decathlon)
# PCAiv of decathlon data set
# with Points and Competition as instrumental variables
pcaiv <- PCAiv(decathlon[,1:10], decathlon[,12:13])
pcaiv$ratio
#> [1] 0.3334462
# plot of \code{Y} variables + quantitative instrumental variables (here Points)
plot(pcaiv, choix = "var")
# plot of qualitative instrumental variables (here Competition)
plot(pcaiv, choix = "ind", invisible = "ind", col.quali = "black")