A347896 E.g.f.: Product_{k>=1} 1 / (1 - x^k)^(cos(x)/k).

1, 1, 3, 8, 35, 154, 1069, 6992, 63181, 581792, 6370661, 67452274, 951915997, 11969405746, 179011910505, 2779710261520, 48258699341241, 801399592338584, 16001984887453273, 296633739485713758, 6451644638913737817, 139116145404549492478, 3202263932381289406973, 72019768700608119636692

Offset

0,3

Links

Table of n, a(n) for n=0..23.

Formula

E.g.f.: exp( cos(x) * Sum_{k>=1} d(k)*x^k/k ).

Prog

(PARI) N=40; x='x+O('x^N); Vec(serlaplace(1/prod(k=1, N, (1-x^k)^(cos(x)/k))))
(PARI) N=40; x='x+O('x^N); Vec(serlaplace(exp(cos(x)*sum(k=1, N, numdiv(k)*x^k/k))))

Crossrefs

Cf. A000005 (d(n)), A346545, A347895, A347897.

Sequence in context: A304726 A226679 A216541 * A194090 A294385 A020099

Adjacent sequences: A347893 A347894 A347895 * A347897 A347898 A347899

Keyword

nonn

Author

Seiichi Manyama, Sep 18 2021

Status

approved