# To get the number of factors to retain
# from a correlation matrix
pa(ex_2factors, n = 42)
# from a data set
jd <- genr8(n = 404, R = ex_4factors_corr)
pa(jd)
# from a nest output
pa(nest(ex_2factors, n = 42))
# To get the 95th critical eigenvalues
pa(n = 10, nv = 2, nreps = 100)
Run the code above in your browser using DataLab