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 A065408 #20 Dec 05 2024 18:07:13
%S A065408 16,25,49,256,289,625,676,784,841,1024,1156,1369,1444,1600,1936,2209,
%T A065408 2401,2500,2704,2809,3136,3721,3844,4096,4225,4900,5329,6241,6724,
%U A065408 6889,7921,8281,9604,11236,11449,11881,13225,13456,13924,14161,15625,16129
%N A065408 Squares whose digits sum to a prime.
%H A065408 Harry J. Smith, <a href="/A065408/b065408.txt">Table of n, a(n) for n = 1..1000</a>
%F A065408 a(n) = A107289(n)^2. - _Andrew Howroyd_, Dec 05 2024
%t A065408 Select[Range[1000]^2,PrimeQ[Total[IntegerDigits[#]]]&]
%o A065408 (PARI) { for (m=1, 200, if (isprime(sumdigits(m^2)), print1(m^2, ", "))) } \\ _Harry J. Smith_, Oct 18 2009
%Y A065408 Cf. A000290, A007953, A107289.
%K A065408 base,easy,nonn
%O A065408 1,1
%A A065408 _Jason Earls_, Nov 22 2001