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 A193813 #10 Aug 20 2019 09:24:56 %S A193813 0,0,1,0,11,6,3,42,9,18,61,34,15,26,27,12,73,106,17,90,31,86,13,94,95, %T A193813 42,67,134,119,18,57,6,57,62,53,30,41,114,9,156,109,12,3,402,121,456, %U A193813 533,36,17,30,225,252,19,192,101,176,391,44,193,256,101,78,453 %N A193813 Least k such that n^n + k + 1 is a prime. %H A193813 Amiram Eldar, <a href="/A193813/b193813.txt">Table of n, a(n) for n = 1..500</a> %F A193813 a(n) = A098682(n) - n^n -1. - _Michel Marcus_, Aug 20 2019 %e A193813 a(5) = 11 because 5^5 + 11 + 1 = 37 is prime. %t A193813 a={};Do[k = 0; While[ !PrimeQ[n^n + k + 1], k++ ]; AppendTo[a, k], {n, 1, 100} ];a %o A193813 (PARI) a(n) = nextprime(n^n) - n^n - 1; \\ _Michel Marcus_, Aug 20 2019 %Y A193813 Cf. A000312, A098682. %K A193813 nonn %O A193813 1,5 %A A193813 _Michel Lagneau_, Aug 06 2011