A259727 Sum of digits of a(n) equals the sum of digits of 3*a(n).
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
Offset: 1
Examples
99 belongs to the sequence, because A007953(99) = 18 = A007953(297) = A007953(3*99).
Programs
-
Magma
[n: n in [0..800] | &+Intseq(n) eq &+Intseq(3*n)]; // Vincenzo Librandi, Aug 05 2015
-
Mathematica
Select[Range[0, 800], Total@ IntegerDigits@ # == Total@ IntegerDigits[3 #] &] (* Michael De Vlieger, Aug 05 2015 *)
-
PARI
select(x->sumdigits(x)==sumdigits(3*x),vector(10^4,n,n)) \\ Joerg Arndt, Jul 04 2015
Comments