|
| |
|
|
A034678
|
|
Sum of fourth powers of unitary divisors.
|
|
1
| |
|
|
1, 17, 82, 257, 626, 1394, 2402, 4097, 6562, 10642, 14642, 21074, 28562, 40834, 51332, 65537, 83522, 111554, 130322, 160882, 196964, 248914, 279842, 335954, 390626, 485554, 531442, 617314, 707282, 872644, 923522, 1048577, 1200644
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
FORMULA
| Dirichlet g.f. zeta(s)*zeta(s-4)/zeta(2*s-4). - R. J. Mathar, Mar 04 2011
|
|
|
PROG
| (PARI) A000012=direuler(p=2, 119, 1/(1-X)) ;
A000583=direuler(p=2, 119, 1/(1-p^4*X)) ;
A000290x=direuler(p=2, 119, 1-p^4*X^2) ;
dirmul(dirmul(A000012, A000583), A000290x) /* R. J. Mathar, Mar 05 2011 */
|
|
|
CROSSREFS
| Cf. A034444, A034448.
Sequence in context: A053826 A184982 A088687 * A065960 A017671 A001159
Adjacent sequences: A034675 A034676 A034677 * A034679 A034680 A034681
|
|
|
KEYWORD
| nonn,mult
|
|
|
AUTHOR
| Erich Friedman (erich.friedman(AT)stetson.edu)
|
| |
|
|
