

A247810


Numbers in decimal representation with distinct digits, such that in Polish their digits are in alphabetic order.


17



0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 13, 15, 16, 17, 18, 20, 21, 23, 25, 26, 27, 28, 29, 30, 40, 41, 42, 43, 45, 46, 47, 48, 49, 50, 53, 56, 57, 60, 63, 67, 70, 73, 80, 83, 85, 86, 87, 90, 91, 93, 95, 96, 97, 98, 130, 150, 153, 156, 157, 160, 163, 167, 170, 173
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,3


COMMENTS

List of decimal digits, alphabetically sorted by their names in Polish:
4 _ cztery, 2 _ dwa/dwie, 9 _ dziewięć, 1 _ jeden/jedna/jedno, 8 _ osiem, 5 _ pięć, 6 _ sześć, 7 _ siedem, 3 _ trzy, 0 _ zero;
finite sequence with last and largest term a(1023) = 4291856730.


LINKS



PROG

(Haskell)
import Data.IntSet (fromList, deleteFindMin, union)
import qualified Data.IntSet as Set (null)
a247810 n = a247810_list !! (n1)
a247810_list = 0 : f (fromList [1..9]) where
f s  Set.null s = []
 otherwise = x : f (s' `union`
fromList (map (+ 10 * x) $ tail $ dropWhile (/= mod x 10) digs))
where (x, s') = deleteFindMin s
digs = [4, 2, 9, 1, 8, 5, 6, 7, 3, 0]


CROSSREFS

Cf. A247800 (Czech), A247801 (Danish), A247802 (Dutch), A053433 (English), A247803 (Finnish), A247804 (French), A247805 (German), A247806 (Hungarian), A247807 (Italian), A247808 (Latin), A247809 (Norwegian), A247807 (Portuguese), A247811 (Russian), A247812 (Slovak), A247813 (Spanish), A247809 (Swedish), A247814 (Turkish).


KEYWORD

nonn,base,word,fini,full


AUTHOR



STATUS

approved



