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 A145479 #25 Sep 04 2023 15:28:01
%S A145479 3,7,31,43,103,127,163,223,271,283,331,367,523,631,643,727,787,811,
%T A145479 883,967,1051,1063,1123,1171,1231,1291,1423,1447,1471,1483,1543,1627,
%U A145479 1723,1783,1951,1987,2011,2143,2203,2311,2371,2467,2551,2731,2767,2887,3067
%N A145479 Primes p such that (31+p)/2 is prime.
%C A145479 All terms are congruent to 3 mod 4 and (with the exception of the first term) to 7 mod 12.
%H A145479 Ivan Neretin, <a href="/A145479/b145479.txt">Table of n, a(n) for n = 1..10000</a>
%t A145479 aa = {}; k = 31; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, Prime[n]]], {n, 1, 500}];aa
%t A145479 Select[Prime[Range[500]],PrimeQ[(31+#)/2]&] (* _Harvey P. Dale_, Feb 05 2012 *)
%o A145479 (PARI) list(n)=my(t=1, p, i=1); while(i<n, p=prime(i); i=i+1; if(p>2&&isprime((31+p)/2),print1(p, ", "))) \\ _Anders Hellström_, Jan 23 2017
%Y A145479 Cf. A092109, A145471, A145472, A145473, A145474, A145475, A145476, A145477, A145478, A145479, A155480.
%K A145479 nonn
%O A145479 1,1
%A A145479 _Artur Jasinski_, Oct 11 2008