Helper function to print PC and explained variances
getExpVarLabel(ev, choices, compact = FALSE)A character vector of labels in the form
"Principal component N (X% variance explained)".
A numeric vector of explained variances
An integer vector to indicate which PCs to be returned. If
NULL or NA or missing, all elements are returned.
Logical, either a compact label is returned, see
examples.