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.

A249993 Expansion of 1/((1+x)*(1+2*x)*(1-4*x)).

Original entry on oeis.org

1, 1, 11, 29, 147, 525, 2227, 8653, 35123, 139469, 559923, 2235597, 8950579, 35785933, 143176499, 572640461, 2290692915, 9162509517, 36650562355, 146601200845, 586406900531, 2345623407821, 9382502019891, 37529991302349, 150119998763827, 600479927946445
Offset: 0

Views

Author

Alex Ratushnyak, Dec 27 2014

Keywords

Links

Crossrefs

Cf. A249992.
Cf. A006095, A171477 for g.f. 1/((1-x)*(1-2*x)*(1-4*x)).
Cf. A015249, A084152, A084175 for g.f. 1/((1-x)*(1+2*x)*(1-4*x)).
Cf. A109765 for g.f. 1/((1+x)*(1-2*x)*(1-4*x)).

Programs

  • Magma
    [(2^(2*n+3) +(-1)^n*(5*2^(n+1)-3))/15: n in [0..40]]; // G. C. Greubel, Oct 10 2022
  • Mathematica
    CoefficientList[Series[1/((1+x)(1+2x)(1-4x)),{x,0,30}],x] (* or *) LinearRecurrence[{1,10,8},{1,1,11},30] (* Harvey P. Dale, Dec 13 2018 *)
  • PARI
    Vec(1/((1+x)*(1+2*x)*(1-4*x)) + O(x^40)) \\ Michel Marcus, Dec 28 2014
  • SageMath
    [(2^(2*n+3) +(-1)^n*(5*2^(n+1)-3))/15 for n in range(41)] # G. C. Greubel, Oct 10 2022

Formula

G.f.: 1/((1+x)*(1+2*x)*(1-4*x)).
a(n) = ( 2^(3+2*n) + (5*2^(1+n) - 3)*(-1)^n )/15. Colin Barker, Dec 28 2014
a(n) = a(n-1) + 10*a(n-2) + 8*a(n-3). - Colin Barker, Dec 28 2014
E.g.f.: (1/15)*(10*exp(-2*x) - 3*exp(-x) + 8*exp(4*x)). - G. C. Greubel, Oct 10 2022

A140944 Triangle T(n,k) read by rows, the k-th term of the n-th differences of the Jacobsthal sequence A001045.

Original entry on oeis.org

0, 1, 0, -1, 2, 0, 3, -2, 4, 0, -5, 6, -4, 8, 0, 11, -10, 12, -8, 16, 0, -21, 22, -20, 24, -16, 32, 0, 43, -42, 44, -40, 48, -32, 64, 0, -85, 86, -84, 88, -80, 96, -64, 128, 0, 171, -170, 172, -168, 176, -160, 192, -128, 256, 0, -341, 342, -340, 344, -336, 352, -320, 384, -256, 512, 0
Offset: 0

Views

Author

Paul Curtz, Jul 24 2008

Keywords

Comments

A variant of the triangle A140503, now including the diagonal.
Since the diagonal contains zeros, rows sums are those of A140503.

Examples

			Triangle begins as:
    0;
    1,   0;
   -1,   2,   0;
    3,  -2,   4,  0;
   -5,   6,  -4,  8,   0;
   11, -10,  12, -8,  16,  0;
  -21,  22, -20, 24, -16, 32,  0;

Links

Crossrefs

Cf. A000079, A001045, A016131, A045883, A052992, A083086, A084175.
Cf. A091056, A097038, A109765, A115489, A140503, A192382, A246036.

Programs

  • Magma
    [2^k*(1-(-2)^(n-k))/3: k in [0..n], n in [0..15]]; // G. C. Greubel, Feb 18 2023
  • Maple
    A001045:= n -> (2^n-(-1)^n)/3;
A140944:= proc(n,k) if n = 0 then A001045(k); else procname(n-1,k+1)-procname(n-1,k) ; fi; end:
seq(seq(A140944(n,k),k=0..n),n=0..10); # R. J. Mathar, Sep 07 2009
  • Mathematica
    T[0, 0]=0; T[1, 0]= T[0, 1]= 1; T[0, k_]:= T[0, k]= T[0, k-1] + 2*T[0, k-2]; T[n_, n_]=0; T[n_, k_]:= T[n, k] = T[n-1, k+1] - T[n-1, k]; Table[T[n, k], {n, 0, 10}, {k, 0, n}]//Flatten (* Jean-François Alcover, Dec 17 2014 *)
Table[2^k*(1-(-2)^(n-k))/3, {n,0,15}, {k,0,n}]//Flatten (* G. C. Greubel, Feb 18 2023 *)
  • PARI
    T(n, k) = (2^k - 2^n*(-1)^(n+k))/3 \\ Jianing Song, Aug 11 2022
  • SageMath
    def A140944(n,k): return 2^k*(1 - (-2)^(n-k))/3
flatten([[A140944(n,k) for k in range(n+1)] for n in range(16)]) # G. C. Greubel, Feb 18 2023

Formula

T(n, k) = T(n-1, k+1) - T(n-1, k). T(0, k) = A001045(k).
T(n, k) = (2^k - 2^n*(-1)^(n+k))/3, for n >= k >= 0. - Jianing Song, Aug 11 2022
From G. C. Greubel, Feb 18 2023: (Start)
T(n, n-1) = A000079(n).
T(2*n, n) = (-1)^(n+1)*A192382(n+1).
T(2*n, n-1) = (-1)^n*A246036(n-1).
T(2*n, n+1) = A083086(n).
T(3*n, n) = -A115489(n).
Sum_{k=0..n} T(n, k) = A052992(n)*[n>0] + 0*[n=0].
Sum_{k=0..n} (-1)^k*T(n, k) = A045883(n).
Sum_{k=0..n} 2^k*T(n, k) = A084175(n).
Sum_{k=0..n} (-2)^k*T(n, k) = (-1)^(n+1)*A109765(n).
Sum_{k=0..n} 3^k*T(n, k) = A091056(n+1).
Sum_{k=0..floor(n/2)} T(n-k, k) = (-1)^(n+1)*A097038(n).
Sum_{k=0..floor(n/2)} (-1)^k*T(n-k, k) = (-1)^(n+1)*A138495(n). (End)

Extensions

Edited and extended by R. J. Mathar, Sep 07 2009
Showing 1-2 of 2 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.