[R-br] Ajuda com o R

[Thiago De paula protásio]

Karla;
Dê uma olhada nos comandos abaixo....Talvez, te ajude.....!!!

comp=read.csv("D:/componentes principais/comp.csv",sep=";",dec=",",h=T,row.name="Resíduos")

matrix=as.matrix(comp)
de=dist(matrix,method="euclidean")^0.5 # distância euclidiana entre os objetos da matrix
hc=hclust(de,"average")#cluster pelo método da ligação média e a distância euclidianaplot(hc,cex=1.0,hang=0.5)
hc$height
cof=cophenetic(hc) cor(cof,de) # Correlação entre as distâncias originais e as distânicias recuperas no dendrograma (Correlação cofenética)

library(pvclust)
X=t(as.matrix(comp))X
fit=pvclust(X, method.hclust="average",method.dist="euclidean")plot(fit)
pvrect(fit, alpha=.95) 
Thiago de Paula Protásio

Acadêmico de Engenharia Florestal

Universidade Federal de Lavras

Laboratório de Energia da Biomassa Florestal

Laboratório de Biomateriais

(035) 9183-2246
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110426/c06764bc/attachment.html>