|
|
A103070
|
|
Numbers n such that 8*10^n + 9 is prime.
|
|
1
|
|
|
0, 1, 2, 3, 6, 12, 20, 21, 37, 42, 55, 60, 98, 100, 104, 223, 237, 260, 501, 570, 600, 698, 8857, 20911, 24345, 31964, 67742, 162924
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
For n =0, 8*10^0 + 9 = 8 + 9 = 17, hence 0 is a term.
|
|
MATHEMATICA
|
Do[ If[ PrimeQ[ 8*10^n + 9], Print[ n ]], {n, 0, 10000}]
|
|
PROG
|
(PARI) for(n=0, 1e3, if(ispseudoprime(8*10^n + 9), print1(n, ", "))) \\ Altug Alkan, Dec 18 2015
(Magma) [n: n in [0..3*10^2] | IsPrime(8*10^n + 9)]; // Vincenzo Librandi, Dec 20 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
a(1) = 0 inserted and a(28) added by Robert Price, Dec 18 2015
|
|
STATUS
|
approved
|
|
|
|