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

A005053 Expand (1-2*x)/(1-5*x).

Original entry on oeis.org

1, 3, 15, 75, 375, 1875, 9375, 46875, 234375, 1171875, 5859375, 29296875, 146484375, 732421875, 3662109375, 18310546875, 91552734375, 457763671875, 2288818359375, 11444091796875, 57220458984375
Offset: 0

Views

Author

Keywords

Comments

a(n) is the number of generalized compositions of n when there are 3*2^(i-1) different types of i, (i=1,2,...). - Milan Janjic, Sep 24 2010
INVERTi transform of A180034: (1, 4, 22, 124, 700, ...). - Gary W. Adamson, Aug 10 2016

Crossrefs

Cf. A180034.

Programs

  • Magma
    [ n eq 0 select 1 else 3*5^(n-1): n in [0..20] ]; // Klaus Brockhaus, Apr 04 2010
    
  • Mathematica
    CoefficientList[Series[(1-2x)/(1-5x),{x,0,30}],x] (* or *) Join[{1}, NestList[5#&,3,29]]  (* Harvey P. Dale, Apr 25 2011 *)
  • PARI
    x='x+O('x^50); Vec((1-2*x)/(1-5*x)) \\ G. C. Greubel, Sep 15 2017

Formula

Binomial transform of A122117. - Philippe Deléham, Oct 19 2006
a(0) = 1, a(n) = 3*5^(n-1) for n >= 1. - Philippe Deléham, Oct 19 2006
E.g.f.: (2 + 3*exp(5*x))/5. - Ilya Gutkovskiy, Aug 11 2016

Extensions

Wrong formula deleted by Klaus Brockhaus, Apr 04 2010

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

Original entry on oeis.org

1, 9, 57, 369, 2385, 15417, 99657, 644193, 4164129, 26917353, 173996505, 1124731089, 7270376049, 46996449561, 303789825513, 1963728301761, 12693739287105, 82053620627913, 530402941628793, 3428578511656497
Offset: 0

Views

Author

Johannes W. Meijer, Aug 09 2010; edited Jun 21 2013

Keywords

Comments

The a(n) represent the number of n-move routes of a fairy chess piece starting in the center 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.
On a 3 X 3 chessboard there are 2^9 = 512 ways to explode with fury on the center square (off the center square the piece behaves like a normal queen). The red queen is represented by the A[5] vector in the fifth row of the adjacency matrix A, see the Maple program and A180140. For the center square the 512 red queens lead to 17 red queen sequences, see the overview of red queen sequences and the crossreferences.
The sequence above corresponds to just one red queen vector, i.e., A[5] = [111 111 111] vector. The other squares lead for this vector to A090018.
This sequence belongs to a family of sequences with g.f. (1+k*x)/(1 - 6*x - k*x^2). The members of this family that are red queen sequences are A180028 (k=3; this sequence), A180029 (k=2), A015451 (k=1), A000400 (k=0), A001653 (k=-1), A180034 (k=-2), A084120 (k=-3), A154626 (k=-4) and A000012 (k=-5). Other members of this family are A123362 (k=5), 6*A030192(k=-6).
Inverse binomial transform of A107903.

References

  • Gary Chartrand, Introductory Graph Theory, pp. 217-221, 1984.

Crossrefs

Cf. A180140 (berserker sequences)
Cf. A180032 (Corner and side squares).
Cf. Red queen sequences center square [decimal value A[5]]: A180028 [511], A180029 [255], A180031 [495], A015451 [127], A152240 [239], A000400 [63], A057088 [47], A001653 [31], A122690 [15], A180034 [23], A180036 [7], A084120 [19], A180038 [3], A154626 [17], A015449 [1], A000012 [16], A000007 [0].

Programs

  • Magma
    I:=[1,9]; [n le 2 select I[n] else 6*Self(n-1)+3*Self(n-2): n in [1..20]]; // Vincenzo Librandi, Nov 15 2011
  • Maple
    nmax:=19; m:=5; A[1]:=[0,1,1,1,1,0,1,0,1]: A[2]:=[1,0,1,1,1,1,0,1,0]: A[3]:=[1,1,0,0,1,1,1,0,1]: A[4]:=[1,1,0,0,1,1,1,1,0]: A[5]:=[1,1,1,1,1,1,1,1,1]: A[6]:=[0,1,1,1,1,0,0,1,1]: A[7]:=[1,0,1,1,1,0,0,1,1]: A[8]:=[0,1,0,1,1,1,1,0,1]: A[9]:=[1,0,1,0,1,1,1,1,0]: A:=Matrix([A[1], A[2], A[3], A[4], A[5], A[6], A[7], A[8], A[9]]): 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);
  • Mathematica
    LinearRecurrence[{6,3},{1,9},50] (* Vincenzo Librandi, Nov 15 2011 *)

Formula

