Comandi di R Project per ottenere il grafico
soprastante:
dati <- c(377241 , 8207 , 1054225 , 85200
, 480616 , 100850 , 114347 , 462784 , 338746 , 93243 , 138994 ,
497940 , 75708 , 8111 , 147057 , 84320 , 12992 , 67795 , 127310
, 33301)
lbls <- c("Piemonte", "Valle D'Aosta",
"Lombardia", "Trentino Alto Adige","Veneto", "Friuli Venezia
Giulia", "Liguria", "Emilia Romagna","Toscana", "Umbria",
"Marche", "Lazio","Abruzzo", "Molise", "Campania",
"Puglia","Basilicata", "Calabria", "Sicilia","Sardegna")
pct <- round( dati/sum(dati)*100)
#calcolo delle percentuali
lbls <- paste(lbls, pct) # aggiungo il
numero percentuale alle etichette
lbls <- paste(lbls,"%",sep="") # aggiungo
il simbolo % alle etichette
pie(dati, labels = lbls, main="La
distribuzione nelle regioni degli immigrati residenti in Italia
il 1 gennaio 2010")