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 A144594 #12 Oct 02 2021 18:05:36
%S A144594 19,37,499,1009,1279,1429,2689,5077,13687,16879,17467,23017,25579,
%T A144594 32299,33577,41179,48757,85597,92377,120997,125617,128389,143239,
%U A144594 152419,159769,324427,327469,351037,352399,422857,473719,499669,518737,519349
%N A144594 Primes p such that p, p+4, p+10, p+22, p+24, p+42 are all primes.
%C A144594 Subsequence of A046136. - _R. J. Mathar_, Jan 14 2009
%H A144594 Harvey P. Dale, <a href="/A144594/b144594.txt">Table of n, a(n) for n = 1..1000</a>
%p A144594 isA046136 := proc(n) if isprime(n) and isprime(n+4) and isprime(n+10) then true; else false; fi; end: isA144594 := proc(n) if isA046136(n) and isprime(n+22) and isprime(n+24) and isprime(n+42) then true; else false; fi; end: for n from 2 to 1000000 do if isA144594(n) then printf("%d,",n) ; fi; od: # _R. J. Mathar_, Jan 14 2009
%t A144594 lst={}; Do[p=Prime[n]; If[PrimeQ[p+4]&&PrimeQ[p+10]&&PrimeQ[p+22]&&PrimeQ[p+24]&&PrimeQ[p+42],AppendTo[lst,p]],{n,3*8!}]; lst (* _Vladimir Joseph Stephan Orlovsky_, Jan 15 2009 *)
%t A144594 Select[Prime[Range[44000]],AllTrue[#+{4,10,22,24,42},PrimeQ]&] (* _Harvey P. Dale_, Oct 02 2021 *)
%K A144594 nonn
%O A144594 1,1
%A A144594 Philip Mole (molep(AT)comcen.com.au), Jan 13 2009
%E A144594 Definition corrected by _N. J. A. Sloane_, Jan 13 2009
%E A144594 Inserted missing values _R. J. Mathar_, Jan 14 2009
%E A144594 More terms from _Vladimir Joseph Stephan Orlovsky_, Jan 15 2009