Re: basic questions
- To: mathgroup at smc.vnet.net
 - Subject: [mg87372] Re: basic questions
 - From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
 - Date: Wed, 9 Apr 2008 05:52:39 -0400 (EDT)
 - Organization: The Open University, Milton Keynes, UK
 - References: <ftfeeq$bqp$1@smc.vnet.net>
 
markus.mooslechner at chello.at wrote:
<snip>
> - and number three: how can i tell mathematica to do the following: take an irrational number such as PI. now create a list according to the following rule: 3.14159265 ....->
> x,y,z
> 3,1,4
> 1,5,9
> 2,6,5
> ..,.,.
Hi Markus,
The following examples should be of interest. First, we build a list of 
points pts that contains triple made of the first twenty-four digits of 
pi. Then we use several built-in functions to visualize and interact 
with the list (or dynamically build a new list).
pts = Partition[First@RealDigits[Pi, 10, 24], 3]
ListPlot3D[pts]
ListContourPlot@pts
Manipulate[
  ListContourPlot@Partition[First@RealDigits[Pi, 10, n], 3], {n, 9,
   192, 3}]
Animate[ListContourPlot@Partition[First@RealDigits[Pi, 10, n], 3], {n,
    9, 192, 3}]
Animate[ListDensityPlot[Partition[First@RealDigits[Pi, 10, n], 3],
   ColorFunction -> "SunsetColors"], {n, 9, 384, 3}]
Regards,
-- Jean-Marc