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 A145476 #16 Jan 26 2025 19:54:37
%S A145476 3,7,19,43,67,103,127,139,199,283,307,367,379,439,463,523,547,607,643,
%T A145476 727,739,823,859,907,1063,1123,1303,1327,1399,1447,1459,1483,1627,
%U A145476 1699,1747,1999,2083,2239,2287,2383,2539,2887,3067,3079,3307,3319,3463,3499
%N A145476 Primes p such that (19 + p)/2 is prime.
%C A145476 All these primes are congruent to 3 mod 4 and (with the exception of the first term) to 5 mod 12.
%H A145476 Ivan Neretin, <a href="/A145476/b145476.txt">Table of n, a(n) for n = 1..10000</a>
%t A145476 aa = {}; k = 19; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, Prime[n]]], {n, 1, 500}];aa
%t A145476 Select[Prime[Range[500]],PrimeQ[(#+19)/2]&] (* _Harvey P. Dale_, Sep 06 2023 *)
%o A145476 (PARI) list(n)=my(t=1,p,i=1);while(i<n,p=prime(i);i=i+1;if(p>2&&bigomega((19+p)/2)==1,print(p))) \\ _Anders Hellström_, Jan 22 2017
%Y A145476 Cf. A092109, A145471-A145480.
%K A145476 nonn
%O A145476 1,1
%A A145476 _Artur Jasinski_, Oct 11 2008