Re: flat box under RealTime3D

• To: mathgroup at smc.vnet.net
• Subject: [mg28993] Re: flat box under RealTime3D
• From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
• Date: Thu, 24 May 2001 04:07:12 -0400 (EDT)
• Organization: Universitaet Leipzig
• References: <9e2cb3\$66l@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Hi,

it would be nice, if it would the only bug in
RealTime3D :-).

You should use a scaling by hand ! Sicnd RealTime3D`
don't label the axes  you can scale it simpliy by

Show[ gr /. Point[pnt_]:> Point[{1,1,100}*pnt]]

Regards
Jens

> Hallo,
>
> I want to show some scattered {x,y,z} data in a 3-dimensional plot using
> << Graphics`Graphics3D`
>
> This my data:
> dat = Flatten[ Table[{x, y, 3 + Cos[x y/10000.]}, {x, -100, 100, 10}, {y,
> -100, 100, 10}], 1];
>
> The z-range in list dat is very small compared to x- and y-range. To
> scretch the z-scale in my plot I use BoxRatios -> {1, 1, 1}:
>
> ScatterPlot3D[dat, BoxRatios -> {1, 1, 1}]
>
> produces a nice image in a cube.
>
> I want to spin it around with the mouse. So I load:
>
> << RealTime3D`
>
> and do
>
> ScatterPlot3D[dat, BoxRatios -> {1, 1, 1}]
>
> Instead of a cube I get graphics in a flat box with box ratios (100,100,1}
> which doesn't show any structure in the z direction.
>
> This seems a bug in RealTime3D. Has anyone seem the same problem?
> How can I fix this? I am using Mathematica 4.1 under Windows NT4.
>