A034730 Dirichlet convolution of b_n=1 with c_n=3^(n-1).

1, 4, 10, 31, 82, 256, 730, 2218, 6571, 19768, 59050, 177430, 531442, 1595056, 4783060, 14351125, 43046722, 129146980, 387420490, 1162281262, 3486785140, 10460412256, 31381059610, 94143358444, 282429536563, 847289140888, 2541865834900, 7625599080070, 22876792454962

Offset

1,2

Links

Seiichi Manyama, Table of n, a(n) for n = 1..2000

Formula

G.f.: Sum_{n>0} x^n/(1-3*x^n). - Vladeta Jovovic, Nov 14 2002

a(n) ~ 3^(n-2). - Vaclav Kotesovec, Sep 09 2014

a(n) = Sum_{d|n} 3^(d-1). - Seiichi Manyama, Jun 26 2019

Mathematica

Rest[CoefficientList[Series[Sum[x^k/(1-3*x^k), {k, 1, 30}], {x, 0, 30}], x]] (* Vaclav Kotesovec, Sep 09 2014 *)

Prog

(PARI) {a(n) = sumdiv(n, d, 3^(d-1))} \\ Seiichi Manyama, Jun 26 2019

Crossrefs

Cf. A034729.

Sequence in context: A333916 A264564 A304963 * A321143 A095127 A006342

Adjacent sequences: A034727 A034728 A034729 * A034731 A034732 A034733

Keyword

nonn

Author

Erich Friedman

Status

approved