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 A161616 #10 Sep 08 2022 08:45:45
%S A161616 29,41,53,71,79,97,103,113,127,131,137,139,151,163,179,197,199,223,
%T A161616 227,257,271,277,283,311,313,331,337,349,353,383,389,401,419,431,443,
%U A161616 461,503,521,563,619,643,653,673,683,769,809,827,883,887,911,919,929,947
%N A161616 Primes p such that 2*p+111546435 is also prime.
%C A161616 3*5*7*11*13*17*19*23 = 111546435 = A046326(2) = A147581(1).
%H A161616 Vincenzo Librandi, <a href="/A161616/b161616.txt">Table of n, a(n) for n = 1..1000</a>
%t A161616 a=3*5*7*11*13*17*19*23;c=0;lst={};Do[p=Prime[n];If[PrimeQ[2*p+a],AppendTo[lst,p],c++ ],{n,6!}];lst
%t A161616 Select[Prime[Range[200]], PrimeQ[2 # + 111546435]&] (* _Vincenzo Librandi_, Apr 15 2013 *)
%o A161616 (Magma) [p: p in PrimesUpTo(1000) | IsPrime(2*p + 111546435)]; // _Vincenzo Librandi_, Apr 15 2013
%K A161616 nonn,less
%O A161616 1,1
%A A161616 _Vladimir Joseph Stephan Orlovsky_, Jun 14 2009