A134593 -id:A134593 - cp's OEIS frontend

A084097 Square array whose rows have e.g.f. exp(x)cosh(sqrt(k)x), k>=0, read by ascending antidiagonals.

1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 3, 4, 1, 1, 1, 4, 7, 8, 1, 1, 1, 5, 10, 17, 16, 1, 1, 1, 6, 13, 28, 41, 32, 1, 1, 1, 7, 16, 41, 76, 99, 64, 1, 1, 1, 8, 19, 56, 121, 208, 239, 128, 1, 1, 1, 9, 22, 73, 176, 365, 568, 577, 256, 1, 1, 1, 10, 25, 92, 241, 576, 1093, 1552, 1393, 512, 1

Offset: 0

Paul Barry, May 11 2003

Rows are the binomial transforms of expansions of cosh(sqrt(k)*x), k >= 0.

			Array, A(n,k), begins:
.n\k.........0..1...2...3....4.....5......6......7.......8........9.......10
.0: A000012..1..1...1...1....1.....1......1......1.......1........1........1
.1: A000079..1..1...2...4....8....16.....32.....64.....128......256......512
.2: A001333..1..1...3...7...17....41.....99....239.....577.....1393.....3363
.3: A026150..1..1...4..10...28....76....208....568....1552.....4240....11584
.4: A046717..1..1...5..13...41...121....365...1093....3281.....9841....29525
.5: A084057..1..1...6..16...56...176....576...1856....6016....19456....62976
.6: A002533..1..1...7..19...73...241....847...2899...10033....34561...119287
.7: A083098..1..1...8..22...92...316...1184...4264...15632....56848...207488
.8: A084058..1..1...9..25..113...401...1593...5993...23137....88225...338409
.9: A003665..1..1..10..28..136...496...2080...8128...32896...130816...524800
10: A002535..1..1..11..31..161...601...2651..10711...45281...186961...781451
11: A133294..1..1..12..34..188...716...3312..13784...60688...259216..1125312
12: A090042..1..1..13..37..217...841...4069..17389...79537...350353..1575613
13: A125816..1..1..14..40..248...976...4928..21568..102272...463360..2153984
14: A133343..1..1..15..43..281..1121...5895..26363..129361...601441..2884575
15: A133345..1..1..16..46..316..1276...6976..31816..161296...768016..3794176
16: A120612..1..1..17..49..353..1441...8177..37969..198593...966721..4912337
17: A133356..1..1..18..52..392..1616...9504..44864..241792..1201408..6271488
18: A125818..1..1..19..55..433..1801..10963..52543..291457..1476145..7907059
25: A083578
- _Robert G. Wilson v_, Jan 02 2013
Antidiagonal triangle, T(n,k), begins:
  1;
  1,  1;
  1,  1,  1;
  1,  1,  2,  1;
  1,  1,  3,  4,  1;
  1,  1,  4,  7,  8,   1;
  1,  1,  5, 10, 17,  16,   1;
  1,  1,  6, 13, 28,  41,  32,    1;
  1,  1,  7, 16, 41,  76,  99,   64,    1;
  1,  1,  8, 19, 56, 121, 208,  239,  128,    1;
  1,  1,  9, 22, 73, 176, 365,  568,  577,  256,   1;
  1,  1, 10, 25, 92, 241, 576, 1093, 1552, 1393, 512,  1;

G. C. Greubel, Antidiagonals n = 0..50, flattened

Cf  A140895, A221131.
Rows: A000012, A000079, A001333, A026150, A046717, A084057, A002533, A083098, A084058, A003665,
Rows: A002535, A133294, A090042, A125816, A133343, A133345, A120612, A133356, A125818, A083578.
Columns: A000012, A000012, A000027, A016777, A028884, A134593.
Rows include A011782, A001333, A026150, A046717, A002533.

function A084097(n,k)
  if k eq 0 then return 1;
  else return k*2^(k-1)*(&+[ Binomial(k-j,j)*((n-k-1)/4)^j/(k-j): j in [0..Floor(k/2)]]);
  end if; return A084097; end function;
[A084097(n,k): k in [0..n], n in [0..12]]; // G. C. Greubel, Oct 15 2022

T[j_, k_] := Expand[((1 + Sqrt[j])^k + (1 - Sqrt[j])^k)/2]; T[1, 0] = 1; Table[ T[j - k, k], {j, 0, 11}, {k, 0, j}] // Flatten (* Robert G. Wilson v, Jan 02 2013 *)

