mirror of
				https://github.com/bspeice/betterwithdata_cleaning_4
				synced 2025-11-04 02:10:46 -05:00 
			
		
		
		
	loading the data
This commit is contained in:
		@ -2,13 +2,7 @@ library(shiny)
 | 
			
		||||
 | 
			
		||||
# Define server logic required to draw a histogram
 | 
			
		||||
shinyServer(function(input, output) {
 | 
			
		||||
  
 | 
			
		||||
  # 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
 | 
			
		||||
  emergency2013 <- read.csv("./data/emergency2013.csv")
 | 
			
		||||
  
 | 
			
		||||
  output$distPlot <- renderPlot({
 | 
			
		||||
   plot(faithful$eruptions, faithful$waiting)
 | 
			
		||||
 | 
			
		||||
		Reference in New Issue
	
	Block a user