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 A152843 #10 Sep 08 2022 08:45:39 %S A152843 0,1,4,10,13,19,25,40,43,55,64,85,88,94,115,118,124,139,145,178,208, %T A152843 214,220,244,253,295,319,325,328,340,358,370,379,403,454,475,505,508, %U A152843 514,523,550,610,613,643,703,718,724,739,748,754,778,790,799,865,904,943 %N A152843 Numbers n such that both 2n+3 and 4n+7 are prime. %C A152843 Or, numbers n such that 2n+3 is a Sophie Germain prime. [_Klaus Brockhaus_, Dec 22 2008] %H A152843 Vincenzo Librandi, <a href="/A152843/b152843.txt">Table of n, a(n) for n = 1..1000</a> %e A152843 For n = 10, 2*n+3 = 23 is prime and 4*n+7 = 47 is prime. 23 = A005384(5). %t A152843 Join[{0}, Select[Range[1000], PrimeQ[2*#+3] && PrimeQ[4*#+7] &]] (* _Vincenzo Librandi_, Aug 30 2012 *) %t A152843 Select[Range[0,1000],AllTrue[{2#+3,4#+7},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Aug 07 2015 *) %o A152843 (Magma) [ n: n in [0..1000] | IsPrime(2*n+3) and IsPrime(4*n+7) ]; %Y A152843 Cf. A067076 (2n+3 is prime), A089986 (4n+7 is prime), A005384 (Sophie Germain primes). %K A152843 nonn,easy %O A152843 1,3 %A A152843 _Vincenzo Librandi_, Dec 14 2008 %E A152843 Edited and extended by _Klaus Brockhaus_, Dec 22 2008