A112324 a(n) = denominator of sum of reciprocals of the terms of the continued fraction for prime(n+1)/prime(n).

2, 2, 1, 3, 10, 12, 8, 12, 15, 7, 30, 36, 20, 30, 35, 40, 58, 15, 48, 70, 4, 57, 65, 88, 24, 25, 75, 106, 108, 56, 93, 105, 68, 117, 37, 150, 39, 120, 135, 140, 178, 45, 190, 48, 49, 16, 17, 165, 226, 228, 190, 238, 120, 205, 210, 215, 67, 90, 276, 140, 84, 260, 228, 310

Offset

1,1

Links

Table of n, a(n) for n=1..64.

Example

prime(6)/prime(5) = 13/11 = 1 + 1/(5 + 1/2).
So a(5) is 10, the denominator of 17/10 = 1 + 1/5 + 1/2.

Mathematica

f[n_] := Plus @@ (1/# &) /@ ContinuedFraction[Prime[n + 1]/Prime[n]]; Table[Denominator[f[n]], {n, 64}] (* Ray Chandler, Sep 07 2005 *)

Crossrefs

Cf. A071866, A110021, A109374, A112323, A112768.

Sequence in context: A090447 A241186 A258222 * A061531 A368093 A368116

Adjacent sequences: A112321 A112322 A112323 * A112325 A112326 A112327

Keyword

nonn,frac

Author

Leroy Quet, Sep 03 2005

Extensions

Extended by Ray Chandler, Sep 07 2005

Status

approved