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

A210981 A062725 and positive terms of A051682 interleaved.

Original entry on oeis.org

0, 1, 7, 11, 23, 30, 48, 58, 82, 95, 125, 141, 177, 196, 238, 260, 308, 333, 387, 415, 475, 506, 572, 606, 678, 715, 793, 833, 917, 960, 1050, 1096, 1192, 1241, 1343, 1395, 1503, 1558, 1672, 1730, 1850, 1911, 2037, 2101, 2233, 2300, 2438, 2508, 2652, 2725, 2875, 2951, 3107, 3186, 3348
Offset: 0

Views

Author

Omar E. Pol, Aug 03 2012

Keywords

Comments

Vertex number of a square spiral similar to A195160.

Crossrefs

Members of this family are A093005, A210977, A006578, A210978, A181995, this sequence, A210982.

Programs

  • Mathematica
    LinearRecurrence[{1,2,-2,-1,1},{0,1,7,11,23},70] (* Harvey P. Dale, Jun 29 2023 *)

Formula

G.f.: -x*(1+6*x+2*x^2) / ( (1+x)^2*(x-1)^3 ). - R. J. Mathar, Aug 07 2012
a(n) = ( 18*n^2+14*n-5+(6*n+5)*(-1)^n )/16. - Luce ETIENNE, Oct 14 2014

A081266 Staggered diagonal of triangular spiral in A051682.

Original entry on oeis.org

0, 6, 21, 45, 78, 120, 171, 231, 300, 378, 465, 561, 666, 780, 903, 1035, 1176, 1326, 1485, 1653, 1830, 2016, 2211, 2415, 2628, 2850, 3081, 3321, 3570, 3828, 4095, 4371, 4656, 4950, 5253, 5565, 5886, 6216, 6555, 6903, 7260, 7626, 8001, 8385, 8778, 9180
Offset: 0

Views

Author

Paul Barry, Mar 15 2003

Keywords

Comments

Staggered diagonal of triangular spiral in A051682, between (0,4,17) spoke and (0,7,23) spoke.
Binomial transform of (0, 6, 9, 0, 0, 0, ...).
If Y is a fixed 3-subset of a (3n+1)-set X then a(n) is the number of (3n-1)-subsets of X intersecting Y. - Milan Janjic, Oct 28 2007
Partial sums give A085788. - Leo Tavares, Nov 23 2023

Examples

			a(1)=9*1+0-3=6, a(2)=9*2+6-3=21, a(3)=9*3+21-3=45.
For n=3, a(3) = -0^2+1^2-2^2+3^2-4^2+5^2-6^2+7^2-8^2+9^2 = 45.
		

Crossrefs

Programs

Formula

a(n) = 6*C(n,1) + 9*C(n,2).
a(n) = 3*n*(3*n+1)/2.
G.f.: (6*x+3*x^2)/(1-x)^3.
a(n) = A000217(3*n); a(2*n) = A144314(n). - Reinhard Zumkeller, Sep 17 2008
a(n) = 3*A005449(n). - R. J. Mathar, Mar 27 2009
a(n) = 9*n+a(n-1)-3 for n>0, a(0)=0. - Vincenzo Librandi, Aug 08 2010
a(n) = A218470(9n+5). - Philippe Deléham, Mar 27 2013
a(n) = Sum_{k=0..3n} (-1)^(n+k)*k^2. - Bruno Berselli, Aug 29 2013
E.g.f.: 3*exp(x)*x*(4 + 3*x)/2. - Stefano Spezia, Jun 06 2021
From Amiram Eldar, Aug 11 2022: (Start)
Sum_{n>=1} 1/a(n) = 2 - Pi/(3*sqrt(3)) - log(3).
Sum_{n>=1} (-1)^(n+1)/a(n) = 2*Pi/(3*sqrt(3)) + 4*log(2)/3 - 2. (End)
From Leo Tavares, Nov 23 2023: (Start)
a(n) = 3*A000217(n) + 3*A000290(n).
a(n) = A003154(n+1) - A133694(n+1). (End)

