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 A111501 #21 Aug 24 2016 10:40:29 %S A111501 2,3,5,6,8,13,14,21,24,26,28,29,33,34,35,36,40,43,45,48,49,50,51,55, %T A111501 58,76,80,83,89,90,93,96,99,100,101,104,110,111,115,118,120,121,124, %U A111501 133,135,138,140,148,149,161,170,173,181,190,191,194,195,201,203,204,205 %N A111501 Numbers n such that n^3 - n^2 + 1 is prime. %H A111501 Ivan Neretin, <a href="/A111501/b111501.txt">Table of n, a(n) for n = 1..10000</a> %e A111501 2^3 - 2^2 + 1 = 8 - 4 + 1 = 5, which is prime. %t A111501 Select[Range[210],PrimeQ[#^3-#^2+1]&] (* _Harvey P. Dale_, Mar 04 2012 *) %o A111501 (PARI) isok(n) = isprime(n^3 - n^2 + 1); \\ _Michel Marcus_, Aug 24 2016 %Y A111501 Cf. A162292 (corresponding primes). %K A111501 easy,nonn %O A111501 1,1 %A A111501 _Pierre CAMI_, Nov 16 2005 %E A111501 More terms from _Vladimir Joseph Stephan Orlovsky_, Jun 30 2009