powered by
getages(RJ)
Redux
results
data(Melbourne) R <- get4039(Melbourne$X,Melbourne$irr) J <- getJfactors(R) ages <- getages(J) plotcorr(ages$covmat)
Run the code above in your browser using DataLab