|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
If d is a digit of any term then also 9 - d;
|
|
LINKS
|
|
|
FORMULA
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|