OFFSET
1,1
COMMENTS
If d is a digit of any term then also 9 - d;
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
PROG
(Haskell)
import Data.List (nub, sort)
a262277 n = a262277_list !! (n-1)
a262277_list = filter f [1..] where
f x = sort ds' == sort (map (9 -) ds') where
ds' = nub $ ds x
ds 0 = []; ds z = d : ds z' where (z', d) = divMod z 10
(PARI) isok(m) = my(d=digits(m), c=apply(x->9-x, d)); Set(d) == Set(c); \\ Michel Marcus, Jan 22 2022
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Sep 17 2015
STATUS
approved