|
|
A102907
|
|
Primes of the form 3^n+10.
|
|
10
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Table of n, a(n) for n=1..10.
|
|
MATHEMATICA
|
a = Delete[Union[Flatten[Table[If [PrimeQ[3^n + 10] == True, 3^n + 10, 0], {n, 1, 200}]]], 1]
|
|
PROG
|
(Magma) [a: n in [0..250] | IsPrime(a) where a is 3^n+10]; // Vincenzo Librandi, Nov 16 2010
|
|
CROSSREFS
|
Sequence in context: A068579 A048519 A288878 * A235479 A089774 A346287
Adjacent sequences: A102904 A102905 A102906 * A102908 A102909 A102910
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger L. Bagula, Mar 01 2005
|
|
STATUS
|
approved
|
|
|
|