partykit - Как построить glmtree без перекрытия терминальных узлов?

Question

Я хотел бы построить дерево, полученное из glmtree (пакет partykit). К сожалению, терминальные узлы перекрываются, и метки графиков больше не отображаются должным образом.

Этот код генерирует дерево:

library(partykit)
library(aVirtualTwins)

data(sepsis)
attach(sepsis)

data <- cbind(y = survival, trt = as.factor(THERAPY), sepsis[,3:13])
formula <- as.formula(paste("y ~ trt", paste(names(sepsis[,3:13]), 
                            collapse = " + "), sep = " | "))
fit <- glmtree(formula, data, family = binomial)

plot(fit)

detach(sepsis)

Есть ли способ настроить вывод plot (), чтобы избежать перекрытия терминальных узлов?

Вот изображение того, что я имею в виду:

Answer 1

Вывод plot() для glmtree объектов (а также других partykit объектов) настраивается с помощью функций панели для всех аспектов дерева (внутренние узлы, терминальные узлы, ребра, ...). Функция панели, используемая по умолчанию для этого вида дерева, node_bivplot(), которая имеет ряд аргументов, которые можно настроить. Смотрите ?node_bivplot для деталей. Соответствующая опция здесь ylines, которую вы можете увеличить, например, до 2.

Для передачи аргументов в функцию панели терминала можно использовать tp_args:

plot(fit, tp_args = list(ylines = 2))