%I #5 Mar 31 2012 12:38:24
%S 2,19,151,355687428096307,620448401733239439360601
%N Primes of the form n!+n^2+n+1.
%C Generated by the n of A079649.
%C a(6) = 20659137880503071791380...00000000000098911 (with 650 digits).
%t lst={};Do[p=n!+n^2+n+1;If[PrimeQ[p],AppendTo[lst,p]],{n,0,6!}];lst
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Jun 14 2009
|