A062927 Numbers k such that k divides the sum of digits of 9^k.

1, 3, 6, 9, 27, 90, 108, 144, 243

Offset: 1

Author

Amarnath Murthy and Shyam Sunder Gupta, Feb 16 2002

Keywords

• hard
• more
• nonn
• base

Comments

Next term after 243, if it exists, is greater than 30000. - Ryan Propper, Jun 18 2005

No more terms < 1000000. - Lars Blomberg, May 05 2011

Examples

			3 divides the sum of digits of 9^3 (i.e., 7 + 2 + 9 = 18), so 3 is a term.
		

Programs

Mathematica

Do[If[Mod[Plus @@ IntegerDigits[9^n, 10], n] == 0, Print[n]], {n, 1, 30000}] (* Ryan Propper, Jun 18 2005 *)
Select[Range[300],Divisible[Total[IntegerDigits[9^#]],#]&] (* Harvey P. Dale, Jun 03 2015 *)