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 A244452 #25 Jan 19 2019 04:15:43
%S A244452 3,5,7,13,37,47,103,233,293,313,607,677,743,1367,1447,2087,2543,3023,
%T A244452 3803,3863,4093,4153,4373,4583,4643,4793,4957,5087,5153,5623,5683,
%U A244452 5923,6287,7177,7247,7547,7817,8093,8527,9133,9403
%N A244452 Primes p such that p^2-2 and p^2+4 are also prime (i.e., initial members of prime triples (p, p^2-2, p^2+4)).
%C A244452 Intersection of A062326 and A062324.
%H A244452 Felix Fröhlich, <a href="/A244452/b244452.txt">Table of n, a(n) for n = 1..242507</a> (all terms up to 10^9)
%e A244452 3 is in the sequence since it is the first member of the triple (3, 3^2-2, 3^2+4) and the resulting values in the triple (3, 7, 13) are all prime.
%t A244452 Select[Prime[Range[1200]],AllTrue[#^2+{4,-2},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Apr 28 2018 *)
%o A244452 (PARI) forprime(p=2, 10^4, if(isprime(p^2-2) && isprime(p^2+4), print1(p, ", ")))
%Y A244452 Cf. A022004, A073648, A098413.
%K A244452 nonn
%O A244452 1,1
%A A244452 _Felix Fröhlich_, Jun 28 2014