You started taking the bus to work. The local transit authoritysays that a bus should arrive at your bus stop every five minutes.After a while, you notice you spend a lot more than five minuteswaiting for the bus, so you start to keep a record.
You spend the next two months recording how long it takes forthe bus to arrive to the bus stop. This give a total of sixtyobservations that denote the number of minutes it took for the busto arrive (rounded to the nearest minute). These observations arehosted at
  https://mattbutner.github.io/data/bus_stop_time.csv
Load these data into R as a data frame titled bus_stop_time
Create a histogram of the time_until_bus varaible. Would you saythat five minutes is a reasonable guess for the average arrivaltime based on this picture alone?
Create 95% confidence interval for the bus arrival times usingthe Z distribution. Does 5 minutes fall within the 95% confidenceinterval?
How would you communicate your finding to the local transitauthority?
