mirror-github-bspeice/betterwithdata_cleaning_4
1
0
Fork 0
mirror of https://github.com/bspeice/betterwithdata_cleaning_4 synced 2025-07-04 07:15:08 -04:00
Code Issues Releases Wiki Activity

Add tab for scatter plot

Browse Source
This commit is contained in:
geoffreyli
2015-11-07 13:46:54 -05:00
parent c62397ff21
commit ec2950779f
2 changed files with 13 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
shiny-app/ui.R
View File

@ -10,14 +10,18 @@ shinyUI(fluidPage(
sidebarLayout(
sidebarPanel(
checkboxGroupInput('show_vars', 'Columns in dataset to show:',
names(emergency2013), selected = names(emergency2013))
names(emergency2013), selected = null)
),
# Show a summary table of the selected variables
mainPanel(
tabsetPanel(
id = 'dataset',
tabPanel('emergency2013', dataTableOutput('mytable1')))
tabPanel('emergency2013', dataTableOutput('mytable1')),
tabPanel('scatterplot', plotOutput('distPlot'))
)
)
)
))