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 A110892 #20 Jul 03 2024 20:06:20
%S A110892 1,16,81,37,29,45,97,52,65,1,6,33,118,118,33,65,149,29,46,16,33,96,
%T A110892 110,110,65,121,134,129,81,81,118,21,146,63,34,122,127,49,31,37,102,
%U A110892 102,162,127,33,42,89,29,21,29,41,69,149,122,38,55,110,70,90,45,63,105,207,133
%N A110892 Sum of the squares of digits of n^2.
%F A110892 a(n) = A003132(A000290(n)). - _Michel Marcus_, Jun 04 2013
%e A110892 If n=187: 187^2=34969; 3^2+4^2+9^2+6^2+9^2=223.
%t A110892 Table[Total[IntegerDigits[n^2]^2],{n,64}] (* _James C. McMahon_, Apr 23 2024 *)
%o A110892 (PARI) a(n)=norml2(eval(Vec(Str(n^2)))) \\ _Michel Marcus_, Jun 04 2013
%o A110892 (PARI) a(n) = norml2(digits(n^2)); \\ _Ruud H.G. van Tol_, Jul 03 2024
%Y A110892 Cf. A000290, A003132.
%K A110892 easy,nonn,base
%O A110892 1,2
%A A110892 _Paolo P. Lava_, Sep 20 2005