       Re: Is there a simple way to transform 1.1 to 11/10?

• To: mathgroup at smc.vnet.net
• Subject: [mg92976] Re: [mg92968] Is there a simple way to transform 1.1 to 11/10?
• From: Jan Schmedes <jasch at crustal.ucsb.edu>
• Date: Wed, 22 Oct 2008 05:35:42 -0400 (EDT)
• References: <200810211024.GAA04964@smc.vnet.net>

```If you use something like
rational[x_] = Round[Round[(x - Floor[x])^-1]*x]/Round[(x -
Floor[x])^-1]

you get for
rational[1.0000001]
10000001/10000000

but for rational[1.0000000000001] you get
10007999171935/10007999171934

because 1.0000000000001-1 gives 9.99201*10^(-14) ...

Cheers

Jan
On Oct 21, 2008, at 3:24 AM, Alain Cochard wrote:

>
>
> The obvious
>
>    In:= x=1.1`Infinity
>
> is not syntactically correct.
>
> I understand that SetPrecision[1.1,Infinity] does not work either:
>
>    In:= SetPrecision[1.1,Infinity]
>
>            2476979795053773
>    Out= ----------------
>            2251799813685248
>
>    In:= N[%,20]
>
>    Out= 1.1000000000000000888
>
> I searched the newsgroup and thought I had the solution with
> Rationalize:
>
>    In:= Rationalize[1.1,0]
>
>            11
>    Out= --
>            10
>
> But
>
>    In:= Rationalize[1.000000001,0]
>
>            999999918
>    Out= ---------
>            999999917
>
>    In:= N[%,20]
>
>    Out= 1.0000000010000000830
>
> So any simple way?
>
> Thanks,
> Alain
>

```

• Prev by Date: Re: Executing an external notebook within another notebook
• Next by Date: Controlling the order of evaluations
• Previous by thread: Re: Is there a simple way to transform 1.1 to 11/10?
• Next by thread: Re: Is there a simple way to transform 1.1 to 11/10?