[seqfan] Re: Converting from a decimal to the simplest fraction

[Harvey P. Dale]

	This Mathematica program will generate the first nn terms of the sequence:

nn=50; Numerator[With[{pidgs=N[Pi,nn]},Table[IntegerPart[pidgs 10^(n-1)]/10^n,{n,nn}]]]

	Best,

	Harvey

-----Original Message-----
From: seqfan-bounces at list.seqfan.eu [mailto:seqfan-bounces at list.seqfan.eu] On Behalf Of Eric Angelini
Sent: Wednesday, September 21, 2011 6:10 AM
To: Sequence Fanatics Discussion list
Subject: [seqfan] Converting from a decimal to the simplest fraction

Hello SeqFans,
Playing around with Georges Brougnard's
"Fractissimo" iPhone App I came to this
for the constant Pi:

       3 -->      3/1      -->      3
     3.1 -->     31/10     -->     31
    3.14 -->    157/50     -->    157
   3.141 -->   3141/1000   -->   3141
  3.1415 -->   6283/2000   -->   6283
 3.14159 --> 314159/100000 --> 314159
3.141592 --> 392699/125000 --> 392699
...

Would it be of interest for the OEIS
to enter the last (numerators) column
as a sequence?

If yes, what about e, phi, Champernowne,
etc.

Best,
É.







_______________________________________________

Seqfan Mailing list - http://list.seqfan.eu/