Article non relu
Les cartons pleins depuis 1948
Comme écrit dans la note de bas de page dans l’article principale c’est les US et l’URSS qui en on fait le plus1 :
< all.tsv awk -F'\t' '$4>1944' | tail -n+2 | #retrait header et vieilles épreuves
cut -f1,7 | sort -u | cut -f1 | occu | grep -E "^1" | cut -f2 | #on ne garde que les épreuves avec un seul pays vainqueur
xargs -I{} grep "^{} " all.tsv | #on rerécupère toutes les infos dessus
cut -f1,7 | uniq | cut -f2 | occu | sort -rn #et on compte les occurences des pays
47 USA
20 URS
8 GDR
5 JPN
5 CHN
3 JAM
3 ITA
2 SUI
2 RUS
2 KOR
2 KEN
2 EUN
2 AUS
1 SWE
1 IRI
1 HUN
1 GER
1 GBR
1 FRG
1 FIN
1 AUT
Dans quelles épreuves cela s’est fait ?
for country in USA URS JPN CHN JAM KOR;do
echo "$country"
< all.tsv awk -F'\t' '$4>1944' | tail -n+2 |
cut -f1,7 | sort -u | cut -f1 | occu | grep -E "^1 " | cut -f2 |
xargs -I{} grep "^{} " all.tsv |
cut -f1,5,7 | uniq |
grep -w "$country" | cut -f2 | occu | sort -rn
echo
done
USA
24 Athletics
16 Swimming
6 Diving
1 Fencing
URS
8 Athletics
8 Artistic Gymnastics
3 Swimming
1 Fencing
JPN
4 Artistic Gymnastics
1 Athletics
CHN
3 Table Tennis
1 Badminton
1 Athletics
JAM
3 Athletics
KOR
2 Archery
On sait qu’en 2024 on peut ajouter le BMX masculin pour la France. On peut également se demander quand est-ce qu’on eu lieu ces podiums :
< all.tsv awk -F'\t' '$4>1944' | tail -n+2 |
cut -f1,7 | sort -u | cut -f1 | occu | grep -E "^1" | cut -f2 |
xargs -I{} grep "^{} " all.tsv |
cut -f1,4 | uniq | cut -f2 | occu | sort -t' ' -nk2 |
awk '{print $2" "$1}'
1948 11
1952 10
1956 10
1960 8
1964 4
1968 7
1972 6
1976 9
1980 11
1984 1
1988 8
1992 5
2000 2
2004 5
2008 7
2012 4
2016 1
2020 2
On voit que ces podiums étaient un peu plus fréquents par le passé, j’imagine du fait qu’aujourd’hui un plus grand nombre de pays sont compétitifs. A noter que le pic de 1980 s’explique en partie par le boycott des Etats-Unis des JO de Moscou, l’URSS ayant ainsi raflé un paquet de podium, et le pic relatif de 2008 par d’excellentes performances de la Chine à Pékin.
-
Derrière la commande
occu
se cache se bout de code que j’utilise fréquemment :sort | uniq -c | sort -n | sed -E 's/^ *//' | sed -E 's/ / /'
↩