Reducing the space between the sidebarpanel and mainpanel in shiny

Question

Kindly suggest me as how to reduce the space between the sidebarpanel and mainpanel in shiny app.

Regards,
Mohan

[![enter image description here][2]][2]

Answer 1

I use column to choose the size of my dashboard. I think the problem is because you set the size in px in tags$style. This code works

library(shiny)    
library(shinythemes)

shinyUI(fluidPage(theme = shinytheme("cerulean"),
              #img(src='logo.jpg', align = "right"),
              titlePanel("Project1"),
              fluidRow(width=12,
              sidebarLayout(
                column(width=4,
                sidebarPanel(
                     width=12,
                     radioButtons("source", "Source Type:", c("online", "offline")),
                     conditionalPanel(
                       condition = "input.source == 'online'",
                       selectInput("e_source", "online_Source",
                                   list("Yahoo","CNBC","Others"), selected = "CNBC")),
                     conditionalPanel(
                       condition = "input.source == 'offline'",
                       selectInput("e_source", "offline_Source",
                                   list("Newspaper",
                                        "magazines",
                                        "books"), selected = "books")),
                     checkboxGroupInput("size", 
                                   label = ("aAd size"), 
                                   choices = list("Medium", "Large", "small"
                                   ), selected = "small"))),
                column(width=8,
                       mainPanel(tabsetPanel("tab",tabPanel("Ad Details", tableOutput("table1"))), width=12))
              ))))