Reconstruct data after removing principal components. This function will reconstruct a truncated version of the original data matrix after removing the specified principal components. The source code for this function was stolen from stack exchange
Arguments
- x
data.frame or matrix of original data.
- components
numeric vector of components to remove from original data. Default (1)
- ...
Additional arguments passed to
prcomp()
Examples
# Remove first two components from dataset
trunc <- remove_components(USArrests, components = 1:2, scale. = TRUE, center = TRUE)
# original data
head(USArrests)
#> Murder Assault UrbanPop Rape
#> Alabama 13.2 236 58 21.2
#> Alaska 10.0 263 48 44.5
#> Arizona 8.1 294 80 31.0
#> Arkansas 8.8 190 50 19.5
#> California 9.0 276 91 40.6
#> Colorado 7.9 204 78 38.7
# reconstructed data
head(trunc)
#> Murder Assault UrbanPop Rape
#> Alabama 8.879093 171.0042 68.24625 17.99226
#> Alaska 3.558807 152.5293 53.64856 36.33858
#> Arizona 5.370958 220.7384 63.64209 20.95841
#> Arkansas 7.107685 179.4374 64.56869 21.94987
#> California 5.949990 178.4936 61.64172 25.48834
#> Colorado 6.181011 146.4461 59.61149 29.53625