Experimenting with R and time series