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