
3, 4, 5, 8, 9, 16, 18, 30, 34, 36, 41, 48, 49, 51, 54, 61, 65, 69, 76, 81, 86, 89, 90, 95, 101, 109, 120, 141, 170, 171, 178, 196, 221, 235, 238, 244, 260, 263, 273, 280, 291, 301, 303, 310, 311, 326, 350, 361, 375, 391, 398, 404, 405, 406, 423, 429, 431, 454, 456, 464, 479, 484, 485, 486, 489, 499
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Robert Israel, Table of n, a(n) for n = 1..10000


MAPLE

select(t > isprime(t^6+t^51), [$1..1000]); # Robert Israel, Jan 08 2017


MATHEMATICA

Do[If[PrimeQ[x^6 + x^5  1], Print[x]], {x, 1, 200}]


PROG

(PARI) is(n)=isprime(n^6+n^51) \\ Charles R Greathouse IV, May 15 2013


CROSSREFS

Cf. A000040, A045546, A125881A125885.
Sequence in context: A329856 A327984 A066906 * A001602 A308197 A087012
Adjacent sequences: A125881 A125882 A125883 * A125885 A125886 A125887


KEYWORD

nonn


AUTHOR

Artur Jasinski, Dec 14 2006


EXTENSIONS

More terms from Robert Israel, Jan 08 2017


STATUS

approved

