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 A211237 #11 Nov 02 2021 21:11:16 %S A211237 51867197,85776137,93685301,97122197,107599757,113575727,118136267, %T A211237 232728647,316973621,483040757,564537761,749930717,840472307, %U A211237 901288517,1559839991,1696818647,2251028567,2469604721,2796607337,3098938847,3152692841,3344410367 %N A211237 Prime numbers p such that x^2 + x + p produces primes for x = 0..8 but not x = 9. %C A211237 The first term is A164926(9). %H A211237 T. D. Noe, <a href="/A211237/b211237.txt">Table of n, a(n) for n = 1..500</a> %t A211237 lookfor = 9; t = {}; n = 0; While[Length[t] < 25, n++; c = Prime[n]; i = 1; While[PrimeQ[i^2 + i + c], i++]; If[i == lookfor, AppendTo[t, c]]]; t %t A211237 Select[Prime[Range[31*10^5,65*10^5]],AllTrue[#+{2,6,12,20,30,42,56,72},PrimeQ] && CompositeQ[#+90]&] (* The program generates the first 6 terms of the sequence. To generate more, increase the second Range constant. *) (* _Harvey P. Dale_, Nov 02 2021 *) %Y A211237 Cf. A067774, A164926. %K A211237 nonn %O A211237 1,1 %A A211237 _T. D. Noe_, Apr 08 2012