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-4 of 4 results.

A215449 Duplicate of A259967.

Original entry on oeis.org

5, 10, 17, 29, 51, 90
Offset: 3

Views

Author

Jonathan Vos Post, Aug 10 2012

Keywords

A259968 a(n) = a(n-1) + a(n-2) + a(n-4), with a(1)=1, a(2)=1, a(3)=3, a(4)=6.

Original entry on oeis.org

1, 1, 3, 6, 10, 17, 30, 53, 93, 163, 286, 502, 881, 1546, 2713, 4761, 8355, 14662, 25730, 45153, 79238, 139053, 244021, 428227, 751486, 1318766, 2314273, 4061266, 7127025, 12507057, 21948355, 38516678, 67592058, 118615793, 208156206, 365288677, 641036941
Offset: 1

Views

Author

N. J. A. Sloane, Jul 11 2015

Keywords

References

  • R. K. Guy, Letter to N. J. A. Sloane, Feb 05 1986.

Crossrefs

Programs

  • Haskell
    a259968 n = a259968_list !! n
    a259968_list = 1 : 1 : 3 : 6 : zipWith3 (((+) .) . (+))
       a259968_list (drop 2 a259968_list) (drop 3 a259968_list)
    -- Reinhard Zumkeller, Jul 12 2015
  • Magma
    I:=[1,1,3,6]; [n le 4 select I[n] else Self(n-1)+Self(n-2)+Self(n-4): n in [1..40]]; // Vincenzo Librandi, Jul 12 2015
    
  • Mathematica
    LinearRecurrence[{1, 1, 0, 1}, {1, 1, 3, 6}, 40] (* Vincenzo Librandi, Jul 12 2015 *)
    nxt[{a_,b_,c_,d_}]:={b,c,d,a+c+d}; NestList[nxt,{1,1,3,6},40][[;;,1]] (* Harvey P. Dale, Jan 28 2025 *)
  • PARI
    Vec(-x*(2*x^2-x+1)/(x^3-x^2+2*x-1) + O(x^50)) \\ Colin Barker, Jul 12 2015
    

Formula

G.f.: -x*(2*x^2-x+1) / (x^3-x^2+2*x-1). - Colin Barker, Jul 12 2015

Extensions

a(28)-a(37) from Hiroaki Yamanouchi, Jul 12 2015

A259969 a(n) = n*A259968(n).

Original entry on oeis.org

0, 1, 2, 9, 24, 50, 102, 210, 424, 837, 1630, 3146, 6024, 11453, 21644, 40695, 76176, 142035, 263916, 488870, 903060, 1663998, 3059166, 5612483, 10277448, 18787150, 34287916, 62485371, 113715448, 206683725, 375211710, 680399005, 1232533696, 2230537914
Offset: 0

Views

Author

N. J. A. Sloane, Jul 11 2015

Keywords

References

  • R. K. Guy, Letter to N. J. A. Sloane, Feb 05 1986.

Crossrefs

Programs

  • Haskell
    a259967 n = a259967_list !! n
    a259967_list = 3 : 2 : 2 : 5 : zipWith3 (((+) .) . (+))
       a259967_list (drop 2 a259967_list) (drop 3 a259967_list)
    -- Reinhard Zumkeller, Jul 12 2015
  • PARI
    concat(0, Vec(x*(x^4-6*x^3+7*x^2-2*x+1)/(x^3-x^2+2*x-1)^2 + O(x^40))) \\ Colin Barker, Jul 12 2015
    

Formula

G.f.: x*(x^4-6*x^3+7*x^2-2*x+1) / (x^3-x^2+2*x-1)^2. - Colin Barker, Jul 12 2015

Extensions

a(28)-a(33) from Hiroaki Yamanouchi, Jul 12 2015

A306735 Square array A(n,k), n >= 0, k >= 0, read by antidiagonals, where column k is the expansion of g.f. ((k+1-x)*(1-x)^(k-1))/((1-x)^k-x^(k+1)).

Original entry on oeis.org

1, 2, 1, 3, 1, 1, 4, 2, 3, 1, 5, 3, 2, 4, 1, 6, 4, 3, 5, 7, 1, 7, 5, 4, 3, 10, 11, 1, 8, 6, 5, 4, 7, 17, 18, 1, 9, 7, 6, 5, 4, 18, 29, 29, 1, 10, 8, 7, 6, 5, 9, 39, 51, 47, 1, 11, 9, 8, 7, 6, 5, 28, 73, 90, 76, 1, 12, 10, 9, 8, 7, 6, 11, 74, 127, 158, 123, 1, 13, 11, 10, 9, 8, 7, 6, 40, 164, 219, 277, 199, 1
Offset: 0

Views

Author

Seiichi Manyama, Mar 06 2019

Keywords

Examples

			Square array begins:
   1,  2,  3,   4,   5,   6,  7,  8, 9, ...
   1,  1,  2,   3,   4,   5,  6,  7, 8, ...
   1,  3,  2,   3,   4,   5,  6,  7, 8, ...
   1,  4,  5,   3,   4,   5,  6,  7, 8, ...
   1,  7, 10,   7,   4,   5,  6,  7, 8, ...
   1, 11, 17,  18,   9,   5,  6,  7, 8, ...
   1, 18, 29,  39,  28,  11,  6,  7, 8, ...
   1, 29, 51,  73,  74,  40, 13,  7, 8, ...
   1, 47, 90, 127, 164, 125, 54, 15, 8, ...
		

Crossrefs

Columns 0-2 give A000012, A000032, A259967.

Formula

A(n,k) = A306646(k*n,k) for k > 0.
A(n,k) = (k+1)*A306680(n,k) - A306680(n-1,k) for n > 0.
Showing 1-4 of 4 results.