#Install and load forecast package
install.packages("forecast", dependencies = T)
require(forecast)
#Fit automated exponential smoothing model to data and show characteristics
fit_auto <- ets(Organic_Traffic)
summary(fit_auto)
forecast(fit_auto)
#Plot the forecasted values
plot(forecast(fit_auto))