A180035 -id:A180035 - cp's OEIS frontend

A180032 Eight white queens and one red queen on a 3 X 3 chessboard. G.f.: (1+x)/(1-5x-7x^2).

1, 6, 37, 227, 1394, 8559, 52553, 322678, 1981261, 12165051, 74694082, 458625767, 2815987409, 17290317414, 106163498933, 651849716563, 4002393075346, 24574913392671, 150891318490777, 926480986202582, 5688644160448349

Offset: 0

Johannes W. Meijer, Aug 09 2010

The a(n) represent the number of n-move routes of a fairy chess piece starting in a given corner or side square (m = 1, 3, 7, 9; 2, 4, 6, 8) on a 3 X 3 chessboard. This fairy chess piece behaves like a white chess queen on the eight side and corner squares but on the central square the queen explodes with fury and turns into a red queen.
On a 3 X 3 chessboard there are 2^9 = 512 ways to explode with fury on the central square (we assume here that a red queen might behave like a white queen). The red queen is represented by the A[5] vector in the fifth row of the adjacency matrix A, see the Maple program. For the corner and side squares the 512 red queens lead to 17 red queen sequences, see the cross-references for the complete set.
The sequence above corresponds to 8 red queen vectors, i.e., A[5] vectors, with decimal values 239, 367, 431, 463, 487, 491, 493 and 494. The central square leads for these vectors to A152240.
This sequence belongs to a family of sequences with g.f. (1+x)/(1 - 5*x - k*x^2). The members of this family that are red queen sequences are A180030 (k=8), A180032 (k=7; this sequence), A000400 (k=6), A180033 (k=5), A126501 (k=4), A180035 (k=3), A180037 (k=2) A015449 (k=1) and A003948 (k=0). Other members of this family are A030221 (k=-1), A109114 (k=-3), A020989 (k=-4), A166060 (k=-6).
Inverse binomial transform of A054413.

Vincenzo Librandi, Table of n, a(n) for n = 0..200
Wikipedia, Alice in Wonderland (2010 film)
Index entries for linear recurrences with constant coefficients, signature (5, 7).

Cf. A180028 (Central square).

Cf. Red queen sequences corner and side squares [decimal value A[5]]: A090018 [511], A135030 [255], A180030 [495], A005668 [127], A180032 [239], A000400 [63], A180033 [47], A001109 [31], A126501 [15], A154244 [23], A180035 [7], A138395 [19], A180037 [3], A084326 [17], A015449 [1], A003463 [16], A003948 [0].

I:=[1,6]; [n le 2 select I[n] else 5*Self(n-1)+7*Self(n-2): n in [1..30]]; // Vincenzo Librandi, Nov 15 2011

with(LinearAlgebra): nmax:=20; m:=1; A[5]:= [1,1,1,1,0,1,1,1,0]: A:=Matrix([[0,1,1,1,1,0,1,0,1], [1,0,1,1,1,1,0,1,0], [1,1,0,0,1,1,1,0,1], [1,1,0,0,1,1,1,1,0], A[5], [0,1,1,1,1,0,0,1,1], [1,0,1,1,1,0,0,1,1], [0,1,0,1,1,1,1,0,1], [1,0,1,0,1,1,1,1,0]]): for n from 0 to nmax do B(n):=A^n: a(n):= add(B(n)[m,k],k=1..9): od: seq(a(n), n=0..nmax);

LinearRecurrence[{5,7},{1,6},40] (* Vincenzo Librandi, Nov 15 2011 *)
CoefficientList[Series[(1+x)/(1-5x-7x^2),{x,0,30}],x] (* Harvey P. Dale, Apr 04 2024 *)

G.f.: (1+x)/(1 - 5*x - 7*x^2).
a(n) = 5*a(n-1) + 7*a(n-2) with a(0) = 1 and a(1) = 6.
a(n) = ((7+9*A)*A^(-n-1) + (7+9*B)*B^(-n-1))/53 with A = (-5+sqrt(53))/14 and B = (-5-sqrt(53))/14.

A180036 Eight white queens and one red queen on a 3 X 3 chessboard. G.f.: (1 - 2x)/(1 - 5x - 3*x^2).

Original entry on oeis.org

1, 3, 18, 99, 549, 3042, 16857, 93411, 517626, 2868363, 15894693, 88078554, 488076849, 2704619907, 14987330082, 83050510131, 460214540901, 2550224234898, 14131764797193, 78309496690659, 433942777844874

