光沢のあるアプリが入ったスライド プレゼンテーションを作成しています。
例えば:
## 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%"))})
私は2つのことをしたい:
表の文字を小さくする
この例のように、デザインをサイド パネルからフローティング パネルに変更します。
助けてくれてありがとう!