Invia SMS: Introductory time series with R