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 A269788 #14 Sep 08 2022 08:46:16
%S A269788 17,37,61,89,157,197,241,397,457,521,661,1277,1381,1489,1601,2089,
%T A269788 2221,2357,2789,3257,3761,4877,5077,5281,5701,6361,7057,7297,7541,
%U A269788 7789,8297,8821,10781,11681,12301,13921,15289,15641,17837,18217,19381,19777,20177,21401
%N A269788 Primes p such that 2*p + 47 is a square.
%C A269788 Primes of the form 2*k^2 + 2*k - 23.
%F A269788 a(1) = 17 because 2*17 + 47 = 81, which is a square.
%t A269788 Select[Prime[Range[2500]], IntegerQ[Sqrt[2 # + 47]] &]
%o A269788 (Magma) [p: p in PrimesUpTo(50000) | IsSquare(2*p+47)];
%o A269788 (PARI) lista(nn) = {forprime(p=2, nn, if(issquare(2*p + 47), print1(p, ", "))); } \\ _Altug Alkan_, Mar 24 2016
%Y A269788 Cf. A000040.
%Y A269788 Subsequence of A002144, A045371.
%Y A269788 Cf. similar sequences listed in A269784.
%K A269788 nonn
%O A269788 1,1
%A A269788 _Vincenzo Librandi_, Mar 24 2016