Calcolare la percentuale espressa da una frazione...
in politica
Un esempio
Poniamo per esempio che in una votazione politica di un comune si abbiano il numero di voti totali c = 15378 e che il politico Tizio abbia preso b = 347 voti.
Cioè il politico in questione ha preso alle elezioni i trecentoquarantasette quindicimilatrecentosettantottesimi cioè esprimendoli in frazioni i 347 / 15378
Se sviluppiamo la divisione rappresentata da questi due valori otterremo:
Un caso reale
Ma vediamo ora cosa è successo in una situazione reale verificatasi poco tempo fa per il primo turno delle elezioni comunali nel comune di Roma che ha visto contrapporsi Ignazio Marino e Giovanni Alemanno per la poltrona di sindaco.
Quello che ci è arrivato dagli organi di stampa, sono le percentuali che le varie liste si sono aggiudicate, riferite ai voti validi di chi si è recato alla votazione, che, in questa occasione non ha avuto un grande seguito.
Ma cosa ci capiterebbe di vedere, se provassimo a calcolare le percentuali dei voti, riferendoci alla popolazione totale degli aventi diritto al voto? Si lo so, solo chi si reca a votare può decidere le sorti delle votazioni, il resto della popolazione, diciamo, se ne lava le mani. Ma che effettivo seguito hanno i vari partiti nella realtà? Voto o non voto, astensione di protesta o altro?
I dati che ho usato sono pubblici, basta andare a visitare il sito del Ministero degli Interni, per reperirli. Vediamo ora cosa viene fuori da questi paragoni.
In questo caso, con il voto disgiunto ci sono delle differenze tra i votanti che hanno dato il proprio voto al candidato sindaco rispetto a quelli che lo hanno dato anche o solo alle liste, per cui, proprio per non appesantire calcoli e spiegazioni, il primo caso, il voto al candidato, lo tratteremo in maniera separata.
Come si vede dalle tabelle chi ha vinto a secondo del dato di paragone preso, riesce a passare da un modesto 21,73 % sul totale degli aventi diritto ad un più rispettabile 42,61 % dei votanti, sino ad arrivare al 44,17 % delle schede valide.
Dal conoscere e capire queste discrepanze si potrà arrivare anche a poter sorridere se non sbellicarsi dalle risate, quando ci si troverà davanti a personaggi dai toni trionfalistici che pretendono di aver ottenuto consensi plebiscitari. dopo elezioni da considerarsi catastrofiche per la rappresentanza espressa.
Come affermava un antico saggio, la verità ci renderà liberi (In questo caso forse di farci qualche buona risata! Se si riesce a superare lo sconforto per il tutto.) Chiaramente chi ha preso più voti ha comunque vinto, ma forse ci si dovrebbe interrogare di più sul perchè si è vinto con così pochi voti, in valore assoluto.
Ora vediamo come implementare il tutto in un piccolo programma Perl.
Il programma è molto grezzo, da lanciare in un terminale. Non esegue controlli sui dati immessi e la formattazione lascia alquanto a desiderare. Per queste ed altre cose, rimando a chi volesse cimentarsi in una programmazioni più sofisticata.
#!/usr/bin/perl
#
# programma sviluppato in perl, verificare di avere perl e dove sul proprio sistema
#
# variabili
# $aventi_diritto = totale elettori aventi diritto al voto
# $votanti = elettori che hanno partecipato alle votazioni
# $voti_validi = voti validi assegnati alle varie liste
# $n_politici = numero candidati partecipanti (liste)
# @nomi_politici = array nomi politici (liste)
# @voti_politici = array dei voti assegnati a ciascun politico (lista)
# $per_aventi_diritto = percentuali rapportate ad aventi diritto al voto
# $per_votanti = percentuali rapportate a votanti
# $per_voti_validi = percentuali rapportate a voti validi
# $co_aventi_diritto = coefficiente aventi diritto al voto
# $co_votanti = coefficiente votanti
# $co_voti_validi = coefficiente voti validi
# $fine_liste = fine inserimento dati
$fine_liste = "fine";
# Inserimento dati
print "Numero aventi diritto ";
$aventi_diritto = <STDIN>;
print "Votanti ";
$votanti = <STDIN>;
print "Voti validi ";
$voti_validi = <STDIN>;
print "scrivere \" fine \" come nome di lista e voti per terminare l'inserimento" . "\n";
while ($fine_liste ne $nomi){
print "Nome lista successiva ";
$nomi = <STDIN>;
chop($nomi);
push(@nomi_politici, $nomi);
print "Inserire voti lista successiva ";
$voti = <STDIN>;
chop($voti);
push(@voti_politici, $voti);
}
# Elimina l'ultimo ingresso (fine) dall'array
pop(@nomi_politici);
pop(@voti_politici);
$n_politici = push(@voti_politici);
# Elaborazione e stampa dati
chop($aventi_diritto);
chop($votanti);
chop($voti_validi);
$co_aventi_diritto = 100 / $aventi_diritto;
$co_votanti = 100 / $votanti;
$co_voti_validi = 100 / $voti_validi;
print "aventi_diritto / ";
print "votanti / ";
print "voti validi\n";
print $aventi_diritto . " / ";
print $votanti . " / ";
print $voti_validi ."\n";
print "coefficienti ";
print "aventi_diritto / ";
print "votanti / ";
print "voti validi\n";
# stampa i coefficienti arrotondando alla nona cifra decimale
print sprintf("%.9f",$co_aventi_diritto) . " / ";
print sprintf("%.9f",$co_votanti) . " / ";
print sprintf("%.9f",$co_voti_validi) ."\n";
for ($x = 0; $x < $n_politici; $x++) {
$per_aventi_diritto = $voti_politici[$x] * $co_aventi_diritto;
$per_votanti = $voti_politici[$x] * $co_votanti;
$per_voti_validi = $voti_politici[$x] * $co_voti_validi;
# stampa le percentuali arrotondando alla seconda cifra decimale
print $nomi_politici[$x] . " ";
print sprintf("%.2f",$per_aventi_diritto) . " / ";
print sprintf("%.2f",$per_votanti) . " / ";
print sprintf("%.2f",$per_voti_validi) . "\n";
}
print $fine_liste . "\n";
palfen 05/07/2013
0
Non ci sono ancora commenti