2016-06-14 131 views
0

enter image description here請提醒我如何減少側面板和主面板之間的空間閃亮的應用程序。減少側面板和主面板之間的空間閃亮

問候,
磨憨

[![輸入圖像的描述在這裏] [2] [2]

+0

Wheres the code? –

+1

如果您發佈了代碼R – CClaire

+0

@CClaire,則可以更輕鬆地爲您提供幫助我已將代碼發佈到下面的鏈接中,http://stackoverflow.com/questions/37792933/need-help-on-conditional-panel-in-shiny –

回答

2

我使用列選擇我的儀表盤的大小。我認爲這個問題是因爲你在標籤$ style中設置了px的大小。 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)) 
      ))))