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

A354211 a(n) is the numerator of Sum_{k=0..n} 1 / (2*k+1)!.

Original entry on oeis.org

1, 7, 47, 5923, 426457, 15636757, 7318002277, 1536780478171, 603180793741, 142957467201379447, 60042136224579367741, 10127106976545720025649, 18228792557782296046168201, 12796612375563171824410077103, 3463616416319098507140327535879, 1380498543075754976417359117871773
Offset: 0

Views

Author

Ilya Gutkovskiy, May 24 2022

Keywords

Examples

			1, 7/6, 47/40, 5923/5040, 426457/362880, 15636757/13305600, 7318002277/6227020800, ...
		

Crossrefs

Programs

  • Mathematica
    Table[Sum[1/(2 k + 1)!, {k, 0, n}], {n, 0, 15}] // Numerator
    nmax = 15; CoefficientList[Series[Sinh[Sqrt[x]]/(Sqrt[x] (1 - x)), {x, 0, nmax}], x] // Numerator
  • PARI
    a(n) = numerator(sum(k=0, n, 1/(2*k+1)!)); \\ Michel Marcus, May 24 2022
    
  • Python
    from fractions import Fraction
    from math import factorial
    def A354211(n): return sum(Fraction(1,factorial(2*k+1)) for k in range(n+1)).numerator # Chai Wah Wu, May 24 2022

Formula

Numerators of coefficients in expansion of sinh(sqrt(x)) / (sqrt(x) * (1 - x)).

A354332 a(n) is the numerator of Sum_{k=0..n} (-1)^k / (2*k+1)!.

Original entry on oeis.org

1, 5, 101, 4241, 305353, 33588829, 209594293, 1100370038249, 23023126954133, 102360822438075317, 42991545423991633141, 4350744396907953273869, 13052233190723859821607001, 9162667699888149594768114701, 7440086172309177470951709137213, 364172638960396581472899447242531
Offset: 0

Views

Author

Ilya Gutkovskiy, May 24 2022

Keywords

Examples

			1, 5/6, 101/120, 4241/5040, 305353/362880, 33588829/39916800, 209594293/249080832, ...
		

Crossrefs

Programs

  • Mathematica
    Table[Sum[(-1)^k/(2 k + 1)!, {k, 0, n}], {n, 0, 15}] // Numerator
    nmax = 15; CoefficientList[Series[Sin[Sqrt[x]]/(Sqrt[x] (1 - x)), {x, 0, nmax}], x] // Numerator
  • PARI
    a(n) = numerator(sum(k=0, n, (-1)^k/(2*k+1)!)); \\ Michel Marcus, May 24 2022
    
  • Python
    from fractions import Fraction
    from math import factorial
    def A354332(n): return sum(Fraction(-1 if k % 2 else 1,factorial(2*k+1)) for k in range(n+1)).numerator # Chai Wah Wu, May 24 2022

Formula

Numerators of coefficients in expansion of sin(sqrt(x)) / (sqrt(x) * (1 - x)).

A354335 a(n) is the denominator of Sum_{k=0..n} 1 / (2*k)!.

Original entry on oeis.org

1, 2, 24, 720, 4480, 518400, 479001600, 29059430400, 20922789888000, 6402373705728000, 810967336058880000, 1124000727777607680000, 88635485961891348480000, 14936720782466875392000000, 27717122237428532772864000000, 265252859812191058636308480000000
Offset: 0

Views

Author

Ilya Gutkovskiy, May 24 2022

Keywords

Examples

			1, 3/2, 37/24, 1111/720, 6913/4480, 799933/518400, 739138093/479001600, ...
		

Crossrefs

Programs

  • Mathematica
    Table[Sum[1/(2 k)!, {k, 0, n}], {n, 0, 15}] // Denominator
    nmax = 15; CoefficientList[Series[Cosh[Sqrt[x]]/(1 - x), {x, 0, nmax}], x] // Denominator
  • PARI
    a(n) = denominator(sum(k=0, n, 1/(2*k)!)); \\ Michel Marcus, May 24 2022
    
  • Python
    from fractions import Fraction
    from math import factorial
    def A354335(n): return sum(Fraction(1,factorial(2*k)) for k in range(n+1)).denominator # Chai Wah Wu, May 24 2022

Formula

Denominators of coefficients in expansion of cosh(sqrt(x)) / (1 - x).

A354138 a(n) is the numerator of Sum_{k=0..n} (-1)^k / (2*k)!.

Original entry on oeis.org

1, 1, 13, 389, 4357, 1960649, 258805669, 47102631757, 11304631621681, 691843455246877, 1314502564969066301, 607300185015708631061, 335229702128671164345673, 217899306383636256824687449, 32946375125205802031892742289, 848027998784883070051677094421
Offset: 0

Views

Author

Ilya Gutkovskiy, May 24 2022

Keywords

Examples

			1, 1/2, 13/24, 389/720, 4357/8064, 1960649/3628800, 258805669/479001600, ...
		

Crossrefs

Programs

  • Mathematica
    Table[Sum[(-1)^k/(2 k)!, {k, 0, n}], {n, 0, 15}] // Numerator
    nmax = 15; CoefficientList[Series[Cos[Sqrt[x]]/(1 - x), {x, 0, nmax}], x] // Numerator
  • PARI
    a(n) = numerator(sum(k=0, n, (-1)^k/(2*k)!)); \\ Michel Marcus, May 24 2022

Formula

Numerators of coefficients in expansion of cos(sqrt(x)) / (1 - x).
Showing 1-4 of 4 results.