OFFSET
1,1
EXAMPLE
6 is in the sequence because 6^6 = 46656 and 4^2 + 6^2 + 6^2 + 5^2 + 6^2 =
149 is a prime.
MAPLE
with(numtheory):for n from 1 to 540 do: l:=length(n^n) : n0:=n^n: s:=0:for
m from 1 to l do: q:=n0:u:=irem(q, 10):v:=iquo(q, 10): n0:=v :s:=s+u^2: od:if
type(s, prime)=true then printf(`%d, `, n):else fi:od:
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Lagneau, Nov 17 2010
STATUS
approved