Files
betterwithdata_cleaning_4/shiny-app/server.R
2015-11-07 12:04:40 -05:00

10 lines
251 B
R

library(shiny)
# Define server logic required to draw a histogram
shinyServer(function(input, output) {
emergency2013 <- read.csv("./data/emergency2013.csv")
output$distPlot <- renderPlot({
plot(faithful$eruptions, faithful$waiting)
})
})