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 A023233 #26 Sep 08 2022 08:44:47 %S A023233 3,5,11,19,29,31,43,53,71,73,101,103,109,113,131,151,173,179,191,211, %T A023233 229,233,239,269,271,281,283,311,313,373,379,383,431,443,491,499,509, %U A023233 521,541,599,613,619,653,691,701,719,733,739,743,751,773,809,883,919,929,971,983 %N A023233 Primes p such that 9*p + 2 is also prime. %H A023233 John Cerkan, <a href="/A023233/b023233.txt">Table of n, a(n) for n = 1..10000</a> %p A023233 A023233:=n->`if`(isprime(n) and isprime(9*n+2), n, NULL): seq(A023233(n), n=1..10^3); # _Wesley Ivan Hurt_, Sep 08 2016 %t A023233 Select[Prime[Range[200]], PrimeQ[9#+2]&] (* _Harvey P. Dale_, Dec 02 2010 *) %o A023233 (Magma) [n: n in [0..1000] | IsPrime(n) and IsPrime(9*n+2)] // _Vincenzo Librandi_, Nov 20 2010 %K A023233 nonn %O A023233 1,1 %A A023233 _David W. Wilson_