Re: Extracting Terms From a List
- To: mathgroup at smc.vnet.net
- Subject: [mg44193] Re: [mg44183] Extracting Terms From a List
- From: Andrzej Kozlowski <akoz at mimuw.edu.pl>
- Date: Sun, 26 Oct 2003 00:41:47 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
On Saturday, October 25, 2003, at 07:26 PM, Bruce W. Colletti wrote:
>
> How would I cull integers and squared terms from {3, Sqrt[2], (x+y)^2,
> x+y^2}? The desired output is {3, (x+y)^2, y^2}. Unfortunately:
>
> Cases[{3, Sqrt[2], (x+y)^2, x+y^2}, _Integer | _^2]
>
> returns {3, (x+y)^2} .
>
> Thankx.
>
> Bruce
>
>
>
Probably you either have to use a rather elaborate pattern or apply
Cases twice:
Join[Cases[{3, Sqrt[2], (x + y)^2, x + y^2}, _Integer],
Cases[{3, Sqrt[2], (x + y)^2, x + y^2}, _^2, {1, 2}]]
{3, (x + y)^2, y^2}
Andrzej Kozlowski
Yokohama, Japan
http://www.mimuw.edu.pl/~akoz/