login
Sum of digits of the cubes of prime numbers.
5

%I #14 Jul 19 2024 09:21:42

%S 8,9,8,10,8,19,17,28,17,26,28,19,26,28,17,35,26,28,19,26,28,28,35,35,

%T 28,8,28,17,28,35,28,26,26,37,35,28,46,28,35,35,35,37,44,37,35,46,37,

%U 37,35,37,35,35,37,26,44,35,35,28,28,26,37,35,37,17,37,26

%N Sum of digits of the cubes of prime numbers.

%F a(n) = A007953(A030078(n)). - _R. J. Mathar_, Jul 19 2024

%p read("transforms") :

%p A235398 := proc(n)

%p digsum(ithprime(n)^3) ;

%p end proc:

%p seq(A235398(n),n=1..40) ; # _R. J. Mathar_, Jul 19 2024

%o (PARI) a(n) = sumdigits(prime(n)^3); \\ _Michel Marcus_, Jan 09 2014

%Y Cf. A004164, A007953, A123157.

%K nonn,base

%O 1,1

%A _Antonio GraciĆ” Llorente_, Jan 09 2014