%I #14 Jan 10 2013 10:15:36
%S 3,19,4099,65539,234259,456979,614659,1336339,3748099,14776339,
%T 21381379,33362179,45212179,71639299,116985859,146410003,193877779,
%U 268435459,322417939,759333139,1146228739,1664966419,2019963139
%N Primes of the form n^4 + 3.
%H Harvey P. Dale, <a href="/A182344/b182344.txt">Table of n, a(n) for n = 1..1000</a>
%e 3 = 0^4 + 3; 19 = 2^4 + 3.
%p # choose N large, then S is the desired set
%p f:=n->n^4 + 3:
%p S:={}:
%p for n from 0 to N do if(isprime(f(n))) then S:=S union {f(n)}: fi: od:
%t Select[Range[0,250]^4+3,PrimeQ] (* _Harvey P. Dale_, Jan 10 2013 *)
%Y Cf. A037896.
%K nonn
%O 1,1
%A _Patrick Devlin_, Apr 25 2012