Click esercizio4.R link to view the file.