Как изменить размер шрифта по умолчанию в интерактивном treemap, построенном с использованием d3tree и treemap в R?

Question

творим интерактивные многоуровневые Древовидные карты и экспортировать их в HTML-файлах - это как мой код выглядит следующим образом:

library(googleVis) #not really needed, only using the datset "Fruit" in example 
library(treemap) 
library(d3treeR) 

fruitTree <- d3tree(
       treemap(Fruits, 
         index=c("Fruit", "Year"), 
         vSize="Profit", 
         vColor="Fruit" 
        ) 
        ,rootname = "Fruit") 

htmlwidgets::saveWidget(as.widget(fruitTree), "D:/temp/fruit.html") 

Мне не нравится размер шрифта по умолчанию, и я не нахожу возможность манипулировать им (по крайней мере, для интерактивных виз., когда используется команда «treemap»).

Это как выглядит результат:

первый слой:

второй слой, при нажатии на один из блоков:

Любая помощь очень ценится.

Answer 1

Вы можете использовать htmltools::tags():

library(htmltools) 

browsable(
    tagList(
    tags$head(
     tags$style('text.label{font-size: 20px !important}') 
    ), 
    d3tree(
     treemap(Fruits, 
       index=c("Fruit", "Year"), 
       vSize="Profit", 
       vColor="Fruit" 
    ) 
     ,rootname = "Fruit") 
) 
) 

Что дает: