|
|
A130029
|
|
a(n) = Sum_{d|n} phi(n/d) * prime(d).
|
|
4
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
A054523 as an infinite lower triangular matrix * A000040 (the primes) as a vector.
|
|
EXAMPLE
|
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.
|
|
MAPLE
|
add( A054523(n, k)*ithprime(k), k=1..n) ;
|
|
PROG
|
(PARI) a(n) = sumdiv(n, d, eulerphi(n/d)*prime(d)); \\ Michel Marcus, Mar 22 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|