rpart 绘图文本更短

Question

我正在使用 prp来自 rpart.plot 的函数用于绘制树的包。对于像状态这样的分类数据，它提供了一个非常长的变量列表，并且降低了可读性。如果超过一定长度，有没有办法将文本换行到两行或更多行？

Answer 1

这是一个将长分割标签包装在多个
线。每行的最大长度为 25 个字符。改变
25 适合您的目的。 (此示例源自第 6.1 节
rpart.plot vignette .)

tree <- rpart(Price/1000 ~ Mileage + Type + Country, cu.summary)

split.fun <- function(x, labs, digits, varlen, faclen)
{
    # replace commas with spaces (needed for strwrap)
    labs <- gsub(",", " ", labs)
    for(i in 1:length(labs)) {
        # split labs[i] into multiple lines
        labs[i] <- paste(strwrap(labs[i], width=25), collapse="\n")
    }
    labs
}

prp(tree, split.fun=split.fun)