Сохранить соотношение сторон с помощью диаграммы Shiny + R2D3 - PullRequest
0 голосов
/ 15 марта 2019

Я пытаюсь добавить диаграмму D3.js в Shiny, используя библиотеку r2d3.Моя диаграмма находится внутри столбца, который использует 50% ширины окна:

body <- dashboardBody(
    tabsetPanel(
        tabPanel("Summary", column(6, d3Output("chart"))),
        tabPanel(...)
    )
)

Мне нужно, чтобы высота диаграммы составляла 60% от его ширины, но я не могу ее достичь.Сервер содержит следующий фрагмент:

function(input, output, session) {
    ...
    output$chart <- renderD3({r2d3(script="chart.js", 
                                   container="svg", data=c(0.1, 0.3, 0.5, 0.7, 1))})
}

Я попытался, установив height = "auto" в элементе пользовательского интерфейса d3Output, но он не работает.

Можно ли динамически установить высоту на сервере с помощью объекта session ?Или есть другая альтернатива?

Заранее спасибо, Серхио.

...