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
> ScatterPlot3D. So I load:
> << 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.
>
> Thanks for your help,
>
> Maarten van der Burgt
> ICOS Vision Systems
> R&D Department
> Esperantolaan 9
> B-3001 Leuven, Belgium