R：更改绘图大小

Posted 2023-03-12

【中文标题】R：更改绘图大小

【英文标题】：R: Changing Plot Sizes

【发布时间】：2021-04-17 02:03:43

【问题描述】：

我正在使用 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），否则我会尝试使用这个库。

谢谢

【问题讨论】：

有没有办法确保绘图被缩放以自动适应页面？使用“party”或“partykit”库更容易解决这个问题吗？

【参考方案1】：

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

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

【讨论】：

感谢您的回复！我不能接受答案，直到几分钟。派对也可以这样做吗？我尝试使用派对图书馆制作一个情节，但我得到的只是一个大正方形。 ggplot2也可以吗？感谢您的所有帮助！

@stats555 我没用过派对库，抱歉。

如果可能的话，你能看看这个相关的问题吗？ ***.com/questions/65679523/… 感谢您的所有帮助！

@stats555 我知道了，但恐怕我不知道 :)

【参考方案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) 

【讨论】：

感谢您的回复！正如我在问题中解释的那样，不幸的是我无法访问 rpart.plot。我也无法使用拨浪鼓。这可以在没有他们的情况下完成吗？谢谢