login
A247759
Numbers in decimal representation, such that in Norwegian and 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, 19, 22, 23, 33, 40, 42, 43, 44, 46, 47, 49, 50, 52, 53, 54, 55, 56, 57, 59, 62, 63, 66, 67, 69, 72, 73, 77, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 92, 93, 99, 100, 102, 103, 106, 107, 109
OFFSET
1,3
COMMENTS
List of decimal digits, alphabetically sorted by their names in Norwegian resp. Swedish: 8 _ åtte _ åtta, 1 _ en/ett _ en/ett, 5 _ fem _ fem, 4 _ fire _ fyra, 0 _ null _ noll, 6 _ seks _ sex, 7 _ syv/sju _ sju, 9 _ ti _ tio, 2 _ to _ två, 3 _ tre _ tre;
a(141973) = A247809(992) = 8154067923 is the greatest term not containing any repeating digits.
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 = [8, 1, 5, 4, 0, 6, 7, 9, 2, 3]
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: A164710 A098452 A088382 * A247752 A291149 A363748
KEYWORD
nonn,base,word
AUTHOR
Reinhard Zumkeller, Oct 05 2014
STATUS
approved