A130828 Primes p such that the sum of the digits of p^p is a prime.

5, 11, 19, 29, 37, 43, 89, 97, 113, 139, 269, 311, 337, 359, 367, 433

Offset

1,1

Comments

Computed by Emeric Deutsch.

Links

Table of n, a(n) for n=1..16.

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, Jul 19 2007

Crossrefs

Cf. A051674, A066588.

Sequence in context: A038872 A141158 A239732 * A244241 A108151 A209188

Adjacent sequences: A130825 A130826 A130827 * A130829 A130830 A130831

Keyword

nonn,base,less

Author

J. M. Bergot, Jul 17 2007

Status

approved