cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A133409 Zero followed by partial sums of A133405.

Original entry on oeis.org

0, 0, 0, 0, 1, 4, 13, 39, 117, 351, 1054, 3163, 9490, 28470, 85410, 256230, 768691, 2306074, 6918223, 20754669, 62264007, 186792021, 560376064, 1681128193, 5043384580, 15130153740, 45390461220, 136171383660
Offset: 0

Views

Author

Paul Curtz, Nov 25 2007

Keywords

Crossrefs

Programs

  • Mathematica
    Join[{0},Accumulate[LinearRecurrence[{3,0,-1,3},{0,0,0,1},40]]] (* or *) LinearRecurrence[{4,-3,-1,4,-3},{0,0,0,0,1},40] (* Harvey P. Dale, Dec 24 2013 *)

Formula

a(n+1)-3*a(n) = A088911(n+3).
a(n) = 4*a(n-1)-3*a(n-2)-a(n-3)+4*a(n-4)-3*a(n-5).
O.g.f.: x^4/((3*x-1)*(1+x)*(x^2-x+1)*(x-1)). - R. J. Mathar, Jul 16 2008

Extensions

Edited and extended by R. J. Mathar, Jul 16 2008

A139782 Binomial transform of A077947.

Original entry on oeis.org

1, 2, 5, 15, 46, 139, 417, 1250, 3749, 11247, 33742, 101227, 303681, 911042, 2733125, 8199375, 24598126, 73794379, 221383137, 664149410, 1992448229, 5977344687, 17932034062, 53796102187, 161388306561, 484164919682, 1452494759045
Offset: 0

Views

Author

Paul Curtz, May 16 2008

Keywords

Crossrefs

Programs

  • Mathematica
    LinearRecurrence[{3,0,-1,3},{1,2,5,15},30] (* Harvey P. Dale, Jan 12 2019 *)

Formula

a(n) = 3*a(n-1)-a(n-3)+3*a(n-4).
O.g.f.: -(1-x)^2/((3*x-1)*(x^2-x+1)). a(n) = (4*3^n+3*A010892(n)-A010892(n-1))/7. - R. J. Mathar, May 18 2008

Extensions

More terms from R. J. Mathar, May 18 2008
Showing 1-2 of 2 results.