A218470 Partial sums of floor(n/9).

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 30, 33, 36, 39, 42, 45, 48, 51, 54, 58, 62, 66, 70, 74, 78, 82, 86, 90, 95, 100, 105, 110, 115, 120, 125, 130, 135, 141, 147, 153, 159, 165, 171, 177, 183, 189, 196, 203, 210, 217, 224
Offset: 0

Views

Author

Philippe Deléham, Mar 26 2013

Keywords

Comments

Apart from the initial zeros, the same as A008727.

Examples

			As square array:
..0....0....0....0....0....0....0....0....0....
..1....2....3....4....5....6....7....8....9....
.11...13...15...17...19...21...23...25...27....
.30...33...36...39...42...45...48...51...54....
.58...62...66...70...74...78...82...86...90....
.95..100..105..110..115..120..125..130..135....
141..147..153..159..165..171..177..183..189....
196..203..210..217..224..231..238..245..252....
...
		

Crossrefs

Cf. similar sequences: A118729, A174109, A174738.

Programs

Formula

a(9n) = A051682(n).
a(9n+1) = A062708(n).
a(9n+2) = A062741(n).
a(9n+3) = A022266(n).
a(9n+4) = A022267(n).
a(9n+5) = A081266(n).
a(9n+6) = A062725(n).
a(9n+7) = A062728(n).
a(9n+8) = A027468(n).
G.f.: x^9/((1-x)^2*(1-x^9)). - Bruno Berselli, Mar 27 2013

A245300 Triangle T(n,k) = (n+k)*(n+k+1)/2 + k, 0 <= k <= n, read by rows.

Original entry on oeis.org

0, 1, 4, 3, 7, 12, 6, 11, 17, 24, 10, 16, 23, 31, 40, 15, 22, 30, 39, 49, 60, 21, 29, 38, 48, 59, 71, 84, 28, 37, 47, 58, 70, 83, 97, 112, 36, 46, 57, 69, 82, 96, 111, 127, 144, 45, 56, 68, 81, 95, 110, 126, 143, 161, 180, 55, 67, 80, 94, 109, 125, 142, 160, 179, 199, 220
Offset: 0

Views

Author

Reinhard Zumkeller, Jul 17 2014

Keywords

Examples

			First rows and their row sums (A245301):
   0                                                                  0;
   1,  4                                                              5;
   3,  7,  12                                                        22;
   6, 11,  17,  24                                                   58;
  10, 16,  23,  31,  40                                             120;
  15, 22,  30,  39,  49,  60                                        215;
  21, 29,  38,  48,  59,  71,  84                                   350;
  28, 37,  47,  58,  70,  83,  97, 112                              532;
  36, 46,  57,  69,  82,  96, 111, 127, 144                         768;
  45, 56,  68,  81,  95, 110, 126, 143, 161, 180                   1065;
  55, 67,  80,  94, 109, 125, 142, 160, 179, 199, 220              1430;
  66, 79,  93, 108, 124, 141, 159, 178, 198, 219, 241, 264         1870;
  78, 92, 107, 123, 140, 158, 177, 197, 218, 240, 263, 287, 312    2392.
		

Crossrefs

Programs

  • Haskell
    a245300 n k = (n + k) * (n + k + 1) `div` 2 + k
    a245300_row n = map (a245300 n) [0..n]
    a245300_tabl = map a245300_row [0..]
    a245300_list = concat a245300_tabl
    
  • Magma
    [k + Binomial(n+k+1,2): k in [0..n], n in [0..15]]; // G. C. Greubel, Apr 01 2021
    
  • Mathematica
    Table[k + Binomial[n+k+1,2], {n,0,15}, {k,0,n}]//Flatten (* G. C. Greubel, Apr 01 2021 *)
  • Sage
    flatten([[k + binomial(n+k+1,2) for k in (0..n)] for n in (0..15)]) # G. C. Greubel, Apr 01 2021

