mirror of
https://github.com/bspeice/betterwithdata_cleaning_4
synced 2024-12-04 13:18:10 -05:00
loading the data
This commit is contained in:
parent
3d51e85c7e
commit
38b535e9fc
@ -2,13 +2,7 @@ library(shiny)
|
|||||||
|
|
||||||
# Define server logic required to draw a histogram
|
# Define server logic required to draw a histogram
|
||||||
shinyServer(function(input, output) {
|
shinyServer(function(input, output) {
|
||||||
|
emergency2013 <- read.csv("./data/emergency2013.csv")
|
||||||
# Expression that generates a histogram. The expression is
|
|
||||||
# wrapped in a call to renderPlot to indicate that:
|
|
||||||
#
|
|
||||||
# 1) It is "reactive" and therefore should re-execute automatically
|
|
||||||
# when inputs change
|
|
||||||
# 2) Its output type is a plot
|
|
||||||
|
|
||||||
output$distPlot <- renderPlot({
|
output$distPlot <- renderPlot({
|
||||||
plot(faithful$eruptions, faithful$waiting)
|
plot(faithful$eruptions, faithful$waiting)
|
||||||
|
Loading…
Reference in New Issue
Block a user