get_joint_rank {RaJIVE} | R Documentation |
Gets the joint rank from the Rajive decomposition
get_joint_rank(ajive_output)
ajive_output |
List. The decomposition from Rajive |
The joint rank
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)
get_joint_rank(ajive.results.robust)