Very interesting. I was thinking if something like eigen vectors could
help to better determine which angle to rotate, but still looking a
good way to define the right angle to orient the image.
But i didn't knew this package, indeed this function is really interesting.
par(mfrow=c(2,2))
for(i in 1:4) {
plot(sptz[[i]],main=i)
}
par(mfrow=c(2,2))
for(i in 1:4) {
biplot(princomp(sptz[[i]]))
title(i)
}
--
Grato
Augusto C. A. Ribas
Site Pessoal: http://recologia.wordpress.com/
Lattes: http://lattes.cnpq.br/7355685961127056
_______________________________________________
R-sig-phylo mailing list - [email protected]
https://stat.ethz.ch/mailman/listinfo/r-sig-phylo
Searchable archive at http://www.mail-archive.com/[email protected]/
