Bruna140: Adiciona os arquivos de 8 tabelas do Morettin

Realização do Issue #140, tabelas 4.1, 4.6, 4.7, 4.8, 4.9, 4.10, 4.12 e 4.13.

R/Cemig.R

 #' @name Cemig
 #' @title Ações da CEMIG
-#' @description Dados sobre os preçoes diários das ações da CEMIG, 
+#' @description Dados sobre os preçoes diários das ações da CEMIG,
 #'     de três de Janeiro de 1995 a 27 de Dezembro de 2000.
-#'          
+#'
 #' @format Uma série temporal (classe \code{ts}), com 1498 observações
 #'     diárias, de 3 de janeiro de 1995 a 27 de dezembro de 2000.
 #' @keywords TS
 #' @source Morettin, P. A., Toloi, C. M. C. (2006). Análise de Séries
 #'     Temporais (2nd ed.). São Paulo, SP: Editora Egard
-#'     Blucher. (Série A9 - Mercado Financeiro, mencionada em diversas 
+#'     Blucher. (Série A9 - Mercado Financeiro, mencionada em diversas
 #'     páginas)
 #' @examples
 #'
 #' 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)