Re: extracting decimal digits of Pi
- To: mathgroup at smc.vnet.net
- Subject: [mg55847] Re: [mg55841] extracting decimal digits of Pi
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Thu, 7 Apr 2005 07:15:06 -0400 (EDT)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
n=500000;
dat=Drop[RealDigits[N[Pi,n]][[1]],1];
Short[dat]
{1,4,1,5,9,2,6,5,3,5,8,9,\[LeftSkeleton]499975\[RightSkeleton],6,0,2,5,1,3,8,\
1,9,5,2,4}
Bob Hanlon
>
> From: zak <chocolatez at gmail.com>
To: mathgroup at smc.vnet.net
> Date: 2005/04/07 Thu AM 05:11:03 EDT
> To: mathgroup at smc.vnet.net
> Subject: [mg55847] [mg55841] extracting decimal digits of Pi
>
> hi
> in my previous letter i mentioned extracting the first 100000 decimal
> digits of Pi, and to put it in a List.
> the following code is my version,:
> dat = IntegerDigits[ToExpression[StringDrop[ToString[N[Pi, 500000]], 2]]];
>
> i think it is consuming the memory of the computer.
> i hope there is another version.
>
> regards
> zak
>
>