更改R方绘图中的标签位置（决策/回归树）

Question

partykit包给出了决策树的良好表示形式。我遇到的唯一问题是标签很长，然后重叠。是否可以移动这些标签以防止它（请参阅下图中的蓝色箭头）？

library("rpart") 
library("partykit") 
rp <- rpart(Kyphosis ~ Age + Number + Start, data = kyphosis) 
party_rp <- as.party(rp) 

plot(party_rp) 

Answer 1

绘制边缘默认面板功能标签edge_simple实现几个理由策略：标签可以"alternate"横跨边缘，是"decreasing"，"increasing"，或"equal"。然而，这些理由策略仅从最小标签长度justmin开始使用，其默认为Inf（即，没有理由）。有关更多详细信息，请参阅?edge_simple。

您想看看一个例子，其中理由是"increasing"和总是施加（即，justmin = 1）：

plot(party_rp, 
    ep_args = list(justmin = 1, just = "increasing"))