showVarExplained_robust {RaJIVE} | R Documentation |
Gets the variance explained by each component of the Rajive decomposition
showVarExplained_robust(ajiveResults, blocks)
ajiveResults |
List. The decomposition from Rajive |
blocks |
List. The initial data blocks |
The proportion of variance explained by each component
n <- 10
pks <- c(20, 10)
Y <- ajive.data.sim(K =2, rankJ = 2, rankA = c(7, 4), n = n,
pks = pks, dist.type = 1)
initial_signal_ranks <- c(7, 4)
data.ajive <- list((Y$sim_data[[1]]), (Y$sim_data[[2]]))
ajive.results.robust <- Rajive(data.ajive, initial_signal_ranks)
showVarExplained_robust(ajive.results.robust, data.ajive)