login
A262277
Numbers having in decimal representation the same distinct decimal digits as their 9's complement.
2
18, 27, 36, 45, 54, 63, 72, 81, 90, 118, 181, 188, 227, 272, 277, 336, 363, 366, 445, 454, 455, 544, 545, 554, 633, 636, 663, 722, 727, 772, 811, 818, 881, 900, 909, 990, 1089, 1098, 1118, 1181, 1188, 1278, 1287, 1368, 1386, 1458, 1485, 1548, 1584, 1638
OFFSET
1,1
COMMENTS
If d is a digit of any term then also 9 - d;
LINKS
FORMULA
A227362(A061601(a(n))) = A227362(a(n)).
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
Cf. A061601, A227362, subsequences: A111708, A050278, A171102.
Sequence in context: A151741 A090064 A082804 * A144777 A296130 A284811
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Sep 17 2015
STATUS
approved