A218534 Denominators of the ratios of consecutive terms in A176352.

2, 3, 1, 4, 1, 5, 1, 6, 3, 1, 5, 2, 5, 7, 2, 3, 1, 8, 1, 7, 3, 7, 2, 9, 4, 5, 3, 4, 2, 10, 3, 5, 9, 6, 1, 11, 1, 8, 1, 12, 7, 5, 8, 1, 9, 7, 4, 10, 5, 7, 9, 4, 11, 6, 3, 13, 1, 5, 14, 3, 11, 2, 1, 15, 11, 2, 13, 1, 13, 4, 13, 3, 16, 7, 9, 4, 11, 6, 7, 8, 1

Offset: 1

Author

Reinhard Zumkeller, Nov 10 2012

Keywords

• nonn
• frac

Comments

a(n) = denominator of A176352(n) / A176352(n+1).

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A218533 (numerator).

Programs

Haskell

import Data.Ratio ((%), denominator)
a218534 n = a176352 (n + 1) `div` a218535 n
a218534_list = map denominator $ zipWith (%) a176352_list $ tail a176352_list

Formula

a(n) = A176352(n+1) / A218535(n).