# Suppose 'cp' is a cross_projector, and we want only columns 1:3 of
# the Y block factors. Then:
# inv_mat_sub <- partial_inverse_projection(cp, colind=1:3, domain="Y")
# The shape will be (3 x pY), so factor_scores_sub (n x 3) %*% inv_mat_sub => (n x pY).
Run the code above in your browser using DataLab