login
A102910
Primes of the form 5^n+8.
10
13, 2524354896707237777317531408904915934954260592348873615264892578133
OFFSET
1,1
COMMENTS
The next term, 5^(335)+8, is too large to include.
MAPLE
a:=proc(n) if isprime(5^n+8)=true then [n, 5^n+8] else fi end: seq(a(n), n=1..400); # yields also the value of n
MATHEMATICA
a = Delete[Union[Flatten[Table[If [PrimeQ[5^n + 7 + 1] == True, 5^n + 7 + 1, 0], {n, 1, 400}]]], 1]
CROSSREFS
Cf. A217133 (values of n).
Sequence in context: A322517 A257375 A228033 * A262298 A181170 A243830
KEYWORD
nonn,bref
AUTHOR
Roger L. Bagula, Mar 01 2005
EXTENSIONS
Edited by N. J. A. Sloane, Apr 16 2006
Verified by Don Reble, Apr 25 2006
STATUS
approved