A259181 -id:A259181 - cp's OEIS frontend

A130713 a(0)=a(2)=1, a(1)=2, a(n)=0 for n > 2.

1, 2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

Offset: 0

Paul Curtz and Tanya Khovanova, Jul 01 2007

Self-convolution of A019590. Up to a sign the convolutional inverse of the natural numbers sequence. - Tanya Khovanova, Jul 14 2007

Iterated partial sums give the chain A130713 -> A113311 -> A008574 -> A001844 -> A005900 -> A006325 -> A033455 -> A259181, up to index. The k-th term of the n-th partial sums is (n^2-7n+14 + 4k(k+n-4))(k+n-4)!/(k-1)!/(n-1)!, for k > 3-n. Iterating partial sums in reverse (n-th differences with n zeros prepended) gives row (n+3) of A182533, modulo signs and trailing zeros. - Travis Scott, Feb 19 2023

Paul Barry, Centered polygon numbers, heptagons and nonagons, and the Robbins numbers, arXiv:2104.01644 [math.CO], 2021.
Dominika Závacká, Cristina Dalfó, and Miquel Angel Fiol, Integer sequences from k-iterated line digraphs, CEUR: Proc. 24th Conf. Info. Tech. - Appl. and Theory (ITAT 2024) Vol 3792, 156-161. See p. 161, Table 2.

A130713:=n->binomial(2*n, n^2); seq(A130713(n), n=0..100); # Wesley Ivan Hurt, Mar 08 2014

Table[Binomial[2 n, n^2], {n, 0, 100}] (* Wesley Ivan Hurt, Mar 08 2014 *)

G.f.: 1 + 2*x + x^2.

a(n) = binomial(2n, n^2). - Wesley Ivan Hurt, Mar 08 2014

A306548 Triangle T(n,k) read by rows, where the k-th column is the shifted self-convolution of the power function n^k, n >= 0, 0 <= k <= n.

Original entry on oeis.org

0, 0, 0, 1, 0, 0, 2, 1, 0, 0, 3, 4, 1, 0, 0, 4, 10, 8, 1, 0, 0, 5, 20, 34, 16, 1, 0, 0, 6, 35, 104, 118, 32, 1, 0, 0, 7, 56, 259, 560, 418, 64, 1, 0, 0, 8, 84, 560, 2003, 3104, 1510, 128, 1, 0, 0, 9, 120, 1092, 5888, 16003, 17600, 5554, 256, 1, 0, 0, 10, 165, 1968, 14988, 64064, 130835, 101504, 20758, 512, 1, 0, 0

Offset: 0

Kolosov Petro, Feb 23 2019

For n > 0 an odd-power identity n^(2m+1)+1, m >= 0 can be found using the current sequence. The sum of the n-th diagonal of T(n,k) over 0 <= k <= m multiplied by A(m,k) gives n^(2m+1)-1, where A(m,k) = A302971(m,k)/A304042(m,k). For example, consider the case n=4, m=2: the n-th diagonal of T(n, 0 <= k <= m) is {5, 10, 34}, and the m-th row of triangle A(m, 0 <= k <= m) is {1, 0, 30}, thus (3+1)^5 + 1 = 5*1 + 10*0 + 34*30 = 1025.

			==================================================================
k=    0     1     2     3      4      5     6    7    8    9    10
==================================================================
n=0:  2;
n=1:  2,    0;
n=2:  3,    0,    0;
n=3:  4,    1,    0,    0;
n=4:  5,    4,    1,    0,     0;
n=5:  6,   10,    8,    1,     0,     0;
n=6:  7,   20,   34,   16,     1,     0,    0;
n=7:  8,   35,  104,  118,    32,     1,    0,   0;
n=8:  9,   56,  259,  560,   418,    64,    1,   0,   0;
n=9:  10,  84,  560, 2003,  3104,  1510,  128,   1,   0,   0;
n=10: 11, 120, 1092, 5888, 16003, 17600, 5554, 256,   1,   0;   0;
...

D. V. Widder et al., The Convolution Transform, Bull. Amer. Math. Soc. 60 (1954), 444-456.
Wikipedia, Convolution.
Wikipedia, Convolution power.

Nonzero terms of columns k=0..5 give: A000027, A000292, A033455, A145216, A145217, A145218.
Partial sums of columns k=1..2 give: A000332, A259181.
Cf. A302971, A304042, A198633, A000079.

f[m_, s_] := Piecewise[{{s^m, s >= 0}, {0, True}}];
F[n_, m_] := Sum[f[m, n - k]*f[m, k], {k, -Infinity, +Infinity}];
T[n_, k_] := F[n - k, k];
Column[Table[T[n, k], {n, 0, 12}, {k, 0, n}], Left]

f(m, s) = s^m, if s >= 0;
f(m, s) = 0, otherwise.
F(n,m) = Sum_{k} f(m, n-k) * f(m, k), -oo < k < +oo;
T(n,k) = F(n-k, k).

Edited by Kolosov Petro, Mar 13 2019

A339356 Maximum number of copies of a 123456 permutation pattern in an alternating (or zig-zag) permutation of length n + 9.

Original entry on oeis.org

16, 32, 144, 256, 688, 1120, 2352, 3584, 6496, 9408, 15456, 21504, 32928, 44352, 64416, 84480, 117744, 151008, 203632, 256256, 336336, 416416, 534352, 652288, 821184, 990080, 1226176, 1462272, 1785408, 2108544, 2542656, 2976768, 3550416, 4124064, 4870992, 5617920, 6577648

Offset: 1

Lara Pudwell, Dec 01 2020

The maximum number of copies of 123 in an alternating permutation is motivated in the Notices reference, and the argument here is analogous.

			a(1) = 16. The alternating permutation of length 1+9=10 with the maximum number of copies of 123456 is 132547698(10). The sixteen copies are 12468(10), 12469(10), 12478(10), 12479(10), 12568(10), 12569(10), 12578(10), 12579(10), 13468(10), 13469(10), 13478(10), 13479(10), 13568(10), 13569(10), 13578(10), and 13579(10).

Lara Pudwell, From permutation patterns to the periodic table, Notices of the American Mathematical Society. 67.7 (2020), 994-1001.
Index entries for linear recurrences with constant coefficients, signature (2,4,-10,-5,20,0,-20,5,10,-4,-2,1).

Cf. A168380.

a(2n) = 32*A040977(n-1) = 64*C(n+5,6) - 32*C(n+4,5).
a(2n-1) = 16*A259181(n) = (2*n*(n + 1)*(n + 2)*(n + 3)*(2*n^2 + 6*n + 7))/45.
From Chai Wah Wu, Jul 06 2025: (Start)
a(n) = 2*a(n-1) + 4*a(n-2) - 10*a(n-3) - 5*a(n-4) + 20*a(n-5) - 20*a(n-7) + 5*a(n-8) + 10*a(n-9) - 4*a(n-10) - 2*a(n-11) + a(n-12) for n > 12.
G.f.: x*(-16*x^2 - 16)/((x - 1)^7*(x + 1)^5). (End)

cp's OEIS Frontend

A130713 a(0)=a(2)=1, a(1)=2, a(n)=0 for n > 2.

Views

Author

Keywords

Comments

Links

Programs

Maple

Mathematica

Formula

A306548 Triangle T(n,k) read by rows, where the k-th column is the shifted self-convolution of the power function n^k, n >= 0, 0 <= k <= n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A339356 Maximum number of copies of a 123456 permutation pattern in an alternating (or zig-zag) permutation of length n + 9.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Formula