Suppose we would like to predict the duration of an eruption of the Old Faithful geyser in Yellowstone National Park based on the waiting time before an eruption. Fit a simple linear model in R that accomplishes this task. Store the results in a variable called faithful_model. Output the result of calling summary() on faithful_model.