Clique no link redeR_ex1.R para ver o arquivo.