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 A289356 #14 Jul 05 2017 02:54:08 %S A289356 2,1,1,1,3,1,1,3,1,7,3,5,1,9,1,1,5,1,5,3,1,1,3,5,1,3,7,1,9,7,7,5,5,1, %T A289356 3,17,29,3,1,7,17,1,5,9,7,11,17,11,5,9,1,5,11,17,1,3,11,1,11,1,11,11, %U A289356 1,17,17,7,1,5,11,1,3,1,5,5,7,1,5,1,1,3,1,11,17,5,11,11 %N A289356 Least number k such that n^2 + n + k is prime. %C A289356 a(A002384(n)) = 1. %C A289356 a(A027752(n)) = 3, for n > 2. %H A289356 Robert Israel, <a href="/A289356/b289356.txt">Table of n, a(n) for n = 0..10000</a> %F A289356 a(n) = A013632(A002378(n)). - _Robert Israel_, Jul 05 2017 %p A289356 seq(nextprime(n^2+n)-(n^2+n), n=0..100); # _Robert Israel_, Jul 05 2017 %t A289356 Table[k = 1; While[! PrimeQ[n^2 + n + k], k++]; k, {n, 0, 85}] (* _Michael De Vlieger_, Jul 04 2017 *) %o A289356 (PARI) for(n=0,85,k={my(k=1);while(!isprime(n^2+n+k),k++);k;};print1(k", ")) %Y A289356 Cf. A002378, A002384, A013632, A027752, A182047 (resulting primes). %K A289356 nonn %O A289356 0,1 %A A289356 _Gionata Neri_, Jul 03 2017