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 A276191 #8 Aug 15 2017 19:41:29 %S A276191 0,1,4,9,16,1,2,5,10,17,4,5,8,13,20,9,10,13,18,25,16,17,20,25,32,1,2, %T A276191 5,10,17,2,3,6,11,18,5,6,9,14,21,10,11,14,19,26,17,18,21,26,33,4,5,8, %U A276191 13,20,5,6,9,14,21,8,9,12,17,24,13,14,17,22,29,20,21,24,29,36,9,10,13,18,25,10 %N A276191 Sum of the squares of the digits of the base-5 representation of n. %p A276191 A276191 := proc(n) %p A276191 local d ; %p A276191 add(d^2, d= convert(n, base, 5) ); %p A276191 end proc: %t A276191 Table[Total[IntegerDigits[n,5]^2],{n,0,80}] (* _Harvey P. Dale_, Aug 15 2017 *) %Y A276191 Cf. A000120 (base 2), A006287 (base 3), A276190 (base 4). %K A276191 nonn,base,easy %O A276191 0,3 %A A276191 _R. J. Mathar_, Aug 24 2016