diff --git a/shiny-app/server.R b/shiny-app/server.R index 60415bb..56c5dc4 100644 --- a/shiny-app/server.R +++ b/shiny-app/server.R @@ -5,6 +5,7 @@ shinyServer(function(input, output) { emergency2013 <- read.csv("./data/emergency2013.csv") output$distPlot <- renderPlot({ - plot(faithful$eruptions, faithful$waiting) + + plot(emergency2013$erdatemm, emergency2013$vstctgry) }) }) \ No newline at end of file