G.f.: (1+3*x)/(1 - 6*x - 3*x^2).
a(n) = 6*a(n-1) + 3*a(n-2) with a(0) = 1 and a(1) = 9.
a(n) = ((1-A)*A^(-n-1) + (1-B)*B^(-n-1))/4 with A=(-1+2*sqrt(3)/3) and B=(-1-2*sqrt(3)/3).
Lim_{k->infinity} a(n+k)/a(k) = (-1)^(n-1)*A108411(n+1)/(A041017(n-1)*sqrt(12) - A041016(n-1)) for n >= 1.

A154626 a(n) = 2^n*A001519(n).

Original entry on oeis.org

1, 2, 8, 40, 208, 1088, 5696, 29824, 156160, 817664, 4281344, 22417408, 117379072, 614604800, 3218112512, 16850255872, 88229085184, 461973487616, 2418924584960, 12665653559296, 66318223015936, 347246723858432, 1818207451086848, 9520257811087360
Offset: 0

Views

Author

Paul Barry, Jan 13 2009

Keywords

Comments

Hankel transform of 1,1,3,11,45,... (see A026375). Binomial transform of A015448.
From Gary W. Adamson, Jul 22 2016: (Start)
A production matrix for the sequence is M =
1, 1, 0, 0, 0, ...
1, 0, 5, 0, 0, ...
1, 0, 0, 5, 0, ...
1, 0, 0, 0, 5, ...
...
Take powers of M, extracting the upper left terms; getting
the sequence starting (1, 1, 2, 8, 40, 208, ...). (End)
The sequence is N=5 in an infinite set of INVERT transforms of powers of N prefaced with a "1". (1, 2, 8, 40, ...) is the INVERT transform of (1, 1, 5, 25, 125, ...). The first six of such sequences are shown in A006012 (N=3). - Gary W. Adamson, Jul 24 2016
From Gary W. Adamson, Jul 27 2016: (Start)
The sequence is the first in an infinite set in which we perform the operation for matrix M (Cf. Jul 22 2016), but change the left border successively from (1, 1, 1, 1, ...) then to (1, 2, 2, 2, ...), then (1, 3, 3, 3, ...) ...; generally (1, N, N, N, ...). Extracting the upper left terms of each matrix operation, we obtain the infinite set beginning:
N=1 (A154626): 1, 2, 8, 40, 208, 1088, ...
N=2 (A084120): 1, 3, 15, 81, 441, 1403, ...
N=3 (A180034): 1, 4, 22, 124, 700, 3952, ...
N=4 (A001653): 1, 5, 29, 169, 985, 5741, ...
N=5 (A000400): 1, 6, 36, 216, 1296, 7776, ...
N=6 (A015451): 1, 7, 43, 265, 1633, 10063, ...
N=7 (A180029): 1, 8, 50, 316, 1996, 12608, ...
N=8 (A180028): 1, 9, 57, 369, 1285, 15417, ...
N=9 (.......): 1, 10, 64, 424, 2800, 18496, ...
N=10 (A123361): 1, 11, 71, 481, 3241, 21851, ...
N=11 (.......): 1, 12, 78, 540, 3708, 25488, ...
... Each of the sequences begins (1, (N+1), (7*N + 1),
(40*N + (N-1)^2), ... (End)
The set of infinite sequences shown (Cf. comment of Jul 27 2016), can be generated from the matrices P = [(1,N; 1,5]^n, (N=1,2,3,...) by extracting the upper left terms. Example: N=6 sequence (A015451): (1, 7, 43, 265, ...) can be generated from the matrix P = [(1,6); (1,5)]^n. - Gary W. Adamson, Jul 28 2016

Crossrefs

Programs

  • Magma
    [n le 2 select (n) else 6*Self(n-1)-4*Self(n-2): n in [1..25]]; // Vincenzo Librandi, May 15 2015
    
  • Mathematica
    LinearRecurrence[{6, -4}, {1, 2}, 30] (* Vincenzo Librandi, May 15 2015 *)
  • PARI
    Vec((1-4*x) / (1-6*x+4*x^2) + O(x^30)) \\ Colin Barker, Sep 22 2017

Formula

G.f.: (1 - 4*x) / (1 - 6*x + 4*x^2).
a(n) = A084326(n+1) - 4*A084326(n). - R. J. Mathar, Jul 19 2012
From Colin Barker, Sep 22 2017: (Start)
a(n) = (((3-sqrt(5))^n*(1+sqrt(5)) + (-1+sqrt(5))*(3+sqrt(5))^n)) / (2*sqrt(5)).
a(n) = 6*a(n-1) - 4*a(n-2) for n>1. (End)
E.g.f.: exp(3*x)*(5*cosh(sqrt(5)*x) - sqrt(5)*sinh(sqrt(5)*x))/5. - Stefano Spezia, Aug 26 2025
Showing 1-3 of 3 results.