Atualizando script R