使用Shiny更改Slidify中的字体大小和侧面板

Question

我正在创建一个内部闪亮的应用程序的滑动演示文稿。

例如：

## Interactive Chart with Shiny Controls

{r opts.label = 'shiny'}
slidifyUI(
  sidebarPanel(
    selectInput('sex', 'Choose Sex', c('Male', 'Female')),
    selectInput('type', 'Choose Type',
      c('multiBarChart', 'multiBarHorizontalChart')
    )
  ),
  mainPanel(
    tags$div(id = 'googletables', class='shiny-html-output')
  )
)

，应用

require(rCharts)
output$googletables <- renderGvis({gvisTable(Population, options=list(width="100%", height="100%"))})

我想做两件事：

1. 使表格上的文字变小

2. 将设计从侧面板更改为浮动面板，如此example。

感谢您的帮助！