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

Re: Mathematica for High School Students

• To: mathgroup at smc.vnet.net
• Subject: [mg24456] Re: Mathematica for High School Students
• From: Paul Abbott <paul at physics.uwa.edu.au>
• Date: Tue, 18 Jul 2000 00:58:59 -0400 (EDT)
• Organization: University of Western Australia
• References: <8jc6f4$da5@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

In article <8jc6f4$da5 at smc.vnet.net>, "Ersek, Ted R" 
<ErsekTR at navair.navy.mil> wrote:

> Out[4]=
> y == (b*(-3*x + 6*(x - y)))/4
> 
> 
> In[5]:=
> Factor[Map[Expand,%]]
> 
> Out[5]=
> y == (3*b*(x - 2*y))/4
> 
> 
> If Expand has the Listable attribute (and it normally doesn't) Map isn't
> needed in the last line above.

Surely, 

   In[5]:= Factor[%]

suffices?  It works for me.  Also, you could use ExpandAll instead of 
Expand.

Cheers,
   Paul

-- 
Paul Abbott                                   Phone: +61-8-9380-2734
Department of Physics                           Fax: +61-8-9380-1014
The University of Western Australia                
Nedlands WA  6907                      
AUSTRALIA                             http://physics.uwa.edu.au/~paul