Блестящие элементы renderUI не масштабируются на меньшем экране - PullRequest
0 голосов
/ 24 апреля 2018

У меня есть пара элементов на блестящей приборной панели (с использованием flexdashboard, smoothjs и transparentWidgets), которые затеняются при каждой попытке масштабирования от размера браузера до размера экрана планшета или телефона. Это происходит только с элементами, созданными с помощью функции renderUI (). Те же объекты отображаются нормально, если они просто объявлены и «неактивны». Это не уникально для следующего раскрывающегося примера, но также происходит при рендеринге вывода HTML () аналогичным образом.

Например, следующая выпадающая кнопка блестящего виджета будет отлично масштабироваться, если она будет немедленно объявлена. Другими словами, на экране отображается соответствующая высота.

dropdownButton(
    p(strong("Append to API request")),
    circle = FALSE, 
    status = "danger",
    label = " Toggle",
    icon = icon("transfer", lib = "glyphicon"), 
    width = "200px"
)

Это, однако, не делает и становится скрытым следующей панелью с чрезмерным заполнением внизу, которое отсутствует в размере браузера.

uiOutput('sample_dropdown')
output$sample_dropdown <- renderUI(dropdownButton(
    circle = FALSE, 
    status = "danger",
    label = " Resample",
    icon = icon("record", lib = "glyphicon"), 
    width = "200px"
))
...