Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2000
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2000

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

Search the Archive

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


  • Prev by Date: Re: get points from the polyhedron
  • Next by Date: RE: Problems with Legendre expansion
  • Previous by thread: Re: Wrong plot size
  • Next by thread: External programs, notebook interface