Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/75.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
rpart打印文本较短_R_Rpart - Fatal编程技术网

rpart打印文本较短

rpart打印文本较短,r,rpart,R,Rpart,我正在使用rpart.plot包中的prp函数来绘制树。对于像状态这样的分类数据,它给出了一个非常长的变量列表,使其可读性降低。如果超过某个长度,有没有办法将文本换行到两行或多行?下面是一个将长拆分标签换行到多行的示例 线。每行的最大长度为25个字符。改变 25来满足你的目的。(该示例源自中的第6.1节。) ) tree检查一下,你可以创建一个函数来减少可变长度 tree <- rpart(Price/1000 ~ Mileage + Type + Country, cu.summary)

我正在使用
rpart.plot
包中的
prp
函数来绘制树。对于像状态这样的分类数据,它给出了一个非常长的变量列表,使其可读性降低。如果超过某个长度,有没有办法将文本换行到两行或多行?

下面是一个将长拆分标签换行到多行的示例 线。每行的最大长度为25个字符。改变 25来满足你的目的。(该示例源自中的第6.1节。) )

tree检查一下,你可以创建一个函数来减少可变长度
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)