#####################################
##### Matriz
#################################
data("Dados.MED")
data=as.matrix(Dados.MED[,5:7])
plot3d(Obj = data,names = letters[1:10],
lab=c("Retencao 75",
"Retencao 55",
"Retencao fundo"),size =2 )
#####################################
##### Componentes Principais
#################################
data(Dados.MED)
cp=ComponentesPrincipais(Dados.MED,layout = 11,
CorPlot = TRUE,VarCol = "green")
plot3d(Obj = cp,names = letters[1:10],
lab=c("Principal Component 1",
"Principal Component 2",
"Principal Component 3"),size =2 )
#####################################
##### Variaveis canonicas
#################################
data(Dados.DBC)
VC=VariaveisCanonicas(Dados.DBC,2,CorCol = "red",VarCol = "red")
plot3d(VC)
plot3d(VC,names = paste("Var","1:10"),
lab=c("Variable component 1",
"Variable Component 2",
"Variable Component 3"),size =2 )
#####################################
##### Coordenadas Principais
#################################
data=data("Dados.CAT")
Dist=Distancia(Dados.CAT,Metodo=10)
CO=CoordenadasPrincipais(Dist)
plot3d(Obj = CO,names = letters[1:9],
lab=c("PCoA 1",
"PCoA 2",
"PCoA 3"),size =2 )
Run the code above in your browser using DataLab