MathGroup Archive 2001

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Filled Ellipsoid

  • To: mathgroup at smc.vnet.net
  • Subject: [mg27534] Re: [mg27505] Filled Ellipsoid
  • From: Tomas Garza <tgarza01 at prodigy.net.mx>
  • Date: Sat, 3 Mar 2001 03:40:15 -0500 (EST)
  • References: <200103010853.DAA19886@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Well, there goes a very simple idea: once you have your ellipsoid plot, take
the plot points and construct the Polygon joining them, filled with the
color you like. I illustrate with the numerical data given in the Add-On
Statistics`MultiDescriptiveStatistics`:

In[1]:=
<< Statistics`MultiDescriptiveStatistics`;
In[2]:=
data = {{1232, 4175}, {1115, 6652}, {2205, 7612},
{1897, 10914}, {1932, 10850}, {1612, 7627}, {1598, 6954},
{1804, 8365}, {1752, 9469}, {2067, 6410}, {2365, 10327},
{1646, 7320}, {1579, 8196}, {1880, 9709}, {1773, 10370},
{1712, 7749}, {1932, 6818}, {1820, 9307}, {1900, 6457},
{2426, 10102}, {1558, 7414}, {1470, 7556}, {1858, 7833},
{1587, 8309}, {2208, 9559}, {1487, 6255}, {2206, 10723},
{2332, 5430}, {2540, 12090}, {2322, 10072}} // N;

In[3]:=
t = EllipsoidQuartiles[data];
In[4]:=
s = Show[Graphics[t[[1]]]];

In[4]:=
points = Cases[FullForm[s][[1, 1]], {x_, y_}, Infinity];

In[5]:=
Show[Graphics[{GrayLevel[0.8], Polygon[points]}]];

This gives you the ellipsoid filled with a nice soft gray color.

Tomas Garza
Mexico City

----- Original Message -----
From: "Boris Breznen" <bbreznen at vis.caltech.edu>
To: mathgroup at smc.vnet.net
Subject: [mg27534] [mg27505] Filled Ellipsoid


> Is there a siple way to plot filled ellipsoid in Mathematica ? The basic
> Ellipsoid function, included in
> the Statistics`MultiDescriptiveStatistics` package plots a contour. I
would
> like to
> fill it (simmilar to what Disc does with respect to Circle).
>
> Thank you,
>
> Boris Breznen
> bbreznen at vis.caltech.edu
>
>
>
>



  • Prev by Date: Re: Interpreting InputForm[]
  • Next by Date: Re: Large number of equations with large number of unknowns
  • Previous by thread: Filled Ellipsoid
  • Next by thread: Re: Filled Ellipsoid