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 A253142 #16 Sep 04 2025 18:30:21
%S A253142 2,4,8,14,16,22,26,32,38,44,46,52,64,68,86,88,98,124,134,158,178,184,
%T A253142 196,212,236,242,248,256,262,296,298,316,322,338,364,374,386,394,452,
%U A253142 472,484,488,548,578,586,598,602,626,632,638,646,658,662,676,694,718,728,736,794,806,842,848,862
%N A253142 Numbers k such that k + 15 and k^2 + 15 are prime.
%H A253142 Robert Israel, <a href="/A253142/b253142.txt">Table of n, a(n) for n = 1..10000</a>
%e A253142 2 + 15 = 17 and 2^2 + 15 = 19 are both prime, so 2 is in the sequence.
%p A253142 select(t -> isprime(t+15) and isprime(t^2+15), [seq(i,i=2..1000,2)]); # _Robert Israel_, May 07 2019
%t A253142 p = 15; Select[Range[2,1000,2], PrimeQ[p + #^2] && PrimeQ[p + #] &]
%t A253142 Select[Range[2,1000,2],AllTrue[{#,#^2}+15,PrimeQ]&] (* _Harvey P. Dale_, Jun 08 2023 *)
%Y A253142 Intersection of A086303 and A121982.
%K A253142 nonn,changed
%O A253142 1,1
%A A253142 _Zak Seidov_, Dec 27 2014