0
$\begingroup$

I have:

n = Cross[{-1, 2, 2}, {2, 0, -2}];
p = {1, -1, 1};
plane = ({x, y, z} - p).n == 0 // Expand

Which gives:

10 - 4 x + 2 y - 4 z == 0

I'd like to divide both sides by -2 to get:

-5 + 2x - y + 2z == 0

Easy way?

$\endgroup$
  • 1
    $\begingroup$ -#/2 & /@ plane // Expand. See here, for instance, and linked questions. $\endgroup$ – march Sep 24 '15 at 4:46
  • $\begingroup$ Yeah, that's the one I was looking for. $\endgroup$ – march Sep 24 '15 at 6:12
  • $\begingroup$ @march Interesting. Your technique work, but I had tried plane/2 // Expand and got 1/2 (10 - 4 x + 2 y - 4 z == 0). Curious as to why? $\endgroup$ – David Sep 24 '15 at 6:21
  • $\begingroup$ Arithmetical operations like Plus has the Attribute Listable, which means that it will automatically Map over Lists, but just as most functions, it doesn't automatically Map over anything else. The Head of an equation is Equal (look at the FullForm of your equation), and Plus[Equal[ ... ]] won't evaluate. In general, you have to force whatever function you are applying to the expression to move past the Equal. I don't think this is explained very well, but I'm a little tired. So it goes. $\endgroup$ – march Sep 24 '15 at 6:24

Browse other questions tagged or ask your own question.