corrige bloco do R