login
A246420
Numbers m such that (m + digit sum of m) is a permutation of the decimal digits of m.
2
0, 45, 234, 279, 423, 468, 612, 657, 801, 846, 1134, 1179, 1323, 1368, 1512, 1557, 1701, 1746, 1890, 1935, 2034, 2079, 2223, 2268, 2412, 2457, 2601, 2646, 2835, 3123, 3168, 3312, 3357, 3501, 3546, 3735, 3924, 3969, 4023, 4068, 4212, 4257, 4401, 4446, 4635, 4824, 4869, 5112, 5157, 5301
OFFSET
1,2
COMMENTS
All terms are multiples of 9.
LINKS
MAPLE
filter:= proc(n) local L, LP;
L:= convert(n, base, 10);
LP:= convert(n+convert(L, `+`), base, 10);
sort(L) = sort(LP)
end proc:
select(filter, [$0..10000]); # Robert Israel, Aug 31 2014
PROG
(PARI)
for(n=0, 10^4, if(vecsort(digits(n+sumdigits(n)))==vecsort(digits(n)), print1(n, ", ")))
CROSSREFS
Sequence in context: A251451 A251444 A169717 * A172118 A127073 A089549
KEYWORD
nonn,base,easy
AUTHOR
Derek Orr, Aug 25 2014
STATUS
approved