Я изменил высоту моего поля daterangeInput, но не могу понять, как получить размер разделителя, чтобы он соответствовал.
Я использовал RNotebook для генерации HTML-кода для своего кода и подозреваю, что эта строка может содержать ключ:
до
Я попытался добавить .input-group-addon {height: 22px} - это не помогло.
library(shiny)
ui <-
fluidPage(
tags$style(type='text/css', ".form-control {height: 22px;font-size: 12px;}")
dateRangeInput('dateRange',label = "Date Range",start = "2009-01-01", end =" 2010-01-01"))
server <- function(input, output) {}
shinyApp(ui, server)
Imgur