library(StatDA)
data(mtcars)
x=mtcars[,1:7]
# Castles
pdf("multcastles.pdf",width=5,height=5)
par(mar=c(0,0,2,0))
tree(x/100,key.loc=c(21,5),len=0.5, lh=1,leglh=0.3,
wmax=0,wmin=0, leglen=1, cex=0.5, location=loc*4)
dev.off()
|
|
# Darstellung multivariater Daten:
library(StatDA) data(mtcars) x=mtcars[,1:7] # Castles pdf("multcastles.pdf",width=5,height=5) par(mar=c(0,0,2,0)) tree(x/100,key.loc=c(21,5),len=0.5, lh=1,leglh=0.3, wmax=0,wmin=0, leglen=1, cex=0.5, location=loc*4) dev.off() |