Re: Factor MatrixForm
- To: mathgroup at smc.vnet.net
- Subject: [mg21388] Re: Factor MatrixForm
- From: "Allan Hayes" <hay at haystack.demon.co.uk>
- Date: Sat, 1 Jan 2000 20:54:46 -0500 (EST)
- References: <84jp64$e31@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Robert,
Unfortunately, If we do achieve the form that you want then Mathematica will
immediately take the multiplication inside, partly because Times has the
attribute Listable.
H *
{{(Cos[a] - Sin[a]) Sin[b]},
{-k (w Sin[a] + 5 Sin[b])},
{-2 Cos[2 a]}
}
{{H (Cos[a] - Sin[a]) Sin[b]}, {-H k (w Sin[a] + 5 Sin[b])}, {-2 H Cos[2
a]}}
Allan
---------------------
Allan Hayes
Mathematica Training and Consulting
Leicester UK
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565
"Robert B. Love " <rlove at antispam.neosoft.com> wrote in message
news:84jp64$e31 at smc.vnet.net...
> I'm not sure what operation I want to perform on my list. Factor
> almost does what I want. What I have is, after many operations,
> a list in MatrixForm, something like this:
>
> MatrixForm[t]
>
> [ Cos[a]Sin[b]H - Sin[a]Sin[b]H ]
> [ -Sin[a]k*w*H - 5*Sin[b]*k*H ]
> [ -2Cos[2a]H ]
>
> What manipulation do I perform to get it to look like
>
> [ Cos[a]Sin[b] - Sin[a]Sin[b] ]
> H*[ -Sin[a]k*w - 5*Sin[b]*k ]
> [ -2Cos[2a] ]
>
>
>
> --
> ----------------------------------------------------------------
> Bob Love
> rlove at neosoft.com
> ----------------------------------------------------------------
>
>