Pude obtener una imagen r2d3 para cambiar el tamaño del ancho automáticamente, pero nada funciona en términos de cambiar el tamaño de la altura, por ejemplo, cuando se cambia a una pantalla más grande.

 tagList( mainPanel(width="100%", tags$div( id = "result-block", d3Output(ns("d3Plot") ,width = "100%" ,height = "750px" )) ,actionButton("go", "Take a screenshot") ) ) #End of tagList } #' r2d3 Server Functions #' #' @noRd mod_r2d3_server <- function(id){ moduleServer( id, function(input, output, session){ ns <- session$ns nodes <- read.csv("inst/app/data/NodesNew.csv") edges <- read.csv("inst/app/data/Edges.csv") map_list <- list(nodes = nodes,links = edges) data <- toJSON(map_list) #Send that json from the session to our javascript session$sendCustomMessage(type="jsondata",data) plotInput <- function(){ data<-data r2d3(css="inst/app/data/net.css", data=data, script = "inst/app/www/net.js", d3_version = "4",sizingPolicy(padding = 0, browser.fill = TRUE,viewer.fill=TRUE)) } output$d3Plot<-renderD3({ print(plotInput()) }) }) }

¿Cómo puedo hacer que cambie de tamaño automáticamente? Se supone que r2d3 maneja esto automáticamente de todo lo que he leído, pero no funciona para mí. ¡Apreciaría cualquier ayuda con esto!