That's what I did ..
#Lê a base de dados
ano1<-read.csv("os dados abaixo...",header = TRUE ,sep=";", row.names=1)
#Cria a série temporal
ano<-ts(ano1[,1],start=c(2009,1), end=c(2010,12),freq=12)
#plota a série
plot(ano,ylab='indice', xlab='ano',main='distribuiçao dos casos')
These are the data:
## Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec
## 2009 1.6 1.0 0.2 0.0 -0.2 0.1 0.9 1.4 0.8 -0.4 -0.8 0.1
## 2010 1.8 1.2 0.3 -0.1 -0.2 -0.3 1.5 1.9 1.2 0.1 -0.6 -0.5
But it plots a "periodic" chart.
Ps .: It's several years, but I wanted to learn in this 'simple' to apply in the other.