Expressing a decimal as a fraction in lowest terms

Question

How can I express a decimal such as 0.1845095405274387 as a fraction in its lowest terms?

Mr.Wizard · Answer 1 · 2012-06-20 01:25:20Z

up vote 6 down vote

A couple of bits of code for your consideration:

FromDigits@#/10^(Length@# - #2) & @@ RealDigits[0.1845095405274387]

Rationalize[0.1845095405274387, $MachineEpsilon]

answered Jun 20 '12 at 1:25

Mr.Wizard♦
60.4k791264

@Mr.Wizard...I Thank you – emmett Jun 20 '12 at 2:08

Simon Woods · Answer 2 · 2012-06-21 21:21:47Z

up vote 6 down vote

Another option:

RootApproximant[0.1845095405274387, 1]

answered Jun 21 '12 at 21:21

Simon Woods
18.8k32578

J. M. · Answer 3 · 2012-06-21 23:05:07Z

up vote 6 down vote

Still another possibility:

Last[Convergents[0.1845095405274387]]

answered Jun 21 '12 at 23:05

J. M.♦
27.4k658130

1

+1 for referencing a non-esoteric function I cannot recall using. – Mr.Wizard♦ Jun 22 '12 at 2:02

I deal with continued fractions somewhat frequently, you see... – J. M.♦ Jun 22 '12 at 2:04

3 Answers