|
Search: id:A100838
|
|
|
| A100838 |
|
Numbers n such that n^n+7 is prime. |
|
+0
1
|
| |
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Here we interpret 0^0 as 1.
|
|
MATHEMATICA
|
lst={}; Do[p=n^n+7; If[PrimeQ[p], AppendTo[lst, n]], {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: A006933 A046847 A121069 this_sequence A056696 A045662 A084324
Adjacent sequences: A100835 A100836 A100837 this_sequence A100839 A100840 A100841
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
Cino Hilliard (hillcino368(AT)gmail.com), Jan 07 2005
|
|
|
Search completed in 0.002 seconds
|
