# NOT RUN {
library(metan)
cc1 <- can_corr(data_ge2,
FG = c(PH, EH, EP),
SG = c(EL, ED, CL, CD, CW, KW, NR))
# Canonical correlations for each environment
cc3 <- data_ge2 %>%
can_corr(FG = c(PH, EH, EP),
SG = c(EL, ED, CL, CD, CW, KW, NR),
by = ENV,
verbose = FALSE)
# }
Run the code above in your browser using DataLab