$$\text{Apart}\left[\frac{1}{x^4+1}\right]$$
Does nothing. How can I get it to expand it. Sometimes it is useful.
Mathematica Stack Exchange is a question and answer site for users of Wolfram Mathematica. It only takes a minute to sign up.
Sign up to join this communityI found by trial and error that Extension-> Sqrt[I] does the job.
ExpToTrig[Apart[Factor[1/(1 + x^4), Extension -> Sqrt[I]]]]
$$\frac{\frac{1}{4}+\frac{i}{4}}{\sqrt{2} \left(-x+\frac{1+i}{\sqrt{2}}\right)}+\frac{\frac{1}{4}+\frac{i}{4}}{\sqrt{2} \left(x+\frac{1+i}{\sqrt{2}}\right)}-\frac{\frac{1}{4}-\frac{i}{4}}{\sqrt{2} \left(-x-\frac{1-i}{\sqrt{2}}\right)}-\frac{\frac{1}{4}-\frac{i}{4}}{\sqrt{2} \left(x-\frac{1-i}{\sqrt{2}}\right)}$$
Here ExpToTrig is not really required but it does the final beautifying.
ExpToTrig[Apart[Factor[1/(1 + x^4), Extension -> (x /. Solve[1 + x^4 == 0, x])]]]
?
$\endgroup$
Apart[Factor[1/(1 + x^4), Extension -> All]]
works and so does Apart[Factor[1/(2 + x^4), Extension -> All]]
(in V13 but maybe it didn't back then).
$\endgroup$
May 5, 2022 at 13:37
There's an internal function:
Integrate`ComplexApart[1/(1 + x^4), x]
(*
-((-1)^(1/4)/(4 (-(-1)^(1/4) + x))) +
(-1)^(1/4)/(4 ((-1)^(1/4) + x)) -
(-1)^(3/4)/(4 (-(-1)^(3/4) + x)) +
(-1)^(3/4)/(4 ((-1)^(3/4) + x))
*)
parfrac
and fullparfrac
for using complex domain. screen shot !Mathematica graphics It looks like fullparfrac
is like ComplexApart
you show.
$\endgroup$
ComplexApart
would be among them.
$\endgroup$
May 5, 2022 at 13:33
Apart@Factor[1/(1 + x^2), Extension -> {(-1)^(1/2), I}]
? $\endgroup$