OFFSET
1,1
FORMULA
MAPLE
read("transforms") :
A235398 := proc(n)
digsum(ithprime(n)^3) ;
end proc:
seq(A235398(n), n=1..40) ; # R. J. Mathar, Jul 19 2024
PROG
(PARI) a(n) = sumdigits(prime(n)^3); \\ Michel Marcus, Jan 09 2014
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Antonio GraciĆ” Llorente, Jan 09 2014
STATUS
approved