Aww... tricky send button.
Corrections:
digits_g =: 0j50 ": B - 1 NB. and
digits_g -: 52{.(#~ ' ' ~: ]) dw
Jan-Pieter
2014-02-24 11:32 GMT+01:00 Jan-Pieter Jacobs <[email protected]>:
> It seems they are the same as on this page:
> http://home.adelphi.edu/~stemkoski/mathematrix/constant.html
> Atleast for the fractional part.
>
> g=: 13 :'(+%)/y$1x' NB. removed the \ making things slower, only returning
> the last result
>
> ]B=: g 200
>
> digits_g =: 0j50 ": B
> NB. first 100 digits from the website, spliced for wrapping issues
> dw=:'0.6180339887 4989484820 4586834365 6381177203 0917980576'
> dw=: dw , '2862135448 6227052604 6281890244 9707207204 1893911374'
>
> NB. check whether first 52 characters match (52 due to '0.'), excluding
> spaces:
> dg -: 52{.(#~ ' '~:])dw
>
> 1
>
> Jan-Pieter
>
>
> 2014-02-24 11:10 GMT+01:00 Linda Alvord <[email protected]>:
>
> Ric, are these 50 digits correct. Is it doing the "long division" to get
>> the answer?
>>
>> Linda
>>
>> -----Original Message-----
>> From: [email protected]
>> [mailto:[email protected]] On Behalf Of Linda
>> Alvord
>> Sent: Monday, February 24, 2014 5:01 AM
>> To: [email protected]
>> Subject: Re: [Jprogramming] A Tale Without End
>>
>> Nice. This is all it takes in a fresh start in J:
>>
>> g=: 13 :'(+%)/\y$1x'
>>
>> ]B=:0{|.g 200
>>
>> 453973694165307953197296969697410619233826r280571172992510140037611932413038
>> 677189525
>>
>> 0j50 ": B
>> 1.61803398874989484820458683436563811772030917980576
>>
>> Is this the same j of complex numbers or is it the fact that 0j50 x: is
>> special code?
>>
>> Linda
>>
>>
>> -----Original Message-----
>> From: [email protected]
>> [mailto:[email protected]] On Behalf Of Don Guinn
>> Sent: Monday, February 24, 2014 12:59 AM
>> To: Programming forum
>> Subject: Re: [Jprogramming] A Tale Without End
>>
>> Use the inverse of x: to convert rational to real (floating point):
>>
>> [r=:x:^:_1 B
>>
>> 1.61803
>>
>> 3!:0 r
>>
>> 8
>>
>>
>> To display the value more accurately use format (":):
>>
>> 0j42":B
>>
>> 1.618033988749894848204586834365638117720309
>>
>>
>> On Sun, Feb 23, 2014 at 6:41 PM, Linda Alvord
>> <[email protected]>wrote:
>>
>> > I just saw that there are several other ways to get the golden ration.
>> > Before I look at them I don't know how to change the rational numbers A
>> > and B to decimals with many digits.
>> >
>> > g=: 13 :'(+%)/\y$1x'
>> > g
>> > [: (+ %)/\ 1x $~ ]
>> >
>> >
>> > A=:0{|. g 100
>> >
>> > A
>> > 573147844013817084101r354224848179261915075
>> >
>> >
>> > B=:0{|. g 200
>> > B
>> >
>> >
>>
>> 453973694165307953197296969697410619233826r280571172992510140037611932413038
>> > 677189525
>> >
>> > Linda
>> >
>> > -----Original Message-----
>> > From: [email protected]
>> > [mailto:[email protected]] On Behalf Of PMA
>> > Sent: Sunday, February 23, 2014 3:48 PM
>> > To: [email protected]
>> > Subject: Re: [Jprogramming] A Tale Without End
>> >
>> > My favorite..
>> >
>> > -:>:%:5
>> > 1.61803
>> >
>> >
>> > Nimp O wrote:
>> > > And also..
>> > >
>> > > (+ %:)/ 0,20$1
>> > > 1.61803
>> > >
>> > >> Date: Sun, 23 Feb 2014 20:11:11 +0000
>> > >> From: [email protected]
>> > >> To: [email protected]
>> > >> Subject: Re: [Jprogramming] A Tale Without End
>> > >>
>> > >> {.>{:p. 1 1 _1
>> > >> 1.61803
>> > > s.htm
>> > >
>> > > ----------------------------------------------------------------------
>> > > For information about J forums see
>> http://www.jsoftware.com/forums.htm
>> > >
>> >
>> > ----------------------------------------------------------------------
>> > For information about J forums see http://www.jsoftware.com/forums.htm
>> >
>> > ----------------------------------------------------------------------
>> > For information about J forums see http://www.jsoftware.com/forums.htm
>> >
>> ----------------------------------------------------------------------
>> For information about J forums see http://www.jsoftware.com/forums.htm
>>
>> ----------------------------------------------------------------------
>> For information about J forums see http://www.jsoftware.com/forums.htm
>>
>> ----------------------------------------------------------------------
>> For information about J forums see http://www.jsoftware.com/forums.htm
>>
>
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
