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

A159535 Numerator of Hermite(n, 7/17).

Original entry on oeis.org

1, 14, -382, -21532, 360940, 54835144, -275424584, -194024223568, -1601971263088, 874740412095200, 20579820279916576, -4767882097991423936, -197596846711589525312, 30303674377706263065728, 1908994147478771376114560, -218491414999696281462267136
Offset: 0

Views

Author

N. J. A. Sloane, Nov 12 2009

Keywords

Links

Crossrefs

Cf. A159529, A159530.

Programs

  • Magma
    [Numerator((&+[(-1)^k*Factorial(n)*(14/17)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]])): n in [0..30]]; // G. C. Greubel, Jul 09 2018
  • Mathematica
    Numerator[Table[HermiteH[n,7/17],{n,0,50}]] (* Vladimir Joseph Stephan Orlovsky, Apr 29 2011 *)
Table[17^n*HermiteH[n, 7/17], {n,0,30}] (* G. C. Greubel, Jul 09 2018 *)
  • PARI
    a(n)=numerator(polhermite(n,7/17)) \\ Charles R Greathouse IV, Jan 29 2016

Formula

From G. C. Greubel, Jul 09 2018: (Start)
a(n) = 17^n * Hermite(n, 7/17).
E.g.f.: exp(14*x-289*x^2).
a(n) = numerator(Sum_{k=0..floor(n/2)} (-1)^k*n!*(14/17)^(n-2*k)/(k!*(n-2*k)!)). (End)

A159536 Numerator of Hermite(n, 8/17).

Original entry on oeis.org

1, 16, -322, -23648, 179980, 57553856, 400719496, -193185260672, -4712275251568, 817892241322240, 37599531719812576, -4125824647325545984, -305071017031777093952, 23735583481341553441792, 2672072957678237939024000, -149315174208164043426596864
Offset: 0

Views

Author

N. J. A. Sloane, Nov 12 2009

Keywords

Links

Crossrefs

Cf. A159529, A159530.

Programs

  • Magma
    [Numerator((&+[(-1)^k*Factorial(n)*(16/17)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]])): n in [0..30]]; // G. C. Greubel, Jul 09 2018
  • Mathematica
    Numerator[Table[HermiteH[n,8/17],{n,0,50}]] (* Vladimir Joseph Stephan Orlovsky, Apr 29 2011 *)
Table[17^n*HermiteH[n, 8/17], {n,0,30}] (* G. C. Greubel, Jul 09 2018 *)
  • PARI
    a(n)=numerator(polhermite(n,8/17)) \\ Charles R Greathouse IV, Jan 29 2016

Formula

From G. C. Greubel, Jul 09 2018: (Start)
a(n) = 17^n * Hermite(n, 8/17).
E.g.f.: exp(16*x-289*x^2).
a(n) = numerator(Sum_{k=0..floor(n/2)} (-1)^k*n!*(16/17)^(n-2*k)/(k!*(n-2*k)!)). (End)

A159534 Numerator of Hermite(n, 6/17).

Original entry on oeis.org

1, 12, -434, -19080, 523596, 50396112, -908439096, -185674985568, 1447444755600, 875930470333632, 2981558025372384, -5027099422223924352, -79281938992004709696, 33916578324641082789120, 1002723429481616382125184, -262420270649216245344056832
Offset: 0

Views

Author

N. J. A. Sloane, Nov 12 2009

Keywords

Links

Crossrefs

Cf. A159529, A159530.

Programs

  • Magma
    [Numerator((&+[(-1)^k*Factorial(n)*(12/17)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]])): n in [0..30]]; // G. C. Greubel, Jul 09 2018
  • Mathematica
    Numerator[Table[HermiteH[n,6/17],{n,0,50}]] (* Vladimir Joseph Stephan Orlovsky, Apr 29 2011 *)
Table[17^n*HermiteH[n, 6/17], {n,0,30}] (* G. C. Greubel, Jul 09 2018 *)
  • PARI
    a(n)=numerator(polhermite(n,6/17)) \\ Charles R Greathouse IV, Jan 29 2016

Formula

From G. C. Greubel, Jul 09 2018: (Start)
a(n) = 17^n * Hermite(n, 6/17).
E.g.f.: exp(12*x-289*x^2).
a(n) = numerator(Sum_{k=0..floor(n/2)} (-1)^k*n!*(12/17)^(n-2*k)/(k!*(n-2*k)!)). (End)

A159531 Numerator of Hermite(n, 3/17).

Original entry on oeis.org

