A123736 -id:A123736 - cp's OEIS frontend

A136431 Hyperfibonacci square number array a(k,n) = F(n)^(k), read by ascending antidiagonals (k, n >= 0).

0, 0, 1, 0, 1, 1, 0, 1, 2, 2, 0, 1, 3, 4, 3, 0, 1, 4, 7, 7, 5, 0, 1, 5, 11, 14, 12, 8, 0, 1, 6, 16, 25, 26, 20, 13, 0, 1, 7, 22, 41, 51, 46, 33, 21, 0, 1, 8, 29, 63, 92, 97, 79, 54, 34, 0, 1, 9, 37, 92, 155, 189, 176, 133, 88, 55, 0, 1, 10, 46, 129, 247, 344, 365, 309, 221, 143, 89, 0, 1

Offset: 0

Jonathan Vos Post, Apr 01 2008

Main diagonal is A108081. Antidiagonal sums form A027934. - Gerald McGarvey, Oct 01 2008

Seen as triangle read by rows: T(n,0) = 1, T(n,n) = A000045(n) and for 0 < k < n: T(n,k) = T(n-1,k-1) + T(n-1,k). - Reinhard Zumkeller, Jul 16 2013

			The array F(n)^(k) begins:
.....|n=0|n=1|.n=2|.n=3|.n=4.|.n=5.|..n=6.|.n=7..|..n=8..|..n=9..|.n=10..|.in.OEIS
k=0..|.0.|.1.|..1.|..2.|...3.|...5.|....8.|...13.|....21.|....34.|....55.|.A000045
k=1..|.0.|.1.|..2.|..4.|...7.|..12.|...20.|...33.|....54.|....88.|...143.|.A000071
k=2..|.0.|.1.|..3.|..7.|..14.|..26.|...46.|...79.|...133.|...221.|...364.|.A001924
k=3..|.0.|.1.|..4.|.11.|..25.|..51.|...97.|..176.|...309.|...530.|...894.|.A014162
k=4..|.0.|.1.|..5.|.16.|..41.|..92.|..189.|..365.|...674.|..1204.|..2098.|.A014166
k=5..|.0.|.1.|..6.|.22.|..63.|.155.|..344.|..709.|..1383.|..2587.|..4685.|.A053739
k=6..|.0.|.1.|..7.|.29.|..92.|.247.|..591.|.1300.|..2683.|..5270.|..9955.|.A053295
k=7..|.0.|.1.|..8.|.37.|.129.|.376.|..967.|.2267.|..4950.|.10220.|.20175.|.A053296
k=8..|.0.|.1.|..9.|.46.|.175.|.551.|.1518.|.3785.|..8735.|.18955.|.39130.|.A053308
k=9..|.0.|.1.|.10.|.56.|.231.|.782.|.2300.|.6085.|.14820.|.33775.|.72905.|.A053309

Reinhard Zumkeller, Rows n = 0..125 of triangle, flattened
H. Belbachir, A. Belkhir, Combinatorial Expressions Involving Fibonacci, Hyperfibonacci, and Incomplete Fibonacci Numbers, J. Int. Seq. 17 (2014), Article #14.4.3.
Ayhan Dil and Istvan Mezo, A Symmetric Algorithm for Hyperharmonic and Fibonacci Numbers, arXiv:0803.4388 [math.NT], 2008.
Ayhan Dil and Istvan Mezo, A Symmetric Algorithm for Hyperharmonic and Fibonacci Numbers, Applied Mathematics and Computation 206(2) (2008), 942-951.
Eric Weisstein's World of Mathematics, Steenrod Algebra

Cf. A000045, A000071, A001924, A014162, A014166, A053739, A053295, A053296, A053308, A053309, A123736, A137176.

a136431 n k = a136431_tabl !! n !! k
a136431_row n = a136431_tabl !! n
a136431_tabl = map fst $ iterate h ([0], 1) where
   h (row, fib) = (zipWith (+) ([0] ++ row) (row ++ [fib]), last row)
-- Reinhard Zumkeller, Jul 16 2013

A136431 := proc(k,n) local x ; coeftayl(x/(1-x-x^2)/(1-x)^k,x=0,n) ; end: for d from 0 to 20 do for n from 0 to d do printf("%d,",A136431(d-n,n)) ; od: od: # R. J. Mathar, Apr 25 2008

