闪亮的R移动侧边栏

时间:2015-02-26 13:59:06

标签: r shiny sidebar

我有一个侧栏如下

  sidebarPanel(
    wellPanel(

      list(tags$head(tags$style("body {background-color: #E0F2F7; }"))),


      helpText("Choose a stock ticker to examine, For example
               ^HSI - Hang Seng, 
               ^N225 - Nikkei 225 and 
               ^FTSE - FTSE 100. 
               Information will be collected from",tags$a(href="https://uk.finance.yahoo.com/lookup", "yahoo finance"),"."),

      textInput("symb", "Symbol", "^FTSE"),
      bsAlert(inputId = "alert_anchor"),

      dateRangeInput("dates", 
                     "Date range",
                     start = "2015-01-01", 
                     end = as.character(Sys.Date())),
      textOutput("DateRange"),
      div(style="display:inline-block",submitButton("Analysis")),
      div(style="display:inline-block",downloadButton('downloadData', 'Download Data')),width=6
      ))

其中给出以下内容(侧栏位于左侧) enter image description here

但是我想要它,以便当用户上下滚动时侧边栏跟随页面,而不是左侧有一个空白的蓝色空间,如图所示。

enter image description here

这对R Shiny有可能吗?如果是这样,怎么办呢?

0 个答案:

没有答案
相关问题