cp's OEIS Frontend

A247753 Numbers in decimal representation, such that in Finnish their digits are in alphabetic order.

%I A247753 #6 Oct 18 2014 07:29:49
%S A247753 0,1,2,3,4,5,6,7,8,9,11,20,21,22,23,24,25,26,27,29,30,31,33,34,35,36,
%T A247753 37,39,40,41,44,45,47,49,51,55,59,60,61,64,65,66,67,69,71,75,77,79,80,
%U A247753 81,82,83,84,85,86,87,88,89,91,99,111,200,201,205,207,209
%N A247753 Numbers in decimal representation, such that in Finnish their digits are in alphabetic order.
%C A247753 List of decimal digits, alphabetically sorted by their names in Finnish:
%C A247753 8 _ kahdeksan, 2 _ kaksi, 3 _ kolme, 6 _ kuusi, 4 _ neljä, 0 _ nolla, 7 _ seitsemän, 5 _ viisi, 9 _ yhdeksän, 1 _ yksi;
%C A247753 a(143982) = A247803(1008) = 8236407591 is the greatest term not containing any repeating digits.
%H A247753 Reinhard Zumkeller, <a href="/A247753/b247753.txt">Table of n, a(n) for n = 1..10000</a>
%H A247753 Wikipedia, <a href="http://de.wikipedia.org/wiki/Zahlen_in_unterschiedlichen_Sprachen#0_bis_10">Zahlen in unterschiedlichen Sprachen</a>
%H A247753 Wikipedia, <a href="http://en.wikipedia.org/wiki/List_of_numbers_in_various_languages">List of numbers in various languages</a>
%o A247753 (Haskell)
%o A247753 import Data.IntSet (fromList, deleteFindMin, union)
%o A247753 a247753 n = a247753_list !! (n-1)
%o A247753 a247753_list = 0 : f (fromList [1..9]) where
%o A247753    f s = x : f (s' `union`
%o A247753          fromList (map (+ 10 * x) $ dropWhile (/= mod x 10) digs))
%o A247753      where (x, s') = deleteFindMin s
%o A247753    digs = [8, 2, 3, 6, 4, 0, 7, 5, 9, 1]
%Y A247753 Cf. A247803 (subsequence).
%Y A247753 Cf. A247750 (Czech), A247751 (Danish), A247752 (Dutch), A053432 (English), A247754 (French), A247755 (German), A247756 (Hungarian), A247757 (Italian), A247758 (Latin), A247759 (Norwegian), A247760 (Polish), A247757 (Portuguese), A247761 (Russian), A247762 (Slovak), A161390 (Spanish), A247759 (Swedish), A247764 (Turkish).
%K A247753 nonn,base,word
%O A247753 1,3
%A A247753 _Reinhard Zumkeller_, Oct 05 2014