|
%I #7 Jul 29 2013 09:05:34
%S 0,1,2,3,4,5,6,7,8,9,10,11,21,31,41,51,61,71,81,91,20,21,22,23,24,52,
%T 26,27,28,29,30,31,23,33,43,53,63,73,83,93,40,41,24,43,44,54,46,47,84,
%U 94,50,51,52,53,54,55,56,57,58,59,60,61,26,63,46,56
%N Sort the digits of n into alphabetical order according their French name: The "French Obsessive Filer's Sequence".
%C French version of A057846, see there for references.
%C Digits are sorted in the order: 5="cinq", 2="deux", 8="huit", 9="neuf", 4="quatre", 7="sept", 6="six", 3="trois", 1="un", 0="zéro".
%C Works well for the French language (as for English), because 0="zero" is sorted last. The exact German analog cannot be stored on OEIS, since 0="null" comes before, e.g., 2="zwei": This would yield "02" for 20, but leading zeros are not allowed for terms on OEIS.
%o (PARI) (n,o=[9, 8, 1, 7, 4, 0, 6, 5, 2, 3])->{ sum(i=1,#n=vecsort(digits(n),(a,b)->o[b+1]-o[a+1]),n[i]*10^i)/10}
%Y Cf. A057846, A072809.
%K nonn,word,base
%O 0,3
%A _M. F. Hasler_, Jul 28 2013
|
