A324204 a(n) is the smallest denominator D of the fraction N/D with 1 <= D < 2^n which is closest to (3/2)^n.

1, 1, 3, 1, 5, 23, 35, 97, 203, 409, 205, 1297, 933, 311, 10819, 18239, 37611, 118535, 135251, 394609, 217989, 72663, 24221, 2788129, 4663029, 32000089, 11702925, 3900975, 1300325, 358347383, 596378755, 1232862847, 3274265813, 6818044999, 3453941395

Offset: 1

Author

David A. Corneth, Mar 14 2019

Keywords

• nonn
• frac

Comments

First 10000 terms are odd. Is that the general case?

Crossrefs

Cf. A215199.

Programs

Mathematica

a[n_] := Denominator[FromContinuedFraction[ContinuedFraction[(3/2)^n][[1 ;; -2]]]]; Array[a, 35] (* Amiram Eldar, Jul 10 2019 *)