Re: Common factors in a list
- To: mathgroup at smc.vnet.net
- Subject: [mg58349] Re: Common factors in a list
- From: dh <dh at metrohm.ch>
- Date: Tue, 28 Jun 2005 21:56:46 -0400 (EDT)
- References: <d9r50q$568$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi John,
you could try to create a polynomial in a new variable, say z, from your
vector by:
v={a x, a y, a z};
pol=Table[z^i,{i,Length[v]}] . v
now you could extract a common factor by:
com= FactorTerms[pol,z][[1]]
the residual vector you get from:
v/com
sincerely, Daniel
John Reed wrote:
> I'm working with a list (vector) that's composed of functions such as
> complex exponentials and Bessel functions. Some of the functions are common
> to each element of the list. I'm trying to find a way to do the following:
>
> {a x, a y, a z}-> a *{x, y, z}
>
> In this expression, a, x, y, z are polynomials, exponentials and/or Bessel
> functions.
>
> So far I haven't had any luck with this. Does anyone have a simple
> solution?
>
> John Reed
>