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/MorettinTb4.8.R

@@ -31,7 +31,7 @@
 #' colnames(MorettinTb4.8) <- c("Valor Real", "Previsão com t = 127")
 #' xyplot(MorettinTb4.8, type = c("l", "g"), 
 #'        layout = c(2, 1), xlab = "Dias", ylab = "Valores", 
-#'        main = expression("Série de IPI"), strip = strip.custom(bg = "white"), 
+#'        main = "Série de IPI", strip = strip.custom(bg = "white"), 
 #'        lwd = 2, col = c("violetred", "palegreen2"), 
 #'        scales = list(y = list(rot = 0)))
 NULL
\ No newline at end of file