Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Perpendicular lines do not appear perpendicular

  • To: mathgroup at smc.vnet.net
  • Subject: [mg100300] Perpendicular lines do not appear perpendicular
  • From: Bill <WDWNORWALK at aol.com>
  • Date: Sun, 31 May 2009 06:36:06 -0400 (EDT)

Perpendicular lines do not appear perpendicular

Hi:

I have taken the line equation 2*x+4*y-6==0, and rotated it 90 degrees counterclockwise about {0,0}, 
using a 3x3 rotation matrix.
Here's the Mathematica 6.0.1 code that I used:

rMat = {{Cos[90 Degree], - Sin[90 Degree], 0}, {Sin[90 Degree], 
Cos[90 Degree], 0}, {0, 0, 1}}

l={2, 4, -6}

rMat.l

Output: {-4,2,-6}

Placing these numbers into the general form of the equation of the line Ax+By+c=0, I get -4*x + 2*y - 6 == 0. 
Placing the 2 perpendicular line equations into ContourPlot:

ContourPlot[{2*x + 4*y - 6 == 0, -4*x + 2*y - 6 == 0}, {x, -4, 
  4}, {y, -4, 4}, AspectRatio -> 1]
  
and plotting, I notice that on my pc screen that the lines do not look perpendicular, as does the plot frame. 
Perhaps this is just my computer screen, a HP f2105. I can hold up a square cut piece of paper to the lines 
on the screen, and notice the out-of-square condition. I used AspectRatio->1, but still no joy.

Question: Can someone suggest a remedy for my problem, if one exists?


Thanks in advance,

Bill

PS. Mathematica 6.0.1 on a pc with Win XP.


  • Prev by Date: Re: String as a variable name
  • Next by Date: Re: Problems with V7
  • Previous by thread: Indexed Slot in a Rule - How to do it??