R：更改绘图大小

Question

我正在使用 R 编程语言。我使用“rpart”库运行了一个决策树函数：

library(rpart)
z.auto <- rpart(Mileage ~ Weight, car.test.frame)

从这里开始，我尝试绘制结果：

 plot(z.auto)

这将返回以下图：

以及一些警告信息：

Warning messages:
1: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter
2: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter
3: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter
4: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter
5: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter
6: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter
7: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter
8: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter
9: In doTryCatch(return(expr), name, parentenv, handler) :
  "use.n" is not a graphical parameter

我正在尝试在此图中添加更多信息（例如变量名称和决策规则）。我做了一些研究，发现你可以给这个情节添加标签：

text(z.auto, use.n=TRUE)

这将返回以下图：

这个情节更好 - 但文本被切断到底部。有没有一种简单的方法可以改变绘图的内部大小，使所有文本都显示出来而不会被截断？

注意：我使用的计算机没有互联网连接或 USB 端口 - 它只有 R 和一些常用库（例如 ggplot2、rpart、party、partykit 等），我无法安装我电脑上的“rpart.plot”库（https://www.rdocumentation.org/packages/rpart.plot/versions/3.0.9），否则我会尝试使用这个库。

谢谢

Answer 1

使用xpd=TRUE。 cex= 也可能有助于缩放字体大小。

plot(z.auto)
text(z.auto, use.n=TRUE, xpd=TRUE, cex=.8)

Answer 2

您可以使用rattle 包来绘制 CART 样

library(rpart)
library(rpart.plot)
library(rattle)

z.auto <- rpart(Mileage ~ Weight, car.test.frame)
#Plotting using `rpart.plot` package
prp(z.auto, type = 1)

#Plotting using `rattle` package
fancyRpartPlot(z.auto)