login
A247759
Numbers in decimal representation, such that in Swedish their digits are in alphabetic order.
17
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 22, 28, 32, 33, 38, 40, 42, 43, 44, 46, 47, 48, 49, 50, 52, 53, 54, 55, 56, 57, 58, 59, 62, 63, 66, 67, 68, 72, 73, 77, 78, 88, 90, 92, 93, 96, 97, 98, 99, 100, 102, 103, 106, 107, 108, 110
OFFSET
1,3
COMMENTS
List of decimal digits, alphabetically sorted by their names in Swedish: 1 _ en/ett, 5 _ fem, 4 _ fyra, 9 _ nio, 0 _ noll, 6 _ sex, 7 _ sju, 3 _ tre, 2 _ två, 8 _ åtta.
a(125005) = A247809(992) = 1549067328 is the greatest term not containing any repeating digits.
LINKS
PROG
(Haskell)
import Data.IntSet (fromList, deleteFindMin, union)
a247759 n = a247759_list !! (n-1)
a247759_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 = [1, 5, 4, 9, 0, 6, 7, 3, 2, 8]
(Python)
from itertools import count, islice, combinations_with_replacement as cwr
def agen(): # generator of terms
yield 0
for d in count(1):
yield from sorted(int("".join(t)) for t in cwr("1549067328", d) if t[0] != "0")
print(list(islice(agen(), 60))) # Andrei Zabolotskii, Nov 11 2025, after Michael S. Branicky's code in A053432
CROSSREFS
Cf. A247809 (subsequence).
Cf. A247750 (Czech), A247751 (Danish), A247752 (Dutch), A053432 (English), A247753 (Finnish), A247754 (French), A247755 (German), A247756 (Hungarian), A247757 (Italian), A247758 (Latin), A247760 (Polish), A247757 (Portuguese), A247761 (Russian), A247762 (Slovak), A161390 (Spanish), A247764 (Turkish).
Sequence in context: A247751 A059962 A057605 * A377912 A326872 A396694
KEYWORD
nonn,base,word,changed
AUTHOR
Reinhard Zumkeller, Oct 05 2014
EXTENSIONS
Corrected and edited, "Norwegian" dropped from name by Andrei Zabolotskii, Nov 11 2025
STATUS
approved