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

add plot

Browse Source
This commit is contained in:
Aron Lindberg
2015-11-07 13:50:31 -05:00
parent 03d304c9ef
commit 675ca16f02
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
shiny-app/server.R
View File

@ -5,10 +5,10 @@ shinyServer(function(input, output) {
emergency2013 <- read.csv("./data/emergency2013.csv")
output$mytable1 <- renderDataTable({
emergency2013[, input$show_vars, drop = FALSE]
})
output$myplot <- renderPlot({
library(ggplot2)
emergency2013[, input$show_vars, drop = FALSE]
library(corrplot)
pairs(emergency2013[, input$show_vars, drop = FALSE])
})