|
|
comp.soft-sys.math.mathematica |
> temp = Piecewise[{ > I want to either solve this via > N -> Piecewise[{ > or just get mathematica to realise that there is a common term - N, > Is this type of operation possible, or am I stuck editing them by hand? In[1]:= temp = Piecewise[{{2*n*x, x < 0}, {n*x, x >= 0}}]; Out[2]= (x > 0 && n == 1/x) || (x < 0 && n == 1/(2 x)) In[3]:= Reduce[1 == n*Piecewise[{{2*x, x < 0}, {x, x >= 0}}], n] Out[3]= (x > 0 && n == 1/x) || (x < 0 && n == 1/(2 x)) *Solve* does /not/ know what to do with *Piecewise*. In[4]:= Solve[1 == n*Piecewise[{{2*x, x < 0}, {x, x >= 0}}], n] Out[4]= {{n -> 1/\[Piecewise] { (Also, note that I have replaced capital N by n because N has already a Regards, misno...@gmail.com wrote: Use *Reduce* for it knows how to handle correctly expressions with
> I've been battling to try to get a solution to my equation, but it
> requires solving of a piecewise function, which I cannot work out how
> to do. Say I have a piecewise function of the form
> { 2*N*x, x < 0},
> { N*x, x >= 0}
> }]
> Solve[1==temp, N]
> and either get, with the inequalities,
> {1/(2*x), x < 0},
> {1/x, x >= 0}
> }]
> and factor it out to, say,
> N * Piecewise[{
> {2*x, x < 0},
> {x, x >= 0}
> }]
> from where solve can handle it perfectly well.
*Piecewise*.
Reduce[1 == temp, n]
{2 x, x < 0},
{x, x >= 0}
}}}
built-in meaning.)
Jean-Marc