A247804 - OEIS

A247804

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

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 20, 21, 23, 24, 26, 27, 28, 29, 30, 31, 40, 41, 43, 46, 47, 50, 51, 52, 53, 54, 56, 57, 58, 59, 60, 61, 63, 70, 71, 73, 76, 80, 81, 83, 84, 86, 87, 89, 90, 91, 93, 94, 96, 97, 210, 230, 231, 240, 241, 243, 246, 247, 260, 261

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

COMMENTS

List of decimal digits, alphabetically sorted by their names in French:

5 _ cinq, 2 _ deux, 8 _ huit, 9 _ neuf, 4 _ quatre, 7 _ sept, 6 _ six, 3 _ trois, 1 _ un, 0 _ zéro;

finite sequence with last and largest term a(1023) = 5289476310.

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..1023

Wikipedia, Zahlen in unterschiedlichen Sprachen

Wikipedia, List of numbers in various languages

PROG

(Haskell)

import Data.IntSet (fromList, deleteFindMin, union)

import qualified Data.IntSet as Set (null)

a247804 n = a247804_list !! (n-1)

a247804_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 = [5, 2, 8, 9, 4, 7, 6, 3, 1, 0]

CROSSREFS

Intersection of A010784 and A247754.

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

Sequence in context: A339541 A247808 A247807 * A032865 A032889 A308393

Adjacent sequences: A247801 A247802 A247803 * A247805 A247806 A247807

KEYWORD

nonn,base,word,fini,full

AUTHOR

Reinhard Zumkeller, Oct 05 2014

STATUS

approved