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 A104992 #10 Sep 21 2024 17:04:49
%S A104992 16,49,529,676,1225,1521,1681,1764,3249,4096,5929,9604,10404,10609,
%T A104992 11664,12321,19600,24336,25921,26569,27889,33856,34225,34596,46656,
%U A104992 51984,71289,72361,91204,100489,101124,104976,106929,109561,110889,111556,121104,125316,131769,135424,136161,141376,152881,156816,163216,166464,179776,188356
%N A104992 Squares of the form n+prime(n).
%H A104992 Zak Seidov, <a href="/A104992/b104992.txt">Table of n, a(n) for n = 1..300</a>
%t A104992 Select[Table[n+Prime[n],{n,20000}],IntegerQ[Sqrt[#]]&] (* _Harvey P. Dale_, Sep 21 2024 *)
%o A104992 (PARI) lista(nn) = {vec = vector(nn, i, i + prime(i)); pp = select(i->(issquare(i)), vec); print(pp);} \\ _Michel Marcus_, Oct 09 2013
%Y A104992 Squares in A014688.
%K A104992 nonn
%O A104992 1,1
%A A104992 _Zak Seidov_, Apr 25 2005