A099097 -id:A099097 - cp's OEIS frontend

A027465 Cube of lower triangular normalized binomial matrix.

1, 3, 1, 9, 6, 1, 27, 27, 9, 1, 81, 108, 54, 12, 1, 243, 405, 270, 90, 15, 1, 729, 1458, 1215, 540, 135, 18, 1, 2187, 5103, 5103, 2835, 945, 189, 21, 1, 6561, 17496, 20412, 13608, 5670, 1512, 252, 24, 1, 19683, 59049, 78732, 61236, 30618, 10206, 2268

Offset: 0

Olivier Gérard, N. J. A. Sloane

Rows of A013610 reversed. - Michael Somos, Feb 14 2002
Row sums are powers of 4 (A000302), antidiagonal sums are A006190 (a(n) = 3*a(n-1) + a(n-2)). - Gerald McGarvey, May 17 2005
Triangle of coefficients in expansion of (3+x)^n.
Also: Pure Galton board of scheme (3,1). Also: Multiplicity (number) of pairs of n-dimensional binary vectors with dot product (overlap) k. There are 2^n = A000079(n) binary vectors of length n and 2^(2n) = 4^n = A000302(n) different pairs to form dot products k = Sum_{i=1..n} v[i]*u[i] between these, 0 <= k <= n. (Since dot products are symmetric, there are only 2^n*(2^n-1)/2 different non-ordered pairs, actually.) - R. J. Mathar, Mar 17 2006
Mirror image of A013610. - Zerinvary Lajos, Nov 25 2007
T(i,j) is the number of i-permutations of 4 objects a,b,c,d, with repetition allowed, containing j a's. - Zerinvary Lajos, Dec 21 2007
The antidiagonals of the sequence formatted as a square array (see Examples section) and summed with alternating signs gives a bisection of Fibonacci sequence, A001906. Example: 81-(27-1)=55. Similar rule applied to rows gives A000079. - Mark Dols, Sep 01 2009
Triangle T(n,k), read by rows, given by (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. - Philippe Deléham, Oct 09 2011
T(n,k) = binomial(n,k)*3^(n-k), the number of subsets of [2n] with exactly k symmetric pairs, where elements i and j of [2n] form a symmetric pair if i+j=2n+1. Equivalently, if n couples attend a (ticketed) event that offers door prizes, then the number of possible prize distributions that have exactly k couples as dual winners is T(n,k). - Dennis P. Walsh, Feb 02 2012
T(n,k) is the number of ordered pairs (A,B) of subsets of {1,2,...,n} such that the intersection of A and B contains exactly k elements. For example, T(2,1) = 6 because we have ({1},{1}); ({1},{1,2}); ({2},{2}); ({2},{1,2}); ({1,2},{1}); ({1,2},{2}). Sum_{k=0..n} T(n,k)*k = A002697(n) (see comment there by Ross La Haye). - Geoffrey Critzer, Sep 04 2013
Also the convolution triangle of A000244. - Peter Luschny, Oct 09 2022

			Example: n = 3 offers 2^3 = 8 different binary vectors (0,0,0), (0,0,1), ..., (1,1,0), (1,1,1). a(3,2) = 9 of the 2^4 = 64 pairs have overlap k = 2: (0,1,1)*(0,1,1) = (1,0,1)*(1,0,1) = (1,1,0)*(1,1,0) = (1,1,1)*(1,1,0) = (1,1,1)*(1,0,1) = (1,1,1)*(0,1,1) = (0,1,1)*(1,1,1) = (1,0,1)*(1,1,1) = (1,1,0)*(1,1,1) = 2.
For example, T(2,1)=6 since there are 6 subsets of {1,2,3,4} that have exactly 1 symmetric pair, namely, {1,4}, {2,3}, {1,2,3}, {1,2,4}, {1,3,4}, and {2,3,4}.
The present sequence formatted as a triangular array:
     1
     3     1
     9     6     1
    27    27     9     1
    81   108    54    12    1
   243   405   270    90   15    1
   729  1458  1215   540  135   18   1
  2187  5103  5103  2835  945  189  21  1
  6561 17496 20412 13608 5670 1512 252 24 1
  ...
A013610 formatted as a triangular array:
  1
  1  3
  1  6   9
  1  9  27   27
  1 12  54  108   81
  1 15  90  270  405   243
  1 18 135  540 1215  1458   729
  1 21 189  945 2835  5103  5103  2187
  1 24 252 1512 5670 13608 20412 17496 6561
   ...
A099097 formatted as a square array:
      1     0     0    0   0 0 0 0 0 0 0 ...
      3     1     0    0   0 0 0 0 0 0 ...
      9     6     1    0   0 0 0 0 0 ...
     27    27     9    1   0 0 0 0 ...
     81   108    54   12   1 0 0 ...
    243   405   270   90  15 1 ...
    729  1458  1215  540 135 ...
   2187  5103  5103 2835 ...
   6561 17496 20412 ...
  19683 59049 ...
  59049 ...

Reinhard Zumkeller, Rows n = 0..125 of triangle, flattened
B. N. Cyvin et al., Isomer enumeration of unbranched catacondensed polygonal systems with pentagons and heptagons, Match, No. 34 (Oct 1996), pp. 109-121.
Erich Neuwirth, Recursively defined combinatorial functions: Extending Galton's board, Discrete Math. 239 No. 1-3, 33-51 (2001).

Cf. A000244, A007318, A013610, A013610, A099097, A027471, A027472, A036216, A036217, A036219, A036220, A036221, A036222, A036223.

a027465 n k = a027465_tabl !! n !! k
a027465_row n = a027465_tabl !! n
a027465_tabl = iterate (\row ->
   zipWith (+) (map (* 3) (row ++ [0])) (map (* 1) ([0] ++ row))) [1]
-- Reinhard Zumkeller, May 26 2013

for i from 0 to 12 do seq(binomial(i, j)*3^(i-j), j = 0 .. i) od; # Zerinvary Lajos, Nov 25 2007
# Uses function PMatrix from A357368. Adds column 1, 0, 0, ... to the left.
PMatrix(10, n -> 3^(n-1)); # Peter Luschny, Oct 09 2022

t[n_, k_] := Binomial[n, k]*3^(n-k); Table[t[n, n-k], {n, 0, 9}, {k, n, 0, -1}] // Flatten (* Jean-François Alcover, Sep 19 2012 *)

{T(n, k) = polcoeff( (3 + x)^n, k)}; /* Michael Somos, Feb 14 2002 */

Numerators of lower triangle of (b^2)[ i, j ] where b[ i, j ] = binomial(i-1, j-1)/2^(i-1) if j <= i, 0 if j > i.
Triangle whose (i, j)-th entry is binomial(i, j)*3^(i-j).
a(n, m) = 4^(n-1)*Sum_{j=m..n} b(n, j)*b(j, m) = 3^(n-m)*binomial(n-1, m-1), n >= m >= 1; a(n, m) := 0, n < m. G.f. for m-th column: (x/(1-3*x))^m (m-fold convolution of A000244, powers of 3). - Wolfdieter Lang, Feb 2006
G.f.: 1 / (1 - x(3+y)).
a(n,k) = 3*a(n-1,k) + a(n-1,k-1) - R. J. Mathar, Mar 17 2006
From the formalism of A133314, the e.g.f. for the row polynomials of A027465 is exp(x*t)*exp(3x). The e.g.f. for the row polynomials of the inverse matrix is exp(x*t)*exp(-3x). p iterates of the matrix give the matrix with e.g.f. exp(x*t)*exp(p*3x). The results generalize for 3 replaced by any number. - Tom Copeland, Aug 18 2008
T(n,k) = A164942(n,k)*(-1)^k. - Philippe Deléham, Oct 09 2011
Let P and P^T be the Pascal matrix and its transpose and H = P^3 = A027465. Then from the formalism of A132440 and A218272,
  exp[x*z/(1-3z)]/(1-3z) = exp(3z D_z z) e^(x*z)= exp(3D_x x D_x) e^(z*x)
  = (1 z z^2 z^3 ...) H (1 x x^2/2! x^3/3! ...)^T
  = (1 x x^2/2! x^3/3! ...) H^T (1 z z^2 z^3 ...)^T = Sum_{n>=0} (3z)^n L_n(-x/3), where D is the derivative operator and L_n(x) are the regular (not normalized) Laguerre polynomials. - Tom Copeland, Oct 26 2012
E.g.f. for column k: x^k/k! * exp(3x). - Geoffrey Critzer, Sep 04 2013

A135030 Generalized Fibonacci numbers: a(n) = 6a(n-1) + 2a(n-2).

Original entry on oeis.org

0, 1, 6, 38, 240, 1516, 9576, 60488, 382080, 2413456, 15244896, 96296288, 608267520, 3842197696, 24269721216, 153302722688, 968355778560, 6116740116736, 38637152257536, 244056393778688, 1541612667187200

Offset: 0

Rolf Pleisch, Feb 10 2008, Feb 14 2008

For n>0, a(n) equals the number of words of length n-1 over {0,1,...,7} in which 0 and 1 avoid runs of odd lengths. - Milan Janjic, Jan 08 2017

Joshua Zucker and Robert Israel, Table of n, a(n) for n = 0..1000 (n=0..51 from Joshua Zucker).
Index entries for linear recurrences with constant coefficients, signature (6, 2).

Cf. A001076, A006190, A007482, A015520, A015521, A015523, A015524, A015525, A015528, A015529, A015530, A015531, A015532, A015533, A015534, A015535, A015536, A015537, A015440, A015441, A015443, A015444, A015445, A015447, A015548, A030195, A053404, A057087, A057088, A083858, A085939, A090017, A091914, A099012, A180222, A180226, A180250.

[n le 2 select n-1 else 6*Self(n-1) + 2*Self(n-2): n in [1..35]]; // Vincenzo Librandi, Sep 18 2016

A:= gfun:-rectoproc({a(0) = 0, a(1) = 1, a(n) = 2*(3*a(n-1) + a(n-2))},a(n),remember):
seq(A(n),n=1..30); # Robert Israel, Sep 16 2014

Join[{a=0,b=1},Table[c=6*b+2*a;a=b;b=c,{n,100}]] (* Vladimir Joseph Stephan Orlovsky, Jan 16 2011 *)
LinearRecurrence[{6,2},{0,1},30] (* or *) CoefficientList[Series[ -(x/(2x^2+6x-1)),{x,0,30}],x] (* Harvey P. Dale, Jun 20 2011 *)

a(n)=([0,1; 2,6]^n*[0;1])[1,1] \\ Charles R Greathouse IV, Oct 03 2016

[lucas_number1(n,6,-2) for n in range(0, 21)] # Zerinvary Lajos, Apr 24 2009

a(0) = 0; a(1) = 1; a(n) = 2*(3*a(n-1) + a(n-2)).
a(n) = 1/(2*sqrt(11))*( (3 + sqrt(11))^n - (3 - sqrt(11))^n ).
G.f.: x/(1 - 6*x - 2*x^2). - Harvey P. Dale, Jun 20 2011
a(n+1) = Sum_{k=0..n} A099097(n,k)*2^k. - Philippe Deléham, Sep 16 2014
E.g.f.: (1/sqrt(11))*exp(3*x)*sinh(sqrt(11)*x). - G. C. Greubel, Sep 17 2016

More terms from Joshua Zucker, Feb 23 2008

A131778 6A065941 - 5A049310.

Original entry on oeis.org

1, 6, 1, 1, 6, 1, 6, -4, 12, 1, 1, 6, 3, 12, 1, 6, -9, 24, -2, 18, 1, 1, 6, 0, 24, 11, 18, 1, 6, -14, 36, -20, 60, 6, 24, 1, 1, 6, -8, 36, 15, 60, 25, 24, 1, 6, -19, 48, -58, 126, -15, 120, 20, 30, 1

Offset: 1

Gary W. Adamson, Jul 14 2007

Row sums = A022097, a Fibonacci-like sequence starting (1, 7, 8, 15, 23, 38, ...).

			First few rows of the triangle:
  1;
  6,  1;
  1,  6,  1;
  6, -4, 12,  1;
  1,  6,  3, 12,  1;
  6, -9, 24, -2, 18,  1;
  1,  6,  0, 24, 11, 18,  1;
  ...

Cf. A065941, A049310, A099097, A131774, A131775, A131776, A131777.

6*A065941 - 5*A049310 as infinite lower triangular matrices.

A181353 a(n) = 9a(n-1) + 3a(n-2); a(0) = 0, a(1) = 1.

Original entry on oeis.org

0, 1, 9, 84, 783, 7299, 68040, 634257, 5912433, 55114668, 513769311, 4789267803, 44644718160, 416170266849, 3879466556121, 36163709805636, 337111787919087, 3142497220688691, 29293810349955480, 273071784811665393, 2545527494354854977, 23728962803628690972

Offset: 0

Vladimir Joseph Stephan Orlovsky, Jan 27 2011

G. C. Greubel, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (9,3).

Cf. A015579, A099371.

I:=[0,1]; [n le 2 select I[n] else 9*Self(n-1) + 3*Self(n-2): n in [1..30]];

Join[{a=0,b=1},Table[c=9*b+3*a;a=b;b=c,{n,60}]]
LinearRecurrence[{9,3}, {0,1}, 30] (* G. C. Greubel, Jan 24 2018 *)

x='x+O('x^30); concat([0], Vec(x/(1-9*x-3*x^2))) \\ G. C. Greubel, Jan 24 2018

