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))