Displaying 1 result from an estimated 1 matches for "pu239".
Did you mean:
pr239
2005 May 23
1
Can't reproduce clusplot princomp results.
...ster")
[1] TRUE
> pluton.agnes <- agnes(pluton)
> clusters <- cutree(as.hclust(pluton.agnes), h=4.00)
> clusplot(pluton, clusters, lines=0)
> pca <- princomp(pluton, cor=TRUE)
> loadings(pca)
Loadings:
Comp.1 Comp.2 Comp.3 Comp.4
Pu238 0.521 0.348 0.714 0.313
Pu239 -0.540 0.837
Pu240 0.418 -0.835 0.353
Pu241 0.512 0.418 -0.698 0.277
Comp.1 Comp.2 Comp.3 Comp.4
SS loadings 1.00 1.00 1.00 1.00
Proportion Var 0.25 0.25 0.25 0.25
Cumulative Var 0.25 0.50 0.75 1.00