[go: up one dir, main page]

login
Revision History for A318118 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
a(n) = [x^n] exp(Sum_{k>=1} x^k*(1 + (n - 3)*x^k)/(k*(1 - x^k)^3)).
(history; published version)
#6 by Vaclav Kotesovec at Sat Aug 18 11:23:15 EDT 2018
STATUS

editing

approved

#5 by Vaclav Kotesovec at Sat Aug 18 11:23:02 EDT 2018
FORMULA

a(n) ~ c * d^n / sqrt(n), where d = 4.3505530790182509701639869563721679988879373943131559534408716195123... and c = 0.2276354216252041005336767937139336687746108521151301186102034... - Vaclav Kotesovec, Aug 18 2018

#4 by Vaclav Kotesovec at Sat Aug 18 11:15:43 EDT 2018
LINKS

Vaclav Kotesovec, <a href="/A318118/b318118.txt">Table of n, a(n) for n = 0..1000</a>

STATUS

proposed

editing

#3 by Ilya Gutkovskiy at Sat Aug 18 09:18:05 EDT 2018
STATUS

editing

proposed

#2 by Ilya Gutkovskiy at Sat Aug 18 09:14:51 EDT 2018
NAME

allocated for Ilya Gutkovskiy

a(n) = [x^n] exp(Sum_{k>=1} x^k*(1 + (n - 3)*x^k)/(k*(1 - x^k)^3)).

DATA

1, 1, 3, 10, 40, 150, 616, 2456, 10102, 41400, 171526, 712111, 2972115, 12434993, 52195414, 219567909, 925704792, 3909841659, 16541598215, 70085877919, 297347922785, 1263046810334, 5370930049915, 22861883482838, 97402827429118, 415332438952517, 1772380322197432

OFFSET

0,3

COMMENTS

For n > 2, a(n) is the n-th term of the Euler transform of n-gonal numbers.

LINKS

N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>

<a href="/index/Pol#polygonal_numbers">Index to sequences related to polygonal numbers</a>

MATHEMATICA

Table[SeriesCoefficient[Exp[Sum[x^k (1 + (n - 3) x^k)/(k (1 - x^k)^3), {k, 1, n}]], {x, 0, n}], {n, 0, 26}]

KEYWORD

allocated

nonn

AUTHOR

Ilya Gutkovskiy, Aug 18 2018

STATUS

approved

editing

#1 by Ilya Gutkovskiy at Sat Aug 18 09:14:51 EDT 2018
NAME

allocated for Ilya Gutkovskiy

KEYWORD

allocated

STATUS

approved