Offset: 0

Johannes W. Meijer, Aug 09 2010

The a(n) represent the number of n-move routes of a fairy chess piece starting in the central square (m = 5) on a 3 X 3 chessboard. This fairy chess piece behaves like a white queen on the eight side and corner squares but on the central square the queen explodes with fury and turns into a red queen, see A180028.

The sequence above corresponds to 56 red queen vectors, i.e., A[5] vector, with decimal values varying between 7 and 448. The corner and side squares lead for these vectors to A180035.

Vincenzo Librandi, Table of n, a(n) for n = 0..200
Index entries for linear recurrences with constant coefficients, signature (5, 3).

I:=[1,3]; [n le 2 select I[n] else 5*Self(n-1)+3*Self(n-2): n in [1..30]]; // Vincenzo Librandi, Nov 15 2011

with(LinearAlgebra): nmax:=21; m:=5; A[5]:= [0,0,0,0,0,0,1,1,1]: A:=Matrix([[0,1,1,1,1,0,1,0,1], [1,0,1,1,1,1,0,1,0], [1,1,0,0,1,1,1,0,1], [1,1,0,0,1,1,1,1,0], A[5], [0,1,1,1,1,0,0,1,1], [1,0,1,1,1,0,0,1,1], [0,1,0,1,1,1,1,0,1], [1,0,1,0,1,1,1,1,0]]): for n from 0 to nmax do B(n):=A^n: a(n):= add(B(n)[m,k],k=1..9): od: seq(a(n), n=0..nmax);

LinearRecurrence[{5,3},{1,3},201] (* Vincenzo Librandi, Nov 15 2011 *)

G.f.: (1-2*x)/(1 - 5*x - 3*x^2).
a(n) = 5*a(n-1) + 3*a(n-2) with a(0) = 1 and a(1) = 3.
a(n) = ((1+16*A)*A^(-n-1) + (1+16*B)*B^(-n-1))/37 with A = (-5+sqrt(37))/6 and B = (-5-sqrt(37))/6.
a(n) = Sum_{k=0..n} A202395(n,k)*2^k. - Philippe Deléham, Dec 21 2011

Second formula corrected by Vincenzo Librandi, Nov 15 2011

A116412 Riordan array ((1+x)/(1-2x),x(1+x)/(1-2x)).

Original entry on oeis.org

1, 3, 1, 6, 6, 1, 12, 21, 9, 1, 24, 60, 45, 12, 1, 48, 156, 171, 78, 15, 1, 96, 384, 558, 372, 120, 18, 1, 192, 912, 1656, 1473, 690, 171, 21, 1, 384, 2112, 4608, 5160, 3225, 1152, 231, 24, 1, 768, 4800, 12240, 16584, 13083, 6219, 1785, 300, 27, 1, 1536, 10752

Offset: 0

Paul Barry, Feb 13 2006

Row sums are A003688. Diagonal sums are A116413. Product of A007318 and A116413 is A116414. Product of A007318 and A105475.

Subtriangle of triangle given by (0, 3, -1, 0, 0, 0, 0, 0, 0, 0, ...) DELTA (1, 0, 0, 0, 0, 0, 0, 0, 0, 0, ...) where DELTA is the operator defined in A084938. - Philippe Deléham, Jan 18 2012

			Triangle begins
1,
3, 1,
6, 6, 1,
12, 21, 9, 1,
24, 60, 45, 12, 1,
48, 156, 171, 78, 15, 1
Triangle T(n,k), 0<=k<=n, given by (0, 3, -1, 0, 0, 0, ...) DELTA (1, 0, 0, 0, 0, ...) begins :
1
0, 1
0, 3, 1
0, 6, 6, 1
0, 12, 21, 9, 1
0, 24, 60, 45, 12, 1
0, 48, 156, 171, 78, 15, 1
... - _Philippe Deléham_, Jan 18 2012

Michael De Vlieger, Table of n, a(n) for n = 0..11475
Milan Janjić, Words and Linear Recurrences, J. Int. Seq. 21 (2018), #18.1.4.
Vladimir Kruchinin and D. V. Kruchinin, Composita and their properties, arXiv:1103.2582 [math.CO], 2011-2013.

Cf. A003688, A003945.

