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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A132164 Row sums of triangle A134141 (S1p(7)). 4
1, 1, 8, 78, 918, 12846, 209616, 3909228, 81859548, 1897344828, 48135826656, 1325008302696, 39292978029768, 1247949491330088, 42236558731574208, 1516738194700667856, 57573649342673292816, 2302425590703685075728, 96720470167595138898048 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

Alois P. Heinz, Table of n, a(n) for n = 0..409

FORMULA

a(n)= sum(A134141(n,m),m=1..n),n>=1.

E.g.f.: exp((1-(1-x)^6)/(6*(1-x)^6)). Cf. e.g.f. first column of A134141.

MAPLE

a:= proc(n) option remember; `if`(n=0, 1, add(

      binomial(n-1, j-1)*(j+5)!/6!*a(n-j), j=1..n))

    end:

seq(a(n), n=0..25);  # Alois P. Heinz, Aug 01 2017

MATHEMATICA

a[n_]:=a[n]=If[n==0, 1, Sum[Binomial[n - 1, j - 1] (j + 5)!/6! a[n - j], {j, n}]]; Table[a[n], {n, 0, 25}] (* Indranil Ghosh, Aug 02 2017, after Maple code *)

CROSSREFS

Cf. A132165 (alternating row sum of A134141).

Sequence in context: A199758 A111533 A218499 * A058480 A000435 A052698

Adjacent sequences:  A132161 A132162 A132163 * A132165 A132166 A132167

KEYWORD

nonn,easy

AUTHOR

Wolfdieter Lang, Oct 12 2007

EXTENSIONS

a(0)=1 prepended by Alois P. Heinz, Aug 01 2017

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified February 24 14:41 EST 2018. Contains 299623 sequences. (Running on oeis4.)