|
|
A217347
|
|
Numbers k such that 3^k - 10 is prime.
|
|
19
|
|
|
3, 4, 5, 6, 8, 17, 18, 21, 22, 36, 38, 41, 54, 56, 81, 92, 100, 106, 160, 310, 406, 560, 902, 5549, 9926, 12334, 19374, 19995, 20166, 39609, 62900, 186903, 244461
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[2, 5000], PrimeQ[3^# - 10] &]
|
|
PROG
|
(PARI) for(n=2, 5*10^3, if(isprime(3^n-10), print1(n", ")))
(Magma) /* The code produces the sequence up to 560: */ [n: n in [2..800] | IsPrime(3^n - 10)];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|