print.loadings(x, cutoff=0.1, digits=<<see below>>)
prim4.pc <- princomp(prim4) print(loadings(prim4.pc), cutoff=.2)