Update optMHaic.R

ggsave() ao invés do gridExtra
figuras em 300dpi
ajuste de diretórios de arquivos