login
A247764
Numbers in decimal representation, such that in Turkish their digits are in alphabetic order.
17
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 17, 18, 19, 20, 22, 23, 27, 28, 33, 37, 40, 42, 43, 44, 47, 48, 50, 51, 52, 53, 54, 55, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 77, 80, 83, 87, 88, 90, 92, 93, 94, 97, 98, 99, 100, 103, 107, 110
OFFSET
1,3
COMMENTS
List of decimal digits, alphabetically sorted by their names in Turkish:
6 _ altı, 5 _ beş, 1 _ bir, 9 _ dokuz, 4 _ dört, 2 _ iki, 8 _ sekiz, 0 _ sıfır, 3 _ üç, 7 _ yedi;
a(141728) = A247814(1020) = 6519428037 is the greatest term not containing any repeating digits.
PROG
(Haskell)
import Data.IntSet (fromList, deleteFindMin, union)
a247764 n = a247764_list !! (n-1)
a247764_list = 0 : f (fromList [1..9]) where
f s = x : f (s' `union`
fromList (map (+ 10 * x) $ dropWhile (/= mod x 10) digs))
where (x, s') = deleteFindMin s
digs = [6, 5, 1, 9, 4, 2, 8, 0, 3, 7]
CROSSREFS
Cf. A247814 (subsequence).
Cf. A247750 (Czech), A247751 (Danish), A247752 (Dutch), A053432 (English), A247753 (Finnish), A247754 (French), A247755 (German), A247756 (Hungarian), A247757 (Italian), A247758 (Latin), A247759 (Norwegian), A247760 (Polish), A247757 (Portuguese), A247761 (Russian), A247762 (Slovak), A161390 (Spanish), A247759 (Swedish).
Sequence in context: A023783 A344022 A166535 * A302140 A039698 A377914
KEYWORD
nonn,base,word
AUTHOR
Reinhard Zumkeller, Oct 05 2014
STATUS
approved