|
Search: id:A100841
|
|
|
| A100841 |
|
Primes of the form n^n+7. |
|
+0
1
|
|
| 11, 263, 46663, 1461501637330902918203684832716283019655932542983
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
lst={}; Do[p=n^n+7; If[PrimeQ[p], AppendTo[lst, p]], {n, 2*5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Nov 01 2009]
|
|
PROGRAM
|
(PARI) f1(n, a) = for(x=0, n, y=x^x+a; if(ispseudoprime(y), print1(y", ")))
|
|
CROSSREFS
|
Sequence in context: A142208 A091159 A130177 this_sequence A003389 A027019 A108519
Adjacent sequences: A100838 A100839 A100840 this_sequence A100842 A100843 A100844
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
Cino Hilliard (hillcino368(AT)gmail.com), Jan 07 2005
|
|
|
Search completed in 0.002 seconds
|
