|
|
A217137
|
|
Numbers k such that 3^k + 10 is prime.
|
|
20
|
|
|
0, 1, 2, 3, 6, 8, 18, 36, 98, 114, 134, 138, 212, 252, 516, 1166, 2321, 2442, 2732, 4569, 8622, 8709, 16487, 22722, 25242, 29928, 32034, 33783, 34001, 44934, 50868, 77861, 90188, 102102, 171843, 178226, 273521
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[0, 5000], PrimeQ[3^# + 10] &]
|
|
PROG
|
(PARI) for(n=0, 5*10^3, if(isprime(3^n+10), print1(n", ")))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|