a(n) = ((9+sqrt(93))^n - (9-sqrt(93))^n)/(2^n*sqrt(93)). - Rolf Pleisch, May 14 2011
G.f.: x/(1 - 9*x - 3*x^2). - Philippe Deléham, Nov 21 2011
a(n+1) = Sum_{k=0..n} A099097(n,k)*3^k. - Philippe Deléham, Nov 21 2011
E.g.f.: 2*exp(9*x/2)*sinh(sqrt(93)*x/2)/sqrt(93). - Stefano Spezia, Apr 06 2023

cp's OEIS Frontend

A027465 Cube of lower triangular normalized binomial matrix.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Maple

Mathematica

PARI

Formula

A135030 Generalized Fibonacci numbers: a(n) = 6*a(n-1) + 2*a(n-2).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Maple

Mathematica

PARI

Sage

Formula

Extensions

A131778 6*A065941 - 5*A049310.

Views

Author

Keywords

Comments

Examples

Crossrefs

Formula

A181353 a(n) = 9*a(n-1) + 3*a(n-2); a(0) = 0, a(1) = 1.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Formula

A135030 Generalized Fibonacci numbers: a(n) = 6a(n-1) + 2a(n-2).

A131778 6A065941 - 5A049310.

A181353 a(n) = 9a(n-1) + 3a(n-2); a(0) = 0, a(1) = 1.