1, 6, -542, -10188, 878700, 28826856, -2366481864, -114170427792, 8889763054992, 581262636440160, -42756971593427424, -3616239868184689344, 250151386181903425728, 26583148042820425844352, -1720138627513899785854080, -225431665727586284647620864
Offset: 0

Views

Author

N. J. A. Sloane, Nov 12 2009

Keywords

Links

Crossrefs

Cf. A159521, A159529, A159530.

Programs

  • Magma
    [Numerator((&+[(-1)^k*Factorial(n)*(6/17)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]])): n in [0..30]]; // G. C. Greubel, Jul 09 2018
  • Mathematica
    Numerator[Table[HermiteH[n,3/17],{n,0,50}]] (* Vladimir Joseph Stephan Orlovsky, Apr 29 2011 *)
Table[17^n*HermiteH[n, 3/17], {n,0,30}] (* G. C. Greubel, Jul 09 2018 *)
  • PARI
    a(n)=numerator(polhermite(n,3/17)) \\ Charles R Greathouse IV, Jan 29 2016

Formula

From G. C. Greubel, Jul 09 2018: (Start)
a(n) = 17^n * Hermite(n, 3/17).
E.g.f.: exp(6*x-289*x^2).
a(n) = numerator(Sum_{k=0..floor(n/2)} (-1)^k*n!*(6/17)^(n-2*k)/(k!*(n-2*k)!)). (End)

A159532 Numerator of Hermite(n, 4/17).

Original entry on oeis.org

1, 8, -514, -13360, 784396, 37163488, -1969596536, -144639748672, 6811869595280, 723309154621568, -29648872397674016, -4417917892894055168, 153164187561258952384, 31867992005603238264320, -895931769290473862098816, -265043245463665194931667968
Offset: 0

Views

Author

N. J. A. Sloane, Nov 12 2009

Keywords

Links

Crossrefs

Cf. A159529, A159530.

Programs

  • Magma
    [Numerator((&+[(-1)^k*Factorial(n)*(8/17)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]])): n in [0..30]]; // G. C. Greubel, Jul 09 2018
  • Mathematica
    Numerator[Table[HermiteH[n,4/17],{n,0,50}]] (* Vladimir Joseph Stephan Orlovsky, Apr 29 2011 *)
Table[17^n*HermiteH[n, 417], {n,0,30}] (* G. C. Greubel, Jul 09 2018 *)
  • PARI
    a(n)=numerator(polhermite(n,4/17)) \\ Charles R Greathouse IV, Jan 29 2016

Formula

From G. C. Greubel, Jul 09 2018: (Start)
a(n) = 17^n * Hermite(n, 4/17).
E.g.f.: exp(8*x-289*x^2).
a(n) = numerator(Sum_{k=0..floor(n/2)} (-1)^k*n!*(8/17)^(n-2*k)/(k!*(n-2*k)!)). (End)

A159533 Numerator of Hermite(n, 5/17).

Original entry on oeis.org

1, 10, -478, -16340, 665452, 44432600, -1478830280, -168880559600, 4294541716880, 823849124759200, -14101714763617760, -4902865088744353600, 40630051579638182080, 34412572771327218390400, 38831520143870883754880, -278078223664141142377568000
Offset: 0

Views

Author

N. J. A. Sloane, Nov 12 2009

Keywords

Links

Crossrefs

Cf. A159529, A159530.

Programs

  • Magma
    [Numerator((&+[(-1)^k*Factorial(n)*(10/17)^(n-2*k)/( Factorial(k) *Factorial(n-2*k)): k in [0..Floor(n/2)]])): n in [0..30]]; // G. C. Greubel, Jul 09 2018
  • Mathematica
    Numerator[Table[HermiteH[n,5/17],{n,0,50}]] (* Vladimir Joseph Stephan Orlovsky, Apr 29 2011 *)
Table[17^n*HermiteH[n, 5/17], {n,0,30}] (* G. C. Greubel, Jul 09 2018 *)
  • PARI
    a(n)=numerator(polhermite(n,5/17)) \\ Charles R Greathouse IV, Jan 29 2016

Formula

From G. C. Greubel, Jul 09 2018: (Start)
a(n) = 17^n * Hermite(n, 5/17).
E.g.f.: exp(10*x-289*x^2).
a(n) = numerator(Sum_{k=0..floor(n/2)} (-1)^k*n!*(10/17)^(n-2*k)/(k!*(n-2*k)!)). (End)
Showing 1-6 of 6 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.