tree - 在 Partykit 中更改标签

Question

在partykit包中，我想对边缘的数字标签进行舍入和格式化。我该怎么做呢？
例如，在下面，我希望能够转换<11897.65为<11,898. 小数点后四舍五入到 0 位，千位后插入逗号。

例子

Answer 1

边缘的标记由生成的面板函数完成edge_simple()，请参阅?edge_simple。ep_args您可以使用，例如，将参数传递给边缘面板生成器

library("partykit")
ct <- ctree(Species ~ ., data = iris)
plot(ct, ep_args = list(digits = 0))

不支持插入逗号来分隔千位edge_simple()。如果你想拥有它，你可以复制它的代码edge_simple()并自己添加这种格式。但是，我建议简单地将相应的变量除以1000产生易于阅读的内容。