|
|
A272074
|
|
Numbers k such that k^4 + 29*k^2 + 101 is prime.
|
|
30
|
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 21, 23, 26, 31, 32, 34, 35, 37, 43, 44, 45, 47, 49, 53, 56, 60, 61, 62, 66, 67, 68, 70, 71, 72, 74, 75, 79, 80, 81, 84, 85, 89, 90, 91, 93, 96, 99
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
EXAMPLE
|
4 is in this sequence since 4^4 + 29*4^2 + 101 = 256+464+101 = 821 is prime.
|
|
MATHEMATICA
|
Select[Range[0, 100], PrimeQ[#^4+29#^2+101]&] (* Harvey P. Dale, Dec 15 2020 *)
|
|
PROG
|
(PARI) lista(nn) = for(n=0, nn, if(ispseudoprime(n^4+29*n^2+101), print1(n, ", "))); \\ Altug Alkan, Apr 19 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,less
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|