A309844 Primes of the form n^4 + n^2 + 3.
3, 5, 23, 653, 10103, 83813, 160403, 234743, 280373, 1049603, 3420653, 6252503, 11319863, 52207853, 92246423, 146422103, 174913853, 221548343, 442071653, 479807123, 577224653, 607597853, 655385603, 937921253, 1222865933, 1249233683, 1387525253, 1506177293
Offset: 1
Programs
-
MATLAB
a = []; for n = 0:1e3 x = n.^4+n.^2+3; if isprime(x); a = [a,x]; end; end -
Mathematica
f[n_] := n^4 + n^2 + 3; Select[f /@ Range[0, 200], PrimeQ] (* Amiram Eldar, Aug 24 2019 *)
-
Python
from sympy import isprime a = [] for n in range(0,1000): x = n**4+n**2+3 if isprime(x): a.append(x)
Comments