This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A062927 #14 Nov 17 2018 20:46:02 %S A062927 1,3,6,9,27,90,108,144,243 %N A062927 Numbers k such that k divides the sum of digits of 9^k. %C A062927 Next term after 243, if it exists, is greater than 30000. - _Ryan Propper_, Jun 18 2005 %C A062927 No more terms < 1000000. - _Lars Blomberg_, May 05 2011 %e A062927 3 divides the sum of digits of 9^3 (i.e., 7 + 2 + 9 = 18), so 3 is a term. %t A062927 Do[If[Mod[Plus @@ IntegerDigits[9^n, 10], n] == 0, Print[n]], {n, 1, 30000}] (* _Ryan Propper_, Jun 18 2005 *) %t A062927 Select[Range[300],Divisible[Total[IntegerDigits[9^#]],#]&] (* _Harvey P. Dale_, Jun 03 2015 *) %K A062927 hard,more,nonn,base %O A062927 1,2 %A A062927 _Amarnath Murthy_ and _Shyam Sunder Gupta_, Feb 16 2002