Использование терминальных панелей в plot() после glmtree()

введите здесь описание изображенияИспользование рекурсивной модели секционирования для логит-деревьев следующим образом

library("partykit")
glmtr <- glmtree(formula = y~t + 1 | (variables)^2,
                 data = dff, 
                 minsize = 500,
                 maxdepth=4,
                 family = binomial)


plot(glmtr, terminal_panel = NULL)

Я получаю график, на котором панели терминалов накладываются друг на друга, и визуальная интерпретация эффектов обработки (t) становится сложной (особенно при включении графика в документ).

Чтобы сделать сюжет более наглядным, я попытался уменьшить maxdepth=3. Несмотря на то, что это помогает, мне не хватает информации, так как я пропускаю много листьев с дерева.

Есть ли способ вручную уменьшить размеры клеммных панелей, сохранив при этом определенное количество лепестков (например, maxdepth=4)?

Это вы заранее :)


r decision-tree glm party
person vog    schedule 18.01.2021    source источник
comment
нам было бы легче помочь вам, если бы вы предоставили автономный пример, который мы можем воспроизвести, чтобы увидеть именно тот сюжет, на который вы ссылаетесь :)   -  person Álvaro A. Gutiérrez-Vargas    schedule 18.01.2021
comment
Теперь вы можете визуализировать сюжет @ÁlvaroA.Gutiérrez-Vargas   -  person vog    schedule 18.01.2021
comment
Спасибо за обновление. К сожалению, я все еще не могу воспроизвести ваш график на своей машине без демонстрационных данных, поэтому моя помощь здесь ограничивается только угадыванием возможных решений. Однако этот вопрос может помочь вам stackoverflow.com/questions/53227676/   -  person Álvaro A. Gutiérrez-Vargas    schedule 18.01.2021
comment
Обычно я бы сказал, что вам просто нужно рисовать на устройстве, достаточно большом, чтобы показать все. Так что что-то вроде pdf("glmtr.pdf", height = 10, width = 20); plot(glmtr, terminal_panel = NULL); dev.off() может сработать. Затем вы можете использовать программу просмотра PDF для увеличения частей дерева и т. д.   -  person Achim Zeileis    schedule 19.01.2021
comment
Это сработало! Спасибо @AchimZeileis   -  person vog    schedule 24.01.2021
comment
Хорошо, спасибо за продолжение. Теперь я превратил его в ответ ниже, чтобы вы могли его принять (щелкнув галочку слева от ответа). Затем SO помечает вопрос как решенный.   -  person Achim Zeileis    schedule 24.01.2021

Ответы (1)


arrow_upward
1
arrow_downward

В такой ситуации я рекомендую построить дерево на устройстве, которое достаточно велико, чтобы показать все и где вы можете легко масштабировать и т. д. Например, можно построить в большой файл PDF, а затем просматривать и масштабировать с помощью средства просмотра PDF. Что-то вроде этого должно работать нормально:

pdf("glmtr.pdf", height = 10, width = 20)
plot(glmtr, terminal_panel = NULL)
dev.off()
person Achim Zeileis    schedule 24.01.2021