t[n_, k_] := CoefficientList[Series[x/(1 - x - x^2)/(1 - x)^k, {x, 0, n + 1}], x][[n + 1]]; Table[ t[n, k - n], {k, 0, 11}, {n, 0, k}] // Flatten
(* To view the table above *) Table[ t[n, k], {k, 0, 9}, {n, 0, 10}] // TableForm

a(k,n) = Apply partial sum operator k times to Fibonacci numbers.

For k > 0 and n > 1, a(k,n) = a(k-1,n) + a(k,n-1). - Gerald McGarvey, Oct 01 2008

A137176 Hyperlucas number array T(r,n) = L(n)^(r), read by ascending antidiagonals (r >= 0, n >= 0).

Original entry on oeis.org

0, 0, 1, 0, 1, 3, 0, 1, 4, 4, 0, 1, 5, 8, 7, 0, 1, 6, 13, 15, 11, 0, 1, 7, 19, 28, 26, 18, 0, 1, 8, 26, 47, 54, 44, 29, 0, 1, 9, 34, 73, 101, 98, 73, 47, 0, 1, 10, 43, 107, 174, 199, 171, 120, 76, 0, 1, 11, 53, 150, 281, 373, 370, 291, 196, 123

Offset: 0

Jonathan Vos Post, Apr 04 2008

In Theorem 17, Dil and Mezo (2008) connect the hyperlucas numbers (this array) with the incomplete Lucas numbers (A324242). - Petros Hadjicostas, Sep 03 2019

			The array T(r,n) = L(n)^(r) begins:
.....|n=0|n=1|.n=2|.n=3|.n=4.|.n=5.|..n=6.|.n=7..|..n=8..|..n=9..|.n=10..|.in.OEIS
r=0..|.0.|.1.|..3.|..4.|...7.|..11.|...18.|...29.|....47.|....76.|...123.|.A000204
r=1..|.0.|.1.|..4.|..8.|..15.|..26.|...44.|...73.|...120.|...196.|...319.|.A027961
r=2..|.0.|.1.|..5.|.13.|..28.|..54.|...98.|..171.|...291.|...487.|...806.|.A023537
r=3..|.0.|.1.|..6.|.19.|..47.|.101.|..199.|..370.|...661.|..1148.|..1954.|.A027963
r=4..|.0.|.1.|..7.|.26.|..73.|.174.|..373.|..743.|..1404.|..2552.|..4506.|.A027964
r=5..|.0.|.1.|..8.|.34.|.107.|.281.|..654.|.1397.|..2801.|..5353.|..9859.|.A053298
r=6..|.0.|.1.|..9.|.43.|.150.|.431.|.1085.|.2482.|..5283.|.10636.|.20495.|.new
r=7..|.0.|.1.|.10.|.53.|.203.|.634.|.1719.|.4201.|..9484.|.20120.|.40615.|.new
r=8..|.0.|.1.|.11.|.64.|.267.|.901.|.2620.|.6821.|.16305.|.36425.|.77040.|.new
r=9..|.0.|.1.|.12.|.76.|.343.|1244.|.3864.|10685.|.26990.|.63415.|140455.|.new
For example, T(4,5) = L(5)^(4) = L(0)^(3) + L(1)^(3) + L(2)^(3) + L(3)^(3) + L(4)^(3) + L(5)^(3) = 0 + 1 + 6 + 19 + 47 + 101 = 174. - _Petros Hadjicostas_, Sep 03 2019

Ayhan Dil and Istvan Mezo, A Symmetric Algorithm for Hyperharmonic and Fibonacci Numbers, arXiv:0803.4388 [math.NT], 2008.
Ayhan Dil and Istvan Mezo, A Symmetric Algorithm for Hyperharmonic and Fibonacci Numbers, Applied Mathematics and Computation 206(2) (2008), 942-951.
Eric W. Weisstein, Steenrod Algebra.

Cf. A000204, A027961, A023537, A027963, A027964, A053298, A123736, A136431.

Cf. A038730, A038792, and A134511 for incomplete Fibonacci sequences, and A324242 for incomplete Lucas sequences.

L:= proc(r, n) option remember; `if`(n=0, 0, `if`(r=0,
      `if`(n<3, 2*n-1, L(0, n-2)+L(0, n-1)), L(r-1, n)+L(r, n-1)))
    end:
