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

A133867 Decimal expansion of the smallest positive fixed point of csch(x) (and csch^-1(x)).

Original entry on oeis.org

9, 3, 2, 0, 2, 0, 0, 2, 9, 3, 5, 2, 3, 4, 3, 9, 0, 5, 3, 9, 1, 1, 1, 4, 8, 4, 0, 1, 9, 3, 6, 3, 8, 1, 2, 2, 6, 4, 4, 8, 3, 9, 2, 2, 3, 3, 0, 1, 9, 0, 7, 8, 7, 2, 0, 1, 4, 9, 2, 5, 6, 4, 0, 5, 8, 5, 4, 9, 4, 6, 8, 1, 1, 3, 7, 6, 6, 2, 7, 7, 9, 4, 5, 4, 2, 9, 6, 8, 1, 4, 4, 1, 2, 8, 0, 6, 5, 8, 8, 7, 0, 6, 1, 0, 8
Offset: 0

Views

Author

Eric W. Weisstein, Sep 27 2007

Keywords

Comments

cosh(x) appears to be the positive solution for z in arccosh(z) = d/dz arcosh(z). - Colin Linzer, Nov 15 2024

Examples

			0.93202002935234390539...
		

Crossrefs

Cf. A009341.

Programs

  • Mathematica
    RealDigits[x /. FindRoot[Csch[x] == x, {x, 1}, WorkingPrecision -> 120]][[1]] (* Amiram Eldar, May 25 2023 *)

A024286 Expansion of e.g.f. log(1+sin(x)*x)/2 (even coefficients).

Original entry on oeis.org

0, 1, -8, 183, -8852, 733685, -92907942, 16685025455, -4033626509768, 1263031247390697, -497267081169369290, 240429918597334607075, -140051748469197955343340, 96736260363763053291403613, -78176444639905678751886122222, 73077125090731363505146141810455
Offset: 0

Views

Author

Keywords

Crossrefs

Cf. A009341.

Programs

  • Maple
    a:= n-> coeff(series(ln(1+sin(x)*x)/2,x,2*n+1),x,2*n)*(2*n)!:
    seq(a(n), n=0..20);  # Alois P. Heinz, Jun 03 2012
  • Mathematica
    Log[ 1+Sin[ x ]*x ]/2 (* Even Part *)

Formula

a(n) = (2n)! * [x^(2n)] log(1+sin(x)*x)/2.

Extensions

Extended with signs Mar 1997
Showing 1-2 of 2 results.