login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A107878 Column 2 of triangle A107876. 6
1, 1, 3, 15, 106, 975, 11100, 151148, 2401365, 43681578, 896371205, 20504034645, 517705752096, 14310162565395, 430020328711305, 13963933247986995, 487456219774434795, 18209055555140970945, 724952705958984299025 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

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

FORMULA

G.f.: 1 = Sum_{k>=0} a(k)*x^k*(1-x)^((k+1)*(k+2)/2).

From Benedict W. J. Irwin, Nov 29 2016: (Start)

Conjecture: a(n) is given by a series of nested sums,

a(1) = Sum_{i=1..1} 1,

a(2) = Sum_{i=1..1}Sum_{j=1..i+2} 1,

a(3) = Sum_{i=1..1}Sum_{j=1..i+2}Sum_{k=1..j+3} 1,

a(4) = Sum_{i=1..1}Sum_{j=1..i+2}Sum_{k=1..j+3}Sum_{l=1..k+4} 1. (End)

EXAMPLE

G.f. = 1 + x + 3*x^2 + 15*x^3 + 106*x^4 + 975*x^5 + 11100*x^6 + 151148*x^7 + ...

1 = 1*(1-x)^1 + 1*x*(1-x)^3 + 3*x^2*(1-x)^6 + 15*x^3*(1-x)^10 + 106*x^4*(1-x)^15 + 975*x^5*(1-x)^21 + 11100*x^6*(1-x)^21 +...

MATHEMATICA

a[ n_, k_: 0, j_: 1] := If[ n < 1, Boole[n >= 0], a[ n, k, j] = Sum[ a[ n - 1, i, j + 1], {i, k + j}]]; (* Michael Somos, Nov 26 2016 *)

PROG

(PARI) {a(n)=polcoeff(1-sum(k=0, n-1, a(k)*x^k*(1-x+x*O(x^n))^((k+1)*(k+2)/2)), n)}

CROSSREFS

Cf. A107876, A107877, A107879, A209440 (variant).

Sequence in context: A231634 A128276 A295124 * A218688 A120016 A074519

Adjacent sequences:  A107875 A107876 A107877 * A107879 A107880 A107881

KEYWORD

nonn

AUTHOR

Paul D. Hanna, Jun 04 2005

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 22 17:25 EDT 2019. Contains 321422 sequences. (Running on oeis4.)