Tous
les malouins le savent, Jacques Cartier est parti de Saint Malo
pour découvrir le Canada en 1536 (si l'on considère son second voyage,
c'est à dire celui où il a vraiment pénétré le royaume de Kanata
en voguant sur le Saint Laurent). Il y a d'ailleurs un
musée du Québec dans les remparts. Et comme s'en vente le
musée, les québécois viennent de Saint-Malo. 
Or, pour ceux qui ne connaissent pas Saint-Malo, c'est à deux pas du Mont Saint Michel, et du Couesnon qui sépare la Bretagne et la Normandie. Étant né en Normandie, avant de venir vivre à Rennes, j'étais convaincu que j'avais des racines communes avec les Québécois*. Mais j'ai été surpris en voyant les noms de famille des copines de classe de ma fille: les noms ne m'étaient pas du tout familiers... Pourtant, si nous avons des racines communes, il ne serait pas surprenant que les noms de familles se retrouvent (c'est le principe de base de la généalogie, si j'ai bien tout suivi). Aussi j'ai voulu creuser davantage....
- Que
disent les experts en généalogie ?







- Normandie, 22.6%
- Aunis, 16.4%
- Perche, 11.4%
- Ile de France (région parisienne) 10.5%
- Poitou, 7.5%
- Maine, 5.2%
- Saintonge 5.2%
- Bretagne 3.5%
- Calculs
de probabilités conditionnelles à partir des noms de famille
quebec=read.table("http://freakonometrics.free.fr/nom-quebec2.txt",
header=TRUE,dec=",")
bretagne=read.table("http://freakonometrics.free.fr/nom-bretagne.txt",
header=TRUE,dec=",",sep="\t")
poitou=read.table("http://freakonometrics.free.fr/nom-poitou.txt",
header=TRUE,dec=",",sep="\t")
normandie=read.table("http://freakonometrics.free.fr/nom-basse-normandie.txt",
header=TRUE,dec=",",sep="\t")
aquitaine=read.table("http://freakonometrics.free.fr/nom-aquitaine.txt",
header=TRUE,dec=",",sep="\t")
alsace=read.table("http://freakonometrics.free.fr/nom-alsace.txt",
header=TRUE,dec=",",sep="\t")
loire=read.table("http://freakonometrics.free.fr/nom-loire.txt",
header=TRUE,dec=",",sep="\t")
> head(quebec)
Rang Nomdefamille Pourcentage
1 1 Tremblay 1.076
2 2 Gagnon 0.790
3 3 Roy 0.753
4 4 Cote 0.692
5 5 Bouchard 0.530
6 6 Gauthier 0.522
> minquebec=tolower(quebec$Nomdefamille)
> rangquebec=quebec$Rang
> pctquebec=quebec$Pourcentage/sum(quebec$Pourcentage)
> head(bretagne)
Rang Patronyme Naissances
1 1 LE GALL 18126
2 2 LE GOFF 16093
3 3 LE ROUX 15905
4 4 THOMAS 15705
5 5 MARTIN 12094
6 6 TANGUY 12045
> minbretagne=tolower(bretagne$Patronyme)
> rangbretagne=bretagne$Rang
> pctbretagne=bretagne$Naissances/sum(bretagne$Naissances)
> I=minquebec%in%minbretagne
> sum(pctquebec[I])/sum(pctquebec)
[1] 0.2579641
| Région | Proportion |
| Bretagne | 23,39% |
| Normandie | 31,07% |
| Loire | 32,83% |
| Aquitaine | 27,65% |
| Poitou | 32,50% |
| Alsace | 9,71% |







