Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1996
*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 1996

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

Search the Archive

Re: patterns

  • To: mathgroup at smc.vnet.net
  • Subject: [mg3733] Re: [mg3727] patterns
  • From: Robert Pratt <rpratt at math.unc.edu>
  • Date: Sun, 14 Apr 1996 02:59:35 -0400
  • Sender: owner-wri-mathgroup at wolfram.com

Use the following command:

Select[list, Denominator[#]==r &]

Mma will return a sublist whose members all have denominator r.

Rob Pratt
Department of Mathematics
The University of North Carolina at Chapel Hill
CB# 3250, 331 Phillips Hall
Chapel Hill, NC  27599-3250

rpratt at math.unc.edu

On Thu, 11 Apr 1996, Susan Rempe wrote:

> 
> 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] ====


  • Prev by Date: mathematica plots and TeX fonts
  • Next by Date: MLput/getlist also Enter
  • Previous by thread: patterns
  • Next by thread: Re: patterns