[R-br] Gerar arquivo de saída netCDF no R