seq(seq(L(d-n, n), n=0..d), d=0..12);  # Alois P. Heinz, Sep 03 2019

L[r_, n_] := L[r, n] = If[n == 0, 0, If[r == 0, If[n < 3, 2n-1, L[0, n-2] + L[0, n-1]], L[r-1, n] + L[r, n-1]]];
Table[L[d-n, n], {d, 0, 12}, {n, 0, d}] // Flatten (* Jean-François Alcover, Sep 26 2019, from Maple *)

T(r,n) = L(n)^(r) = Apply partial sum operator r times to Lucas numbers A000204.
From Petros Hadjicostas, Sep 03 2019: (Start)
T(r, n) = L(n)^(r) = Sum_{k = 0..n} L(k)^(r-1) for r >= 1, with T(0,n) = L(n)^(0) = L(n) = A000204(n), T(r,0) = L(0)^(r) = 0, and T(r,1) = L(1)^(r) = 1. (See Definition 13 in Dil and Mezo (2008).)
G.f. for row r: Sum_{n >= 0} L(n)^(r)*t^n = t * (1+2*t)/((1-t-t^2) * (1-t)^r). (Corrected from Proposition 14 in Dil and Mezo (2008).)
(End)

A208245 Triangle read by rows: a(n,k) = a(n-2,k) + a(n-2,k-1).

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 1, 3, 3, 2, 1, 1, 1, 3, 4, 3, 2, 1, 1, 1, 4, 6, 5, 3, 2, 1, 1, 1, 4, 7, 7, 5, 3, 2, 1, 1, 1, 5, 10, 11, 8, 5, 3, 2, 1, 1, 1, 5, 11, 14, 12, 8, 5, 3, 2, 1, 1, 1, 6, 15, 21, 19, 13, 8, 5, 3, 2, 1, 1, 1, 6, 16, 25, 26, 20, 13, 8, 5, 3, 2, 1, 1

Offset: 1

Richard R. Forberg, Apr 22 2013

Sum of terms in each row are given by sequence A052955.
Columns (at constant k) converge toward Fibonacci starting first from high value of k).
First seven rows are same as A008242. The odd numbered rows of this sequence equal the rows of A123736.  Also it has some similarities to A162741.
Columns (constant k), prior to convergence to Fibonacci, appear as various other sequences (e.g. k = 4, is sequence A055803, with other columns in same referenced family).

			The first 13 rows are (as above) where n is the row index:
1
1, 1
1, 1, 1
1, 2, 1, 1
1, 2, 2, 1, 1
1, 3, 3, 2, 1, 1
1, 3, 4, 3, 2, 1, 1
1, 4, 6, 5, 3, 2, 1, 1
1, 4, 7, 7, 5, 3, 2, 1, 1
1, 5, 10, 11, 8, 5, 3, 2, 1, 1
1, 5, 11, 14, 12, 8, 5, 3, 2, 1, 1
1, 6, 15, 21, 19, 13, 8, 5, 3, 2, 1, 1
1, 6, 16, 25, 26, 20, 13, 8, 5, 3, 2, 1, 1,

Reinhard Zumkeller, Rows n = 1..100 of triangle, flattened

Cf. A000045 (central terms).

a208245 n k = a208245_tabl !! (n-1) !! (k-1)
a208245_row n = a208245_tabl !! (n-1)
a208245_tabl = map fst $ iterate f ([1], [1, 1]) where
   f (us, vs) = (vs, zipWith (+) ([0] ++ us ++ [0]) (us ++ [0, 1]))
-- Reinhard Zumkeller, Jul 28 2013

a(n,k) = a(n-2,k) + a(n-2,k-1); if n=k or k=1 then a(n,k)=1; if n

Showing 1-3 of 3 results.

cp's OEIS Frontend

A136431 Hyperfibonacci square number array a(k,n) = F(n)^(k), read by ascending antidiagonals (k, n >= 0).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Maple

Mathematica

Formula

A137176 Hyperlucas number array T(r,n) = L(n)^(r), read by ascending antidiagonals (r >= 0, n >= 0).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A208245 Triangle read by rows: a(n,k) = a(n-2,k) + a(n-2,k-1).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Formula