A078983 Numerators of convergents to cosh(1).

1, 2, 3, 17, 54, 179, 412, 591, 12823, 13414, 26237, 39651, 184841, 409333, 594174, 28929685, 2054601809, 14411142348, 16465744157, 30876886505, 294357722702, 325234609207, 944826941116, 1270061550323, 14915503994669, 16185565544992

Offset

1,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..200

Mathematica

Numerator[Convergents[Cosh[1], 30]] (* Harvey P. Dale, Feb 02 2012 *)

Prog

(PARI) a(n)=component(component(contfracpnqn(contfrac(cosh(1), n)), 1), 1)

Crossrefs

Cf. A078982.

Sequence in context: A051084 A106860 A042699 * A235617 A201455 A085874

Adjacent sequences: A078980 A078981 A078982 * A078984 A078985 A078986

Keyword

frac,nonn

Author

Benoit Cloitre, Dec 20 2002

Status

approved