inst/comoapp/www/ui/pushbar_parameters_country.R

In ocelhay/como: A Web Application of the CoMo COVID-19 Model

list(
  pushbar(id = "pushbar_parameters_country", from = "right",
          br(), br(), br(),
          fluidRow(
            column(4, includeMarkdown("./www/markdown/about_country_data.md"), includeMarkdown("./www/markdown/about_data.md")),
            column(4,
                   pickerInput("country_demographic", label = "Demographic Data:", choices = countries_demographic,
                               selected = "Afghanistan", options = pickerOptions(liveSearch = TRUE)),
                   pickerInput("country_cases", label = "Cases/Deaths:", choices = countries_cases,
                               selected = "Afghanistan", options = pickerOptions(liveSearch = TRUE)),
                   br(),
                   p("To provide serology data, fill the Epidemiology sheet of the template and upload it.")
            ),
            column(4,
                   pickerInput("country_contact", label = "Social Contacts Data:", choices = countries_contact,
                               selected = "Pakistan", options = pickerOptions(liveSearch = TRUE)),
                   sliderInput("household_size", label = "Mean household size:", value = 2.8, min = 1, max = 10,
                               step = 0.1, post = " indiv.", ticks = FALSE),
                   numericInput("mean_imports", label = "Mean number of infectious migrants per day:", value = 0, min = 0, max = NA,
                                width = "50%")
            )
          ),
          div(class = "closebutton", actionButton("close_country_param", label = span(icon('times'), " Close (Esc.)"), class = "btn-danger btn-sm"))
  )
)