patterns

*To*: mathgroup at smc.vnet.net*Subject*: [mg3727] patterns*From*: Susan Rempe <rempe at euclid.chem.washington.edu>*Date*: Thu, 11 Apr 1996 02:52:27 -0400*Sender*: owner-wri-mathgroup at wolfram.com

I have a list of numbers and symbols. How can I collect all the members of the list which have a common denominator? ex. list={Sin[theta]/r, Cos[theta]/(r*s), 2*Csc[theta]/(2*r)} Say I want to collect all members of the list with r in the denominator; i.e. answer=Sin[theta]/r; ******************************************** Susan Rempe * University of Washington * Department of Chemistry * Box 351700 * Seattle, WA 98195-1700 * * (206)685-2951 * rempe at u.washington.edu * ******************************************** ==== [MESSAGE SEPARATOR] ====