Simplifying vector expressions

• To: mathgroup at smc.vnet.net
• Subject: [mg2140] Simplifying vector expressions
• From: shenkin at still3.chem.columbia.edu (Peter Shenkin)
• Date: Wed, 4 Oct 1995 01:57:42 -0400
• Organization: MacroModel Development Group, Chemistry, Columbia U., NY, NY

```Consider the following vectors:

In[2]:= vec1 = { a, b, c }

Out[2]= {a, b, c}

In[3]:= vec2 = (1/x) * vec1

a  b  c
Out[3]= {-, -, -}
x  x  x

I am looking for a mechanism I can apply to vec2 to put it in the form:

1
(-) { a, b, c }
x

or

{ a, b, c }
-----------
x

This would be the list equivalent of Factor[], as shown by the
following example:

In[4]:= expr = a/x + b/x + c/x

a   b   c
Out[4]= - + - + -
x   x   x

In[5]:= Factor[ expr ]

a + b + c
Out[5]= ---------
x

Does this facility (for lists) exist in Mathematica, or in a package I
can obtain easily?  If not, can you suggest guidelines for implementing
of algebraic functionality:  Simplify[], Expand[], etc., in addition
to Factor[].

Thanks,
-P.

--
******** When somebody says, "It's a matter of principle,"... ********
*Peter S. Shenkin, Box 768 Havemeyer Hall, Chemistry, Columbia Univ.,*
*NY, NY  10027;  shenkin at columbia.edu;  (212)854-5143;  FAX: 678-9039*
************ ...it's a sure sign he wants the whole pie. *************

```

• Prev by Date: Re: Converting table to a number?
• Next by Date: RE:MmaToHTML_for_Macs
• Previous by thread: Re: Converting table to a number?
• Next by thread: Re: Simplifying vector expressions