arules сгруппированный матричный график и метки в r

Question

В настоящее время я использую пакет arulesViz для создания кластеров в рамках моих правил. У вас может быть пример метода кластеризации, предоставляемого пакетами arulesViz. Единственное, что беспокоит, - это метки кластеров, которые недоступны через attr(group_plot$mAggr, "dimnames"). глядя на arulesViz код , я обнаружил, что метки отображаются с помощью функции grid.text(). Есть ли способ получить доступ к этим меткам, поскольку я не могу найти аргумент gPath для передачи функции grid.get().

library(arules)
library(arulesViz)
data("Groceries")

rules <- apriori(Groceries, 
                 parameter = list(supp = 0.01, conf = 0.1))

group_plot <- plot(rules,
                   method = "grouped",
                   measure = "support",
                   shading = "lift",
                   control = list(k=5,
                                  lhs_items =3))