cp's OEIS Frontend

A227865 Ending letter of a(n) equals starting letter of a(n+1), when spelled out in French; always choose the smallest possible number not yet used and not ending the sequence.

%I A227865 #12 Nov 03 2013 03:07:29
%S A227865 0,11001,900,7,3,61,901,903,63,65,41,905,43,67,31,907,33,68,35,45,47,
%T A227865 37,38,300,77,301,908,303,78,305,48,307,308,317,318,320,321,917,323,
%U A227865 600,601,918,325,80,603,605,81,920
%N A227865 Ending letter of a(n) equals starting letter of a(n+1), when spelled out in French; always choose the smallest possible number not yet used and not ending the sequence.
%C A227865 French version of a variant of A230862 without monotonicity.
%C A227865 No term must end in "deux", "quatre", "six", "neuf", "dix", "onze", "douze", "treize", "quatorze", "quinze", "seize", "trente", "quarante", "cinquante", "soixante", "mille", since there is no corresponding initial. The only possible endings are "zero", "un", "trois", "cinq", "(dix-)sept", "(dix-)huit", "vingt", "quatre-vingts", "cent(s)" and "million(s)" etc. This further reduces the possible initials to "n", "o", "q", "t", "s", with corresponding words: "neuf", "onze", "quatre/quatorze/quarante/quatre-vingt(s)", "trois/treize/trente" and "six/sept/seize/soixante(-dix)" (plus huge numbers like trillion, quadrillion, ...).
%e A227865 zérO, Onze mille uN, Neuf centS, SepT, TroiS, Soixante-et-uN, Neuf cent uN, Neuf cent troiS, Soixante-troiS, Soixante-cinQ, Quarante-et-uN, Neuf cent cinQ, Quarante-troiS, Soixante-sepT, Trente-et-uN, Neuf cent sepT, Trente-TroiS, Soixante-huiT, Trente-cinQ, Quarante-cinQ, Quarante-sepT, Trente-sepT, Trente-huiT, Trois centS, Soixante-dix-sepT, Trois cent uN, Neuf cent huiT, Trois cent troiS, Soixante-dix-huiT, Trois cent cinQ, Quarante-huiT, Trois cent sepT, Trois cent huiT, Trois cent dix-sepT, Trois cent dix-huiT, Trois cent vingT, Trois cent vingt et uN, Neuf cent dix-sepT, Trois cent vingt-troiS, Six centS, Six cent uN, Neuf cent dix-huiT, Trois cent vingt-cinQ, Quatre-vingtS, Six cent troiS, Six cent cinQ, Quatre-vingt-uN, Neuf cent vingT, ...
%o A227865 (PARI) spellout(seq)={ for(i=1,#seq,my(s=Vecsmall(French(seq[i])));s[1]-=32;s[#s]-=32;print1(Strchr(s)","))} /* see A167507 for French() */
%Y A227865 Cf. A230862.
%K A227865 nonn,word
%O A227865 1,2
%A A227865 _M. F. Hasler_, Nov 01 2013