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 A162228 #10 Aug 04 2025 04:15:28
%S A162228 0,1,2,3,4,5,6,9,10,16,25,32,45,65,133,134,152,250,1542,3190,3222,
%T A162228 3612,3613,4183,9286,35411,37271,72865,191334,193393,376889,535069,
%U A162228 794376,1110699,2236488,3021897,4431562,8094840,9885773,10883814,16219922
%N A162228 Base 7 perfect digital invariants (written in base 10): numbers equal to the sum of the k-th powers of their base-7 digits, for some k.
%C A162228 Whenever a(n) is a multiple of 7, then a(n+1) = a(n) + 1 is also a base 7 perfect digital invariant, with the same exponent k. - _M. F. Hasler_, Nov 21 2019
%H A162228 Joseph Myers, <a href="/A162228/b162228.txt">Table of n, a(n) for n=1..868</a> (complete to 200 base 7 digits)
%o A162228 (PARI) select( {is_A162228(n, b=7)=n<b||forstep(k=logint(n,max(vecmax(b=digits(n, b)), 2)), 2, -1, my(s=vecsum([d^k|d<-b])); s>n||return(s==n))}, [0..10^5]) \\ _M. F. Hasler_, Nov 21 2019
%Y A162228 Cf. A162229 (corresponding exponents), A010350 (restriction to power = number of digits), A033839, A162230. In other bases: A162216 (base 3), A162219 (base 4), A162222 (base 5), A162225 (base 6), A162231 (base 8), A162234 (base 9), A023052 (base 10).
%K A162228 base,nonn
%O A162228 1,3
%A A162228 _Joseph Myers_, Jun 28 2009