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 A112391 #17 Jan 17 2025 19:22:04 %S A112391 3,7,19,37,43,67,103,157,193,277,337,367,373,379,397,439,457,463,547, %T A112391 607,829,859,877,919,1009,1033,1039,1117,1129,1213,1249,1297,1429, %U A112391 1543,1579,1627,1657,1699,1723,1759,1783,1789,1867,1993,1999,2053,2083,2089 %N A112391 Primes p such that 23*p + 2 is also prime. %H A112391 Harvey P. Dale, <a href="/A112391/b112391.txt">Table of n, a(n) for n = 1..1000</a> %e A112391 If p=277 then 23*p + 2 = 6373 (prime). %t A112391 Select[Prime[Range[400]],PrimeQ[23#+2]&] (* _Harvey P. Dale_, Sep 26 2021 *) %o A112391 (PARI) forprime(p=2,5000,if(isprime(23*p+2),print1(p,","))) \\ Lambert Herrgesell, Dec 09 2005 %o A112391 (Magma) [p: p in PrimesUpTo(3000)| IsPrime(23*p+2)]; // _Vincenzo Librandi_, Jan 29 2011 %Y A112391 Cf. A023208. %K A112391 nonn %O A112391 1,1 %A A112391 _Parthasarathy Nambi_, Dec 04 2005 %E A112391 More terms from Lambert Herrgesell (zero815(AT)googlemail.com), Dec 09 2005