Corrige dados e documentação das ações Cemig

- Os dados referiam-se à série de IBV (Índice da Bolsa de Valores),
  estavam idênticos à IBV.txt. Incluiu-se os dados corretos;
- A série foi salva em formato 'zoo', pois as observações não são
  regularmente espaçadas.

R/Cemig.R

@@ -14,10 +14,16 @@
 #'
 #' data(Cemig)
 #' str(Cemig)
+#'
+#' library(zoo)
 #' Cemig
 #'
-#' # Médias anuais
-#' aggregate(Cemig, FUN = mean)
+#' # Médias anuais e em cada mês
+#' aggregate(Cemig, by = format(time(Cemig), "%Y"), FUN = mean)
+#' aggregate(Cemig, by = format(time(Cemig), "%B"), FUN = mean)
+#'
+#' # Série regularmente espaçada com médias mensais
+#' aggregate(Cemig, by = as.yearmon, FUN = mean)
 #'
 #' # Visualização da série
 #' library(lattice)