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 A247276 #15 Mar 05 2025 15:24:12
%S A247276 163,409333,13491637509487,19802478368863
%N A247276 Primes p such that p + m^2 is prime for all m in {2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26}.
%C A247276 All terms are == {7, 13} mod 30.
%C A247276 Subsequence of A247275.
%t A247276 Select[Prime[Range[35000]],AllTrue[#+{4,16,36,64,100,144,196,256,324,400,484,576,676},PrimeQ]&] (* The program generates the first two terms of the sequence. To generate a(3) and a(4), increase the Range constant to 67*10^10 but the program will take a very long time to run. *) (* _Harvey P. Dale_, Mar 05 2025 *)
%o A247276 (PARI)
%o A247276 forprime(p=1, 10^12, c=0; for(i=1, 13, if(ispseudoprime(p+(2*i)^2), c++);if(!ispseudoprime(p+(2*i)^2),break)); if(c==13, print1(p, ", "))) \\ _Derek Orr_, Sep 11 2014
%Y A247276 Cf. A049492, A092120, A246842, A247269, A145741, A247273, A247275.
%K A247276 nonn,hard,more
%O A247276 1,1
%A A247276 _Zak Seidov_, Sep 11 2014