我有一棵有很多 Twig 的树。这是我绘制树的代码。问题是标签相互重叠,特别是在树的底部。有没有办法绘制树以便标签不重叠?
par(mfrow=c(1,1))
plot(prunedTree, type=c("uniform"))
text(prunedTree)
注意——我使用了“type=c(“uniform”))”,因为它有助于较低分支的可读性。此外,prunedTree 是树包中的“树”类。
这是当前正在生产的示例。
编辑:完全重现问题的代码。
load(url("https://spark-public.s3.amazonaws.com/dataanalysis/samsungData.rda"))
samsungData$subject <- factor(samsungData$subject)
samsungData$activity <- factor(samsungData$activity)
samsungData <- samsungData[, !c(duplicated(names(samsungData)))]
names(samsungData) <- gsub("[.]", "", names(samsungData))
samsungData <- data.frame(samsungData)
trainDF <- samsungData[samsungData$subject %in% c(1,3,5,6),]
tree1 <- tree(activity ~ ., data=trainDF)
plot(tree1)
text(tree1)
最佳答案
除了上面列出的 joran 指示之外,您还可以使用参数:
srt
来更新你的文本。 例如 :
plot(tree1)
text(tree1,col=rainbow(5)[1:25],srt=85,cex=0.8)
关于r - 在 R 中,如何使分类树的分支在图中不重叠?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/15146940/