Formula

T(n, 0) = A000217(n).
T(n, n) = A046092(n).
T(2*n, n) = A062725(n) (central terms).
Sum_{k=0..n} T(n, k) = A245301(n).
From G. C. Greubel, Apr 01 2021: (Start)
T(n, 1) = A000124(n+1) = A134869(n+1), n >= 1.
T(n, 2) = A152948(n+4), n >= 2.
T(n, 3) = A152950(n+4), n >= 3.
T(n, 4) = A145018(n+5), n >= 4.
T(n, 5) = A167499(n+4), n >= 5.
T(n, 6) = A166136(n+5), n >= 6.
T(n, 7) = A167487(n+6), n >= 7.
T(n, n-1) = A056220(n), n >= 1.
T(n, n-2) = A142463(n-1), n >= 2.
T(n, n-3) = A054000(n-1), n >= 3.
T(n, n-4) = A090288(n-3), n >= 4.
T(n, n-5) = A268581(n-4), n >= 5.
T(n, n-6) = A059993(n-4), n >= 6.
T(n, n-7) = (-1)*A147973(n), n >= 7.
T(n, n-8) = A139570(n-5), n >= 8.
T(n, n-9) = A271625(n-5), n >= 9.
T(n, n-10) = A222182(n-4), n >= 10.
T(2*n, n-1) = A081270(n-1), n >= 1.
T(2*n, n+1) = A117625(n+1), n >= 1. (End)

A198392 a(n) = (6*n*(3*n+7)+(2*n+13)*(-1)^n+3)/16 + 1.

Original entry on oeis.org

2, 4, 12, 18, 31, 41, 59, 73, 96, 114, 142, 164, 197, 223, 261, 291, 334, 368, 416, 454, 507, 549, 607, 653, 716, 766, 834, 888, 961, 1019, 1097, 1159, 1242, 1308, 1396, 1466, 1559, 1633, 1731, 1809, 1912, 1994, 2102, 2188, 2301, 2391, 2509, 2603, 2726, 2824, 2952
Offset: 0

Views

Author

Bruno Berselli, Oct 25 2011

Keywords

Comments

For an origin of this sequence, see the triangular spiral illustrated in the Links section.
First bisection gives A117625 (without the initial term).

Crossrefs

Cf. A152832 (by Superseeker).
Cf. sequences related to the triangular spiral: A022266, A022267, A027468, A038764, A045946, A051682, A062708, A062725, A062728, A062741, A064225, A064226, A081266-A081268, A081270-A081272, A081275 [incomplete list].

Programs

  • Magma
    [(6*n*(3*n+7)+(2*n+13)*(-1)^n+3)/16+1: n in [0..50]];
  • Mathematica
    LinearRecurrence[{1,2,-2,-1,1},{2,4,12,18,31},60] (* Harvey P. Dale, Jun 15 2022 *)
  • PARI
    for(n=0, 50, print1((6*n*(3*n+7)+(2*n+13)*(-1)^n+3)/16+1", "));
    

Formula

G.f.: (2+2*x+4*x^2+2*x^3-x^4)/((1+x)^2*(1-x)^3).
a(n) = a(n-1)+2*a(n-2)-2*a(n-3)-a(n-4)+a(n-5).
a(n)-a(-n-1) = A168329(n+1).
a(n)+a(n-1) = A102214(n).
a(2n)-a(2n-1) = A016885(n).
a(2n+1)-a(2n) = A016825(n).

A206306 Riordan array (1, x/(1-3*x+2*x^2)).

Original entry on oeis.org

