Re: Re: Simplify

• To: mathgroup at smc.vnet.net
• Subject: [mg91130] Re: [mg91122] Re: Simplify
• From: Murray Eisenberg <murray at math.umass.edu>
• Date: Thu, 7 Aug 2008 04:38:20 -0400 (EDT)
• Organization: Mathematics & Statistics, Univ. of Mass./Amherst
• References: <g791is\$9ng\$1@smc.vnet.net> <200808060909.FAA22573@smc.vnet.net>

```David,

My naive expectation would be that the following would work:

v = {2 cet1,0,-2 cet1,cet1,0,-cet1};

FactorOut[cet1][v]
cet1 {2,0,-2,1,0,-1}

But of course that will NOT work as things stand right now.  I need to

FactorOut[cet1,HoldForm][v]

Moreover, I was initially mislead into thinking FactorOut[cet1][v] would
work, in view of the example in the documentation:

step1=5(x-1)(x-3)(x-7)x^2//Expand
step1 // FactorOut[x^2]

Murray

David Park wrote:
> list = {{2 cet1, 0, -2 cet1, cet1, 0, -cet1}};
>
> cet1 MatrixForm[list/cet1]
> cet1 (2 0 -2 1 0 -1)
>
> Or using the Presentations package:
>
> Needs["Presentations`Master`"]
>
> list // FactorOut[cet1, MatrixForm]
> cet1 (2 0 -2 1 0 -1)
>

--
Murray Eisenberg                     murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower      phone 413 549-1020 (H)
University of Massachusetts                413 545-2859 (W)
710 North Pleasant Street            fax   413 545-1801
Amherst, MA 01003-9305

```

• References:
• Prev by Date: Re: Re: Derivative of Dot[]
• Next by Date: Re: Find count of binary number pattern within concatenated
• Previous by thread: Re: Re: Simplify
• Next by thread: Re: Simplify