

A059041


Numbers k such that 3*7^k + 2 is prime.


2



0, 1, 2, 3, 5, 6, 7, 10, 39, 99, 115, 158, 697, 966, 2602, 2899, 4057, 5226, 8279, 17946
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,3


COMMENTS



LINKS



MATHEMATICA

Do[ If[ PrimeQ[ 3*7^n + 2 ], Print[n] ], {n, 1, 6000} ]


PROG



CROSSREFS



KEYWORD

nonn,more


AUTHOR



EXTENSIONS



STATUS

approved



