Re: Problem with simultaneous equations with several variables - population genetics

• To: mathgroup at smc.vnet.net
• Subject: [mg9049] Re: [mg8686] Problem with simultaneous equations with several variables - population genetics
• From: Paul Abbott <paul at physics.uwa.edu.au>
• Date: Thu, 9 Oct 1997 01:42:28 -0400
• Organization: University of Western Australia
• Sender: owner-wri-mathgroup at wolfram.com

```Richard Anderson wrote:

>         The solution, courtesy of Daniel Lichtblau at Wolfram, involves getting
> rid of denominators to prevent Solve from generating extra variables to
> handle them. We subtract one side from the other, use Together to get
> numerator / denominator, and set it to zero. This code does this:
>
> eqs={pfs==pf,pms==pm};
> polys=Map[#[[1]]-#[[2]]&,eqs];

Using Subtract is a bit neater:

polys = Apply[Subtract,eqs,1]

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                     mailto:paul at physics.uwa.edu.au
AUSTRALIA                             http://www.pd.uwa.edu.au/~paul

God IS a weakly left-handed dice player
____________________________________________________________________

```

• Prev by Date: Mathematica 3.0.0 bug in LerchPhi function
• Next by Date: Re: Useful Dumb User Questions
• Previous by thread: Re: Problem with simultaneous equations with several variables - population genetics
• Next by thread: automated notebook creation?