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 A125881 #16 Mar 18 2020 07:29:32 %S A125881 2,4,5,6,9,11,12,14,19,22,25,26,27,29,32,34,36,37,40,44,47,49,55,60, %T A125881 62,64,65,69,70,71,81,82,84,89,95,97,106,107,114,119,121,125,127,132, %U A125881 139,140,141,144,147,155,159,161,165,172,174,179,184,190,201,204 %N A125881 Numbers k for which k^3+k^2-1 is prime. %C A125881 Generating polynomial belongs to the family of irreducible polynomials (or trinomials) of the form x^n+x^(n-1)-1. %H A125881 Amiram Eldar, <a href="/A125881/b125881.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Harvey P. Dale) %t A125881 Do[If[PrimeQ[x^3 + x^2 - 1], Print[x]], {x, 1, 100}] %t A125881 Select[Range[250], PrimeQ[#^3 + #^2 - 1] &] (* _Harvey P. Dale_, Jan 20 2015 *) %o A125881 (PARI) isok(n) = isprime(n^3+n^2-1); \\ _Michel Marcus_, Nov 08 2013 %Y A125881 Cf. A045546, A125882, A125883, A125884, A125885. %K A125881 nonn %O A125881 1,1 %A A125881 _Artur Jasinski_, Dec 14 2006 %E A125881 More terms from _Michel Marcus_, Nov 08 2013