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.

Previous Showing 11-12 of 12 results.

A164284 a(n) = 15*n-7.

Original entry on oeis.org

8, 23, 38, 53, 68, 83, 98, 113, 128, 143, 158, 173, 188, 203, 218, 233, 248, 263, 278, 293, 308, 323, 338, 353, 368, 383, 398, 413, 428, 443, 458, 473, 488, 503, 518, 533, 548, 563, 578, 593, 608, 623, 638, 653, 668, 683, 698, 713, 728, 743, 758, 773, 788
Offset: 1

Views

Author

Vincenzo Librandi, Aug 12 2009

Keywords

Comments

Alternative definition: numbers m such that (13*m+1)/15 is an integer.
The previous comment is the case t=0 of ((13-t*(t+1))*m + t*(t+1)/2 + 1)/15, where t = 0, 1, 2 or 3. - Bruno Berselli, Feb 22 2016

Crossrefs

Cf. similar sequences with closed form (2*k-1)*n+k listed in A269044.

Programs

Formula

G.f.: x*(8+7*x)/(x-1)^2.
E.g.f.: 7 + (15*x - 7)*exp(x). - G. C. Greubel, Sep 12 2017

Extensions

Definition simplified by R. J. Mathar, Aug 21 2009

A330613 Triangle read by rows: T(n, k) = 1 + k - 2*n - 2*k*n + 2*n^2, with 0 <= k < n.

Original entry on oeis.org

1, 5, 2, 13, 8, 3, 25, 18, 11, 4, 41, 32, 23, 14, 5, 61, 50, 39, 28, 17, 6, 85, 72, 59, 46, 33, 20, 7, 113, 98, 83, 68, 53, 38, 23, 8, 145, 128, 111, 94, 77, 60, 43, 26, 9, 181, 162, 143, 124, 105, 86, 67, 48, 29, 10, 221, 200, 179, 158, 137, 116, 95, 74, 53, 32, 11
Offset: 1

Views

Author

Stefano Spezia, Dec 20 2019

Keywords

Comments

T(n, k) is the k-th super- and subdiagonal sum of the matrix M(n) whose permanent is A330287(n).

Examples

			n\k|   0   1   2   3   4   5
---+------------------------
1  |   1
2  |   5   2
3  |  13   8   3
4  |  25  18  11   4
5  |  41  32  23  14   5
6  |  61  50  39  28  17   6
...
For n = 3 the matrix M is
      1, 2, 3
      2, 4, 6
      3, 6, 8
and therefore T(3, 0) = 1 + 4 + 8 = 13, T(3, 1) = 2 + 6 = 8 and T(3, 2) = 3.
		

Crossrefs

Cf. A000027: diagonal; A001105: 2nd column; A001844: 1st column; A016789: 1st subdiagonal; A016885: 2nd subdiagonal; A017029: 3rd subdiagonal; A017221: 4th subdiagonal; A017461: 5th subdiagonal; A081436: row sums; A132209: 3rd column; A164284: 7th subdiagonal; A269044: 6th subdiagonal.

Programs

  • Mathematica
    Flatten[Table[1+k-2n-2k*n+2n^2,{n,1,11},{k,0,n-1}]] (* or *)
    r[n_] := Table[SeriesCoefficient[(1-x*(2-5x+2(1+x)y))/((1-x)^3*(1-y)^2), {x, 0, i}, {y, 0, j}], {i, n, n}, {j, 0, n-1}]; Flatten[Array[r, 11]] (* or *)
    r[n_] := Table[SeriesCoefficient[Exp[x+y]*(1+2x(x-y)+y), {x, 0, i}, {y, 0, j}]*i!*j!, {i, n, n}, {j, 0, n-1}]; Flatten[Array[r, 11]]

Formula

O.g.f.: (1 - x*(2 - 5*x + 2*(1 + x)*y))/((1 - x)^3*(1 - y)^2).
E.g.f.: exp(x+y)*(1 + 2*x*(x - y) + y).
T(n, k) = A001844(n-1) - k*A005408(n-1), with 0 <= k < n. [Typo corrected by Stefano Spezia, Feb 14 2020]
Previous Showing 11-12 of 12 results.