login
Primes of the form n^4 + 6.
0

%I #12 Jan 12 2013 16:05:40

%S 7,631,279847,4879687,12117367,20151127,28398247,62742247,68574967,

%T 81450631,174900631,1330863367,1698181687,3373402567,3722098087,

%U 4499860567,5719140631,9354951847,16610312167,18141126727

%N Primes of the form n^4 + 6.

%e 7 = 1^4 + 6; 631 = 5^4 + 6.

%p # choose N large, then S is the desired set

%p f:=n->n^4 + 6:

%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[1,400,2]^4+6,PrimeQ] (* _Harvey P. Dale_, Jan 12 2013 *)

%Y Cf. A037896.

%K nonn

%O 1,1

%A _Patrick Devlin_, Apr 25 2012