With[{n = 10}, DeleteCases[#, 0] & /@ CoefficientList[Series[(1 + x)/(1 - (y + 2) x - y x^2), {x, 0, n}, {y, 0, n}], {x, y}]] // Flatten (* Michael De Vlieger, Apr 25 2018 *)

Number triangle T(n,k)=sum{j=0..n, C(k+1,j)*C(n-j,k)2^(n-k-j)}
From Vladimir Kruchinin, Mar 17 2011: (Start)
T((m+1)*n+r-1, m*n+r-1) * r/(m*n+r) = sum(k=1..n, k/n * T((m+1)*n-k-1, m*n-1) * T(r+k-1,r-1)), n>=m>1.
T(n-1,m-1) = m/n * sum(k=1..n-m+1, k*A003945(k-1)*T(n-k-1,m-2)), n>=m>1. (End)
G.f.: (1+x)/(1-(y+2)*x -y*x^2). - Philippe Deléham, Jan 18 2012
Sum_{k, 0<=k<=n} T(n,k)*x^k = A104537(n), A110523(n), (-2)^floor(n/2), A057079(n), A003945(n), A003688(n+1), A123347(n), A180035(n) for x = -4, -3, -2, -1, 0, 1, 2, 3 respectively. - Philippe Deléham, Jan 18 2012
T(n,k) = 2*T(n-1,k) + T(n-1,k-1) + T(n-2,k-1), T(0,0) = 1, T(1,0) = 3, T(1,1) = 1, T(2,0) = T(2,1) = 6, T(2,2) = 1, T(n,k) = 0 if k>n or if k<0. - Philippe Deléham, Oct 31 2013

A202396 Triangle T(n,k), read by rows, given by (2, 1/2, 1/2, 0, 0, 0, 0, 0, 0, 0, ...) DELTA (2, -1/2, -1/2, 0, 0, 0, 0, 0, 0, 0, ...) where DELTA is the operator defined in A084938.

Original entry on oeis.org

1, 2, 2, 5, 8, 3, 13, 27, 19, 5, 34, 86, 86, 42, 8, 89, 265, 338, 234, 85, 13, 233, 798, 1227, 1084, 567, 166, 21, 610, 2362, 4230, 4510, 3038, 1286, 314, 34, 1597, 6898, 14058, 17474, 14284, 7814, 2774, 582, 55

Offset: 0

Philippe Deléham, Dec 18 2011

T(n,n) = Fibonacci(n+2) = A000045(n+2).

			Triangle begins :
1
2, 2
5, 8, 3
13, 27, 19, 5
34, 86, 86, 42, 8
89, 265, 338, 234, 85, 13

Cf. A000045, A001519, A122367, A000302 (row sums), A202395

T(n,k) = 3*T(n-1,k) + T(n-1,k-1) + T(n-2,k-2) - T(n-2,k) with T(0,0) = 1, T(1,0) = T(1,1) = 2 and T(n,k) = 0 if k<0 or if n

G.f.: (1+(y-1)*x)/(1-(3+y)*x+(1-y^2)*x^2).

Sum_{k, 0<=k<=n} T(n,k)*x^k = A000007(n), A122367(n), A000302(n), A180035(n) for x = -1, 0, 1, 2 respectively.

Sum_{k, 0<=k<=n} T(n,k)*3^k = 2^n * A055099(n). - Philippe Deléham, Feb 05 2012

Showing 1-4 of 4 results.

cp's OEIS Frontend

A180032 Eight white queens and one red queen on a 3 X 3 chessboard. G.f.: (1+x)/(1-5*x-7*x^2).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Maple

Mathematica

Formula

A180036 Eight white queens and one red queen on a 3 X 3 chessboard. G.f.: (1 - 2*x)/(1 - 5*x - 3*x^2).

Views

Author

Keywords

Comments

Links

Programs

Magma

Maple

Mathematica

Formula

Extensions

A116412 Riordan array ((1+x)/(1-2x),x(1+x)/(1-2x)).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A202396 Triangle T(n,k), read by rows, given by (2, 1/2, 1/2, 0, 0, 0, 0, 0, 0, 0, ...) DELTA (2, -1/2, -1/2, 0, 0, 0, 0, 0, 0, 0, ...) where DELTA is the operator defined in A084938.

Views

Author

Keywords

Comments

Examples

Crossrefs

Formula

A180032 Eight white queens and one red queen on a 3 X 3 chessboard. G.f.: (1+x)/(1-5x-7x^2).

A180036 Eight white queens and one red queen on a 3 X 3 chessboard. G.f.: (1 - 2x)/(1 - 5x - 3*x^2).