def A084097(n,k):
    if (k==0): return 1
    else: return k*2^(k-1)*sum( binomial(k-j,j)*((n-k-1)/4)^j/(k-j) for j in range( (k+2)//2 ) )
flatten([[A084097(n,k) for k in range(n+1)] for n in range(15)]) # G. C. Greubel, Oct 15 2022

From Robert G. Wilson v, Jan 02 2013: (Start)
A(n, k) = (1/2)*( (1 + sqrt(n))^k + (1 - sqrt(n))^k ) (array).
T(n, k) = A(n-k, k). (End)
T(n, k) = Sum_{j=0..floor(k/2)} binomial(k-j, j)*((n-k-1)/4)^j/(k-j), with T(n, 0) = 1 (antidiagonal triangle T(n,k)). - G. C. Greubel, Oct 15 2022

Edited by N. J. A. Sloane, Jul 14 2010

A134594 a(n) = n^2 + 10*n + 5: coefficients of the irrational part of (1 + sqrt(n))^5.

Original entry on oeis.org

5, 16, 29, 44, 61, 80, 101, 124, 149, 176, 205, 236, 269, 304, 341, 380, 421, 464, 509, 556, 605, 656, 709, 764, 821, 880, 941, 1004, 1069, 1136, 1205, 1276, 1349, 1424, 1501, 1580, 1661, 1744, 1829, 1916, 2005, 2096, 2189, 2284, 2381, 2480, 2581, 2684

Offset: 0

Artur Jasinski, Nov 04 2007

(1+sqrt(n))^5 = (5*n^2 + 10*n + 1) + (n^2 + 10*n + 5)*sqrt(n). For coefficients of the rational part see A134593.

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

Cf. A134593.

List([0..50],n->n^2+10*n+5); # Muniru A Asiru, Nov 24 2018

[n^2 +10*n +5: n in [0..50]]; // G. C. Greubel, Nov 23 2018

Table[(n^2 + 10n + 5), {n, 0, 50}]
LinearRecurrence[{3,-3,1}, {5,16,29}, 50] (* G. C. Greubel, Nov 23 2018 *)

a(n)=n^2+10*n+5 \\ Charles R Greathouse IV, Jun 17 2017

[n^2 +10*n +5 for n in range(50)] # G. C. Greubel, Nov 23 2018

a(n) = ((1+sqrt(n))^5 - (5*n^2 + 10*n + 1))/sqrt(n), for n > 0. [corrected by Jon E. Schoenfield, Nov 23 2018]
G.f.: (1+x)*(5-4*x)/(1-x)^3. - R. J. Mathar, Nov 14 2007
a(n) = 2*n + a(n-1) + 9 (with a(0)=5). - Vincenzo Librandi, Nov 23 2010
E.g.f.: (5 +11*x +x^2)*exp(x). - G. C. Greubel, Nov 23 2018

A221131 Table, T, read by antidiagonals where T(-j,k) = ((1+sqrt(j))^k + (1-sqrt(j))^k)/2.

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, -1, -2, 1, 1, 1, -2, -5, -4, 1, 1, 1, -3, -8, -7, -4, 1, 1, 1, -4, -11, -8, 1, 0, 1, 1, 1, -5, -14, -7, 16, 23, 8, 1, 1, 1, -6, -17, -4, 41, 64, 43, 16, 1, 1, 1, -7, -20, 1, 76, 117, 64, 17, 16, 1, 1, 1, -8, -23, 8, 121, 176, 29, -128, -95, 0, 1

Offset: 0

Al Hakanson (hawkuu(AT)gmail.com) and Robert G. Wilson v, Jan 02 2013

.j\k.........0..1...2....3...4....5....6......7.......8......9......10
.0: A000012..1..1...1....1...1....1....1......1.......1......1.......1
-1: A146559..1..1...0...-2..-4...-4....0......8......16.....16.......0
-2: A087455..1..1..-1...-5..-7....1...23.....43......17....-95....-241
-3: A138230..1..1..-2...-8..-8...16...64.....64....-128...-512....-512
-4: A006495..1..1..-3..-11..-7...41..117.....29....-527..-1199.....237
-5: A138229..1..1..-4..-14..-4...76..176...-104...-1264..-1904....3776
-6: A090592..1..1..-5..-17...1..121..235...-377...-2399..-2159...12475
-7: A090590..1..1..-6..-20...8..176..288...-832...-3968..-1280...29184
-8: A025172..1..1..-7..-23..17..241..329..-1511...-5983...1633...57113
-9: A120743..1..1..-8..-26..28..316..352..-2456...-8432...7696...99712
-10: ........1..1..-9..-29..41..401..351..-3709..-11279..18241..160551

Cf. A084097,
Rows: A000012, A146559, A087455, A138230, A006495, A138229, A090592, A090590, A025172, A120743.
Columns: A000012, A000012, A024000, 1-3n, A028884, A134593.

T[j_, k_] := Expand[((1 + Sqrt[j])^k + (1 - Sqrt[j])^k)/2]; Table[ T[ -j + k, k], {j, 0, 11}, {k, 0, j}] // Flatten

cp's OEIS Frontend

A084097 Square array whose rows have e.g.f. exp(x)cosh(sqrt(k)x), k>=0, read by ascending antidiagonals.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Magma

Mathematica

SageMath

Formula

Extensions

A134594 a(n) = n^2 + 10*n + 5: coefficients of the irrational part of (1 + sqrt(n))^5.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

GAP

Magma

Mathematica

PARI

Sage

Formula

A221131 Table, T, read by antidiagonals where T(-j,k) = ((1+sqrt(j))^k + (1-sqrt(j))^k)/2.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

cp's OEIS Frontend

A084097 Square array whose rows have e.g.f. exp(x)*cosh(sqrt(k)*x), k>=0, read by ascending antidiagonals.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Magma

Mathematica

SageMath

Formula

Extensions

A134594 a(n) = n^2 + 10*n + 5: coefficients of the irrational part of (1 + sqrt(n))^5.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

GAP

Magma

Mathematica

PARI

Sage

Formula

A221131 Table, T, read by antidiagonals where T(-j,k) = ((1+sqrt(j))^k + (1-sqrt(j))^k)/2.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A084097 Square array whose rows have e.g.f. exp(x)cosh(sqrt(k)x), k>=0, read by ascending antidiagonals.