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 A190800 #19 Jul 03 2020 11:21:58 %S A190800 11,17,41,844427,51448361,51867197,85776137,86966771,93685301, %T A190800 97122197,107599757,113575727,118136267,122983031,180078317,232728647, %U A190800 316973621,483040757,564537761,749930717,840472307,901288517,960959381,1278189947,1559839991,1696818647,1761702947,1829187287,2251028567 %N A190800 Primes p such that the polynomial x^2 + x + p generates only primes for x = 1..8. %C A190800 Subsequence of A187060: a(1..10)=A187060(1,2,3,7,18,19,26,28,31,32). %H A190800 Charles R Greathouse IV, <a href="/A190800/b190800.txt">Table of n, a(n) for n = 1..10000</a> %t A190800 Select[Prime[Range[110*10^6]],AllTrue[Table[x^2+x+#,{x,8}],PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jul 03 2020 *) %o A190800 (PARI) is(n)=for(x=0,8, if(!isprime(x^2+x+n), return(0))); 1 \\ _Charles R Greathouse IV_, Sep 14 2015 %Y A190800 Cf. A187060. %K A190800 nonn %O A190800 1,1 %A A190800 _Zak Seidov_, Jun 02 2011