1, 0, 1, 0, 3, 1, 0, 7, 6, 1, 0, 15, 23, 9, 1, 0, 31, 72, 48, 12, 1, 0, 63, 201, 198, 82, 15, 1, 0, 127, 522, 699, 420, 125, 18, 1, 0, 255, 1291, 2223, 1795, 765, 177, 21, 1, 0, 511, 3084, 6562, 6768, 3840, 1260, 238, 24, 1
Offset: 0

Views

Author

Philippe Deléham, Feb 06 2012

Keywords

Comments

The convolution triangle of the Mersenne numbers A000225. - Peter Luschny, Oct 09 2022

Examples

			Triangle begins:
  1;
  0,    1;
  0,    3,    1;
  0,    7,    6,     1;
  0,   15,   23,     9,     1;
  0,   31,   72,    48,    12,     1;
  0,   63,  201,   198,    82,    15,    1;
  0,  127,  522,   699,   420,   125,   18,    1;
  0,  255, 1291,  2223,  1795,   765,  177,   21,   1;
  0,  511, 3084,  6562,  6768,  3840, 1260,  238,  24,  1;
  0, 1023, 7181, 18324, 23276, 16758, 7266, 1932, 308, 27,  1;
		

Crossrefs

Programs

  • Magma
    function T(n,k) // T = A206306
      if k lt 0 or k gt n then return 0;
      elif k eq n then return 1;
      elif k eq 0 then return 0;
      else return 3*T(n-1, k) +T(n-1, k-1) -2*T(n-2, k);
      end if; return T;
    end function;
    [T(n,k): k in [0..n], n in [0..12]]; // G. C. Greubel, Dec 20 2022
    
  • Maple
    # Uses function PMatrix from A357368.
    PMatrix(10, n -> 2^n - 1); # Peter Luschny, Oct 09 2022
  • Mathematica
    T[n_, k_]:= T[n, k]= If[k<0 || k>n, 0, If[k==n, 1, If[k==0, 0, 3*T[n- 1, k] +T[n-1, k-1] -2*T[n-2, k]]]];
    Table[T[n, k], {n,0,12}, {k,0,n}]//Flatten (* G. C. Greubel, Dec 20 2022 *)
  • SageMath
    def T(n,k): # T = A206306
        if (k<0 or k>n): return 0
        elif (k==n): return 1
        elif (k==0): return 0
        else: return 3*T(n-1, k) +T(n-1, k-1) -2*T(n-2, k)
    flatten([[T(n,k) for k in range(n+1)] for n in range(13)]) # G. C. Greubel, Dec 20 2022

Formula

Triangle T(n,k), read by rows, given by (0, 3, -2/3, 2/3, 0, 0, 0, 0, 0, 0, 0, ...) DELTA (1, 0, 0, 0, 0, 0, 0, 0, ...) where DELTA is the operator defined in A084938.
Diagonals sums are even-indexed Fibonacci numbers.
Sum_{k=0..n} T(n,k)*x^k = A000007(n), A204089(n), A204091(n) for x = 0, 1, 2 respectively.
G.f.: (1-3*x+2*x^)/(1-(3+y)*x+2*x^2).
From Philippe Deléham, Nov 17 2013; corrected Feb 13 2020: (Start)
T(n, n) = 1.
T(n+1, n) = 3n = A008585(n).
T(n+2, n) = A062725(n).
T(n,k) = 3*T(n-1,k)+T(n-1,k-1)-2*T(n-2,k), T(0,0)=T(1,1)=T(2,2)=1, T(1,0)=T(2,0)=0, T(2,1)=3, T(n,k)=0 if k<0 or if k>n. (End)
From G. C. Greubel, Dec 20 2022: (Start)
Sum_{k=0..n} (-1)^k*T(n,k) = [n=1] - A009545(n).
Sum_{k=0..n} (-2)^k*T(n,k) = [n=1] + A078020(n+1).
T(2*n, n+1) = A045741(n+2), n >= 0.
T(2*n+1, n+1) = A244038(n). (End)
Showing 1-6 of 6 results.