cp's OEIS Frontend

A182343 Primes of the form k^4 + 2 for k >= 0.

%I A182343 #26 Sep 08 2022 08:45:55
%S A182343 2,3,83,6563,50627,194483,4100627,10556003,15752963,22667123,57289763,
%T A182343 96059603,276922883,395254163,6059221283,6597500627,12296370323,
%U A182343 14166950627,42110733683,44386483763,46753250627,49213429283,69257922563,72555348323
%N A182343 Primes of the form k^4 + 2 for k >= 0.
%C A182343 Apart from 3, this is a subsequence of A053786. - _Bruno Berselli_, Apr 26 2012
%H A182343 Vincenzo Librandi, <a href="/A182343/b182343.txt">Table of n, a(n) for n = 1..1000</a>
%e A182343 2 = 0^4 + 2;
%e A182343 3 = 1^4 + 2;
%e A182343 83 = 3^4 + 2.
%p A182343 # choose N large, then S is the desired set
%p A182343 f:=n->n^4 + 2:
%p A182343 S:={}:
%p A182343 for n from 0 to N do if(isprime(f(n))) then S:=S union {f(n)}: fi: od:
%t A182343 Select[Range[0,600]^4 + 2,PrimeQ] (* _Bruno Berselli_, Apr 26 2012 *)
%o A182343 (Magma) [2,3] cat [n^4+2: n in [3..600 by 6]|IsPrime(n^4+2)]; // _Bruno Berselli_, Apr 26 2012
%Y A182343 Cf. A037896, A053786.
%K A182343 nonn,easy
%O A182343 1,1
%A A182343 _Patrick Devlin_, Apr 25 2012