A124137
A signed aerated and skewed version of A038137.
Original entry on oeis.org
1, 0, 1, -1, 0, 2, 0, -2, 0, 3, 1, 0, -5, 0, 5, 0, 3, 0, -10, 0, 8, -1, 0, 9, 0, -20, 0, 13, 0, -4, 0, 22, 0, -38, 0, 21, 1, 0, -14, 0, 51, 0, -71, 0, 34, 0, 5, 0, -40, 0, 111, 0, -130, 0, 55, -1, 0, 20, 0, -105, 0, 233, 0, -235, 0, 89
Offset: 0
Triangle begins:
1;
0, 1;
-1, 0, 2;
0, -2, 0, 3;
1, 0, -5, 0, 5;
0, 3, 0, -10, 0, 8;
-1, 0, 9, 0, -20, 0, 13;
0, -4, 0, 22, 0, -38, 0, 21;
1, 0, -14, 0, 51, 0, -71, 0, 34;
0, 5, 0, -40, 0, 111, 0, -130, 0, 55;
-
T[0, 0]:= 1; T[n_, n_]:= Fibonacci[n + 1]; T[n_, k_]:= T[n, k] = If[k < 0 || n < k, 0, T[n - 1, k - 1] + T[n - 2, k - 2] - T[n - 2, k]]; Table[T[n, k], {n, 0, 10}, {k, 0, n}] // Flatten (* G. C. Greubel, May 27 2018 *)
-
{T(n,k) = if(n==0 && k==0, 1, if(k==n, fibonacci(n+1), if(k<0 || nG. C. Greubel, May 27 2018
A128100
Triangle read by rows: T(n,k) is the number of ways to tile a 2 X n rectangle with k pieces of 2 X 2 tiles and n-2k pieces of 1 X 2 tiles (0 <= k <= floor(n/2)).
Original entry on oeis.org
1, 1, 2, 1, 3, 2, 5, 5, 1, 8, 10, 3, 13, 20, 9, 1, 21, 38, 22, 4, 34, 71, 51, 14, 1, 55, 130, 111, 40, 5, 89, 235, 233, 105, 20, 1, 144, 420, 474, 256, 65, 6, 233, 744, 942, 594, 190, 27, 1, 377, 1308, 1836, 1324, 511, 98, 7, 610, 2285, 3522, 2860, 1295, 315, 35, 1, 987, 3970
Offset: 0
Triangle starts:
1;
1;
2, 1;
3, 2;
5, 5, 1;
8, 10, 3;
13, 20, 9, 1;
21, 38, 22, 4;
From _Philippe Deléham_, Jan 24 2012: (Start)
Triangle (1, 1, -1, 0, 0, ...) DELTA (0, 1, -1, 0, 0, 0, ...) begins:
1;
1, 0;
2, 1, 0;
3, 2, 0, 0;
5, 5, 1, 0, 0;
8, 10, 3, 0, 0, 0;
13, 20, 9, 1, 0, 0, 0;
21, 38, 22, 4, 0, 0, 0, 0; (End)
From _Clark Kimberling_, Oct 22 2014: (Start)
Here are the first 4 polynomials p(n,x) as in Comment and generated by Mathematica program:
1
2 + x
3 + 2x
5 + 5x + x^2. (End)
- C.-P. Chou and H. A. Witek, An Algorithm and FORTRAN Program for Automatic Computation of the Zhang-Zhang Polynomial of Benzenoids, MATCH: Commun. Math. Comput. Chem, 68 (2012) 3-30. See Eq. (9). - From _N. J. A. Sloane_, Dec 23 2012
- S. Klavzar, M. Mollard, Cube polynomial of Fibonacci and Lucas cubes, preprint.
- S. Klavzar, M. Mollard, Cube polynomial of Fibonacci and Lucas cubes, Acta Appl. Math. 117, 2012, 93-105. - _Emeric Deutsch_, Aug 12 2014
-
G:=1/(1-z-(1+t)*z^2): Gser:=simplify(series(G,z=0,19)): for n from 0 to 16 do P[n]:=sort(coeff(Gser,z,n)) od: for n from 0 to 16 do seq(coeff(P[n],t,j),j=0..floor(n/2)) od; # yields sequence in triangular form
-
p[x_, n_] := 1 + (x + 1)/p[x, n - 1]; p[x_, 1] = 1;
Numerator[Table[Factor[p[x, n]], {n, 1, 20}]] (* Clark Kimberling, Oct 22 2014 *)
A152440
Riordan matrix (1/(1-x-x^2),x/(1-x-x^2)^2).
Original entry on oeis.org
1, 1, 1, 2, 3, 1, 3, 9, 5, 1, 5, 22, 20, 7, 1, 8, 51, 65, 35, 9, 1, 13, 111, 190, 140, 54, 11, 1, 21, 233, 511, 490, 255, 77, 13, 1, 34, 474, 1295, 1554, 1035, 418, 104, 15, 1, 55, 942, 3130, 4578, 3762, 1925, 637, 135, 17, 1, 89, 1836, 7285, 12720, 12573, 7865, 3276
Offset: 0
Triangle begins:
1;
1, 1;
2, 3, 1;
3, 9, 5, 1;
5, 22, 20, 7, 1;
8, 51, 65, 35, 9, 1;
13, 111, 190, 140, 54, 11, 1;
21, 233, 511, 490, 255, 77, 13, 1, etc.
- _Philippe Deléham_, Feb 20 2014
A291915
Number of 6-cycles in the n-Fibonacci cube graph.
Original entry on oeis.org
0, 0, 0, 2, 22, 82, 268, 742, 1902, 4562, 10452, 23068, 49432, 103364, 211764, 426354, 845626, 1655454, 3203876, 6137946, 11652946, 21944034, 41021256, 76174360, 140595760, 258061160, 471255240, 856536610, 1550048766, 2793774026, 5016560956, 8976350894
Offset: 1
- Michael De Vlieger, Table of n, a(n) for n = 1..4737
- Ömer Egecioglu, Elif Saygı, and Zülfükar Saygı, The number of short cycles in Fibonacci cubes, Theoretical Computer Science (2021) Vol. 871, 134-146.
- Eric Weisstein's World of Mathematics, Fibonacci Cube Graph
- Eric Weisstein's World of Mathematics, Graph Cycle
- Index entries for linear recurrences with constant coefficients, signature (4,-2,-8,5,8,-2,-4,-1).
-
LinearRecurrence[{4, -2, -8, 5, 8, -2, -4, -1}, {0, 0, 0, 2, 22, 82, 268, 742}, 40]
Original entry on oeis.org
3, 10, 32, 84, 207, 478, 1060, 2272, 4744, 9692, 19446, 38420, 74909, 144378, 275464, 520864, 977005, 1819426, 3366182, 6191056, 11325040, 20613800, 37350060, 67389320, 121113335, 216877274, 387048080, 688559356, 1221323947
Offset: 0
-
CoefficientList[Series[(-2x^2-2x+3)/(1-x-x^2)^4,{x,0,30}],x] (* or *) LinearRecurrence[{4,-2,-8,5,8,-2,-4,-1},{3,10,32,84,207,478,1060,2272},30] (* Harvey P. Dale, May 06 2012 *)
Original entry on oeis.org
5, 20, 71, 207, 556, 1390, 3310, 7576, 16807, 36331, 76850, 159575, 326092, 657124, 1307992, 2575180, 5020570, 9702043, 18599391, 35397328, 66918850, 125738650, 234930380, 436660010, 807690455, 1487269940, 2727149885, 4981046893
Offset: 0
- Index entries for linear recurrences with constant coefficients, signature (5,-5,-10,15,11,-15,-10,5,5,1).
-
LinearRecurrence[{5,-5,-10,15,11,-15,-10,5,5,1},{5,20,71,207,556,1390,3310,7576,16807,36331},30] (* Harvey P. Dale, May 26 2025 *)
A057281
Coefficient triangle of polynomials (falling powers) related to Fibonacci convolutions. Companion triangle to A057282.
Original entry on oeis.org
1, 5, 16, 20, 160, 300, 75, 1075, 4850, 6840, 275, 6100, 48175, 159650, 186120, 1000, 31550, 379700, 2168650, 5846700, 5916240, 3625, 153875, 2605175, 22426825, 103057800, 238437900, 215717040, 13125, 720375, 16273875, 195469125
Offset: 0
k=2: F2(n)=((5*n^2+21*n+16)*F(n+2)+(5*n^2+27*n+34)*F(n+1))/50, F(n)=A000045(n); see A001628.
A132883
Triangle read by rows: T(n,k) is the number of paths in the first quadrant from (0,0) to (n,0), consisting of steps U=(1,1), D=(1,-1), h=(1,0) and H=(2,0), having k U steps (0 <= k <= floor(n/2)).
Original entry on oeis.org
1, 1, 2, 1, 3, 3, 5, 9, 2, 8, 22, 10, 13, 51, 40, 5, 21, 111, 130, 35, 34, 233, 380, 175, 14, 55, 474, 1022, 700, 126, 89, 942, 2590, 2450, 756, 42, 144, 1836, 6260, 7770, 3570, 462, 233, 3522, 14570, 22890, 14490, 3234, 132, 377, 6666, 32870, 63600, 52668
Offset: 0
Triangle starts:
1;
1;
2, 1;
3, 3;
5, 9, 2;
8, 22, 10;
13, 51, 40, 5;
T(3,1)=3 because we have hUD, UhD and UDh.
-
G:=((1-z-z^2-sqrt(1-2*z-z^2+2*z^3+z^4-4*t*z^2))*1/2)/(t*z^2): Gser:=simplify(series(G, z = 0, 17)): for n from 0 to 13 do P[n]:=sort(coeff(Gser,z,n)) end do: for n from 0 to 13 do seq(coeff(P[n],t,j),j=0..floor((1/2)*n)) end do; # yields sequence in triangular form
A182880
Triangle read by rows: T(n,k) is the number of weighted lattice paths in L_n having k (1,1)-steps. L_n is the set of lattice paths of weight n that start at (0,0) and end on the horizontal axis and whose steps are of the following four kinds: a (1,0)-step with weight 1; a (1,0)-step with weight 2; a (1,1)-step with weight 2; a (1,-1)-step with weight 1. The weight of a path is the sum of the weights of its steps.
Original entry on oeis.org
1, 1, 2, 3, 2, 5, 6, 8, 18, 13, 44, 6, 21, 102, 30, 34, 222, 120, 55, 466, 390, 20, 89, 948, 1140, 140, 144, 1884, 3066, 700, 233, 3672, 7770, 2800, 70, 377, 7044, 18780, 9800, 630, 610, 13332, 43710, 31080, 3780, 987, 24946, 98610, 91560, 17850, 252, 1597, 46218, 216732, 254400, 72450, 2772
Offset: 0
T(3,1)=2. Indeed, denoting by h (H) the (1,0)-step of weight 1 (2), and u=(1,1), d=(1,-1), the five paths of weight 3 are ud, du, hH, Hh, and hhh; two of them, ud and du, have exactly one u step.
Triangle starts:
1;
1;
2;
3, 2;
5, 6;
8, 18;
13, 44, 6;
- M. Bona and A. Knopfmacher, On the probability that certain compositions have the same number of parts, Ann. Comb., 14 (2010), 291-306.
- E. Munarini, N. Zagaglia Salvi, On the rank polynomial of the lattice of order ideals of fences and crowns, Discrete Mathematics 259 (2002), 163-177.
-
G:=1/sqrt(1-2*z-z^2+2*z^3+z^4-4*t*z^3): Gser:=simplify(series(G,z=0,18)): for n from 0 to 16 do P[n]:=sort(coeff(Gser,z,n)) od: for n from 0 to 16 do seq(coeff(P[n],t,k),k=0..floor(n/3)) od; # yields sequence in triangular form
A224227
a(n) = (1/50)*((15*n^2-20*n+4)*Fibonacci(n) - (5*n^2-6*n)*A000032(n)).
Original entry on oeis.org
0, 0, 0, 1, 2, 7, 16, 38, 82, 173, 352, 701, 1368, 2628, 4980, 9329, 17302, 31811, 58040, 105178, 189446, 339373, 604964, 1073593, 1897488, 3341160, 5863080, 10256065, 17888138, 31115071, 53985856, 93447278, 161397754, 278184461, 478550344, 821734901, 1408610088, 2410719084, 4119433884, 7029086705, 11977419742, 20382654971, 34643298728, 58811818210
Offset: 0
- Steven Finch, Cantor-solus and Cantor-multus Distributions, arXiv:2003.09458 [math.CO], 2020.
- N. Gauthier (Proposer), Problem H-703, Fib. Quart., 50 (2012), 379-381.
- Index entries for linear recurrences with constant coefficients, signature (3,0,-5,0,3,1).
-
LinearRecurrence[{3,0,-5,0,3,1},{0,0,0,1,2,7},50] (* Harvey P. Dale, Jan 22 2016 *)
Table[((15 n^2 - 20 n + 4) Fibonacci[n] - (5 n - 6) n LucasL[n])/50, {n, 0, 30}] (* Vladimir Reshetnikov, Oct 10 2016 *)
-
concat([0,0,0],Vec((x^2-x+1)/(x^2+x-1)^3+O(x^96))) \\ Charles R Greathouse IV, Mar 19 2014
Comments