Re: (presumably) easy AspectRatio question

• To: mathgroup at smc.vnet.net
• Subject: [mg58389] Re: [mg58375] (presumably) easy AspectRatio question
• From: "David Park" <djmp at earthlink.net>
• Date: Thu, 30 Jun 2005 04:37:24 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Just use the AspectRatio option in both of your Show statements.

Show[Graphics[Line[bLRot]],
AspectRatio -> Automatic];

David Park

From: dbsearch04 at yahoo.com [mailto:dbsearch04 at yahoo.com]
To: mathgroup at smc.vnet.net

I have a small program that draws a rectangle around the plot of my
data. I want to rotate my plot, so I used the Geometry`Rotations`
package. I cannot get my plot to look like a simple rotation. I have
tried lots of different AspectRatios and ImageSizes to no avail.

When I run the small program below, the bounding rectangle prints
correctly, but the rotated lines are skew (almost like 3D).

I am guessing this is a simple problem, but it is currently beyond me.
The relevant portion of the program is:

In[1] = bL = {{0, -1.76}, {1., -1.76}, {1., 1.76}, {0, 1.76}};
In[2] = Show[Graphics[Line[bL]]];
In[3] = << Geometry`Rotations`
Out[3] = {{-0.88, -1.5242}, {-0.0139746, -2.0242}, {1.74603, 1.0242},
{0.88, 1.5242}}
In[4] = Show[Graphics[Line[bLRot]]];

Any help is appreciated.

Regards..

```

• Prev by Date: Mathematica 5.1.1 on Fedora Core 4?
• Next by Date: Periodic function Roots
• Previous by thread: Re: (presumably) easy AspectRatio question
• Next by thread: Re: (presumably) easy AspectRatio question