|
Search: id:A130828
|
|
|
| A130828 |
|
Primes p such that the sum of the digitis of p^p is a prime. |
|
+0
1
|
|
| 5, 11, 19, 29, 37, 43, 89, 97, 113, 139, 269, 311, 337, 359, 367, 433
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Computed by Emeric Deutsch.
|
|
EXAMPLE
|
For 5^5=625, 6+2+5=13 which is a prime.
|
|
MAPLE
|
sd := proc (n) options operator, arrow: add(convert(n, base, 10)[j], j = 1 .. nops(convert(n, base, 10))) end proc: a := proc (n) if isprime(sd(ithprime(n)^ithprime(n))) = true then ithprime(n) else end if end proc: seq(a(n), n = 1 .. 90); - Emeric Deutsch (deutsch(AT)duke.poly.edu), Jul 19 2007
|
|
CROSSREFS
|
Sequence in context: A141130 A141158 A038872 this_sequence A108151 A088059 A028387
Adjacent sequences: A130825 A130826 A130827 this_sequence A130829 A130830 A130831
|
|
KEYWORD
|
nonn,base,less
|
|
AUTHOR
|
J. M. Bergot (thekingfishb(AT)yahoo.ca), Jul 17 2007
|
|
|
Search completed in 0.002 seconds
|
