login
A120032
Denominators associated with A120031.
2
1, 2, 3, 9, 63, 7, 77, 539, 2695, 24255, 92169, 48279, 370139, 370139, 1427679, 4283037, 132774147, 4023459, 3129357, 59457783, 2318853537, 48695924277, 190356794901, 486467364747, 7621322047703, 155537184647, 610184339769
OFFSET
0,2
MATHEMATICA
a[0] = 1; a[n_] := a[n] = a[n - 1] If[OddQ[n], (2 n - 1)/(2 n), (2 n)/(2 n - 1)]; A120032[n_] := Denominator[a[n]]; Array[A120032, 26] (* JungHwan Min, Nov 08 2016 *)
CROSSREFS
Cf. A120031.
Sequence in context: A226967 A181273 A270394 * A126884 A054544 A269993
KEYWORD
nonn,frac
AUTHOR
Mihai Cipu (mihai.cipu(AT)imar.ro), Jun 05 2006
EXTENSIONS
More terms from Matthew Conroy, Jun 26 2006
STATUS
approved