Compute principal angles for a set of subspaces

This function calculates the principal angles between subspaces derived from a list of bi_projector instances.

Usage

prinang(fits)

Arguments

fits

a list of bi_projector instances

Value

a numeric vector of principal angles with length equal to the minimum dimension of input subspaces

Examples

data(iris)
X <- as.matrix(iris[, 1:4])
res <- pca(X, ncomp = 4)
fits_list <- list(res,res,res)
principal_angles <- prinang(fits_list)