mercredi 25 mai 2016

Aligning checkboxInput along with the box title in shiny

I have a shiny application, where in I am trying to provide a checkbox on top of a graph for the user to select. Currently, the check box is rendered below the title, whereas I want the title on the left hand side and the check box on the right hand side in the same line. I am sure it can be achieved through recoding CSS, but don't know how. The current code looks as follows:

library(shiny)
library(shinydashboard)

ui <- dashboardPage(
    dashboardHeader(
        title = "MODULE",titleWidth = 225
    ),
    dashboardSidebar(
        width = 225,
        sidebarMenu(id = "tabs",
                    menuItem("TOPLINES", tabName = "tplines", icon = shiny::icon("dashboard"))
        )),
    dashboardBody(
        tabItems(
            tabItem(
                tabName = "tplines",
                fluidRow(
                    box(
                        checkboxInput(inputId = "inventorytop8metrocheck", "Add to reports", value = FALSE),
                        width = 6, status = "info", title = "Inventory information",
                        div(plotlyOutput("inventorytop8metro"), width = "100%", height = "400px", style = "font-size:80%;")
                    )
                    )))))

server <- function(session,input,output){

}

shinyApp(ui,server)




Aucun commentaire:

Enregistrer un commentaire