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 A145484 #18 Jun 09 2025 04:40:50
%S A145484 17,23,29,41,59,71,83,89,101,113,131,149,173,191,239,269,293,311,353,
%T A145484 401,419,443,479,491,503,521,563,569,653,659,701,719,761,821,863,881,
%U A145484 953,971,1013,1049,1091,1151,1163,1181,1193,1223,1289,1319,1361,1409
%N A145484 Primes p such that 2*p - 29 is a positive prime.
%H A145484 Ivan Neretin, <a href="/A145484/b145484.txt">Table of n, a(n) for n = 1..10000</a>
%F A145484 a(n) = 2*A145478(n) - 29.
%t A145484 aa = {}; k = 29; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, (k + Prime[n])/2]], {n, 1, 500}];aa (* _Artur Jasinski_ *)
%t A145484 Select[Prime[Range[7,300]],PrimeQ[2#-29]&] (* _Harvey P. Dale_, Dec 14 2010 *)
%Y A145484 Cf. A063908-A063913, A092109, A145471-A145490.
%K A145484 nonn
%O A145484 1,1
%A A145484 _Artur Jasinski_, Oct 11 2008