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