TableOfReal CCA_and_TableOfReal_factorLoadings (CCA me, TableOfReal thee) { try { autoCorrelation c = TableOfReal_to_Correlation (thee); autoTableOfReal him = CCA_and_Correlation_factorLoadings (me, c.peek()); return him.transfer(); } catch (MelderError) { Melder_throw (me, U": no factor loadings created."); } }
TableOfReal CCA_and_TableOfReal_factorLoadings (CCA me, TableOfReal thee) { Correlation c = NULL; TableOfReal him = NULL; c = TableOfReal_to_Correlation (thee); if (c == NULL) return NULL; him = CCA_and_Correlation_factorLoadings (me, c); forget (c); return him; }