A130029 a(n) = Sum_{d|n} phi(n/d) * prime(d).
2, 5, 9, 14, 19, 28, 29, 40, 45, 60, 51, 88, 65, 90, 105, 114, 91, 150, 103, 178, 161, 160, 127, 252, 181, 202, 215, 268, 165, 352, 187, 306, 289, 278, 331, 462, 229, 320, 357, 506, 259, 542, 275, 474, 537, 392, 303, 706, 413, 586, 495, 590, 345, 720, 571, 764, 565, 520
Offset: 1
Keywords
Examples
a(4) = 14 = dot product of row 4 of A054523, (2, 1, 0, 1) and primes (2, 3, 5, 7) = (4 + 3 + 0 + 7) = 14.
Programs
-
Maple
A130029 := proc(n) add( A054523(n,k)*ithprime(k),k=1..n) ; end proc: # R. J. Mathar, Apr 04 2012
-
PARI
a(n) = sumdiv(n, d, eulerphi(n/d)*prime(d)); \\ Michel Marcus, Mar 22 2020
Formula
a(n) = Sum_{k=1..n} prime(gcd(n,k)). - Ilya Gutkovskiy, Mar 22 2020
Extensions
New name and more terms from Ilya Gutkovskiy, Mar 22 2020
Comments