Rpart绘图文字较短

Question

我正在使用包中的prp函数rpart.plot来绘制树。对于状态之类的分类数据，它给出了很长的变量列表，并使可读性降低。如果超过一定长度，是否可以将文本包装为两行或更多行？

Answer 1

下面是一个将长分割标签包装在多行上的示例。每行的最大长度为 25 个字符。更改 25 以适合您的目的。（此示例源自rpart.plot vignette中的第 6.1 节。）

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)