i'm trying to see if a quartic equation I obtained can be factored into simpler forms, such as the product of two quadratics. The problem is that their coefficients are some complex expressions in terms of several parameters. I wonder how to do this factorization. Or is there any better way to see how the solutions look at? Maybe looking at the formulas for the closed-form solutions of a quadratic equation?
Here is a simplified version of the equation:
a1*t^4 + a2*t^3 + a3*t^2 + a4*t + a5
One of the coefficients is shown below to demonstrate their complexity:
The expression is attached below:
1/4 (n . Subscript[f, 1])^2 -
3/4 (Subscript[v, 3] . Subscript[f, 1])^2 +
t (n . Subscript[f, 1] Subscript[v, 2] . Subscript[f, 1] +
n . Subscript[f, 1] Subscript[v, 2] . Subscript[v, 3] Subscript[v,
3] . Subscript[f, 1]) +
t^3 (-n . Subscript[f, 1] Subscript[v, 2] . Subscript[f, 1] +
2 n . Subscript[f, 1] Subscript[v, 2] . Subscript[f,
1] (Subscript[v, 2] . Subscript[v, 3])^2 +
n . Subscript[f, 1] Subscript[v, 2] . Subscript[v, 3] Subscript[v,
3] . Subscript[f, 1]) +
t^2 (-(1/2) (n . Subscript[f, 1])^2 + (Subscript[v, 2] . Subscript[f,
1])^2 -
Subscript[v, 2] . Subscript[f, 1] Subscript[v, 2] . Subscript[v,
3] Subscript[v, 3] . Subscript[f, 1] -
1/2 (Subscript[v, 3] . Subscript[f, 1])^2) +
t^4 (1/4 (n . Subscript[f, 1])^2 - (n . Subscript[f,
1])^2 (Subscript[v, 2] . Subscript[v, 3])^2 + (Subscript[v,
2] . Subscript[f, 1])^2 (Subscript[v, 2] . Subscript[v, 3])^2 -
Subscript[v, 2] . Subscript[f, 1] Subscript[v, 2] . Subscript[v,
3] Subscript[v, 3] . Subscript[f, 1] +
1/4 (Subscript[v, 3] . Subscript[f, 1])^2)
where the dot represents inner product of two three-dimensional vectors, and $n$ is normal to $v_2$ and $v_3$; moreover, $f_1$ is a vector that is not normal to $n$.
Notice that all the vectors involved are unit vectors. An numerical example can be produced using the following code:
nNum = Normalize[RandomReal[{-1, 1}, 3]]
v2Num = Normalize[Cross[RandomReal[{-1, 1}, 3], nNum]]
v3Num = Normalize[Cross[RandomReal[{-1, 1}, 3], nNum]]
f1Num = RandomReal[{-1, 1}, 3]
{n, Subscript[v, 2], Subscript[v, 3], Subscript[f, 1]} = {nNum, v2Num,
v3Num, f1Num}
Here is an example of the vectors::
{n, Subscript[v, 2], Subscript[v, 3], Subscript[f, 1]}={{-0.159132, -0.385389, -0.908929}, {-0.808778,
0.578873, -0.103846}, {-0.87546, 0.480643, -0.0505222}, {-0.471107,
0.714036, 0.725794}}
However, I'm not trying to see whether it can be factored for a given set of these values; instead, I want to see if the factorization is possible regardless of their specific values.