|
|
A259727
|
|
Sum of digits of a(n) equals the sum of digits of 3*a(n).
|
|
3
|
|
|
0, 9, 18, 27, 36, 45, 54, 72, 81, 90, 99, 108, 117, 135, 144, 171, 180, 189, 198, 207, 234, 270, 279, 288, 297, 342, 351, 360, 396, 405, 414, 441, 450, 459, 486, 495, 504, 540, 549, 558, 576, 585, 594, 639, 648, 657, 693, 702, 711, 720, 729, 756, 765, 783, 792
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
a(n) is a multiple of 9, but not all multiples of 9 belong to the sequence: e.g., 63 = 7*9: A007953(63) = 6 + 3 = 9, but A007953(3*63) = A007953(189) = 1 + 8 + 9 = 18.
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MATHEMATICA
|
Select[Range[0, 800], Total@ IntegerDigits@ # == Total@ IntegerDigits[3 #] &] (* Michael De Vlieger, Aug 05 2015 *)
|
|
PROG
|
(PARI) select(x->sumdigits(x)==sumdigits(3*x), vector(10^4, n, n)) \\ Joerg Arndt, Jul 04 2015
(Magma) [n: n in [0..800] | &+Intseq(n) eq &+Intseq(3*n)]; // Vincenzo Librandi, Aug 05 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|