2.50 problem 49

Internal problem ID [7834]
Book : Own collection of miscellaneous problems
Section : section 2.0
Problem number : 49
Date solved : Tuesday, October 22, 2024 at 02:40:13 PM
CAS classification : [[_2nd_order, _with_linear_symmetries]]

Solve

\begin{align*} y^{\prime \prime }-\frac {y^{\prime }}{x}-x^{3} y-x^{4}-\frac {1}{x}&=0 \end{align*}

2.50.1 Solved as second order Bessel ode

Time used: 65.634 (sec)

Writing the ode as

\begin{align*} x^{2} y^{\prime \prime }-x y^{\prime }-x^{5} y = x^{2} \left (x^{4}+\frac {1}{x}\right )\tag {1} \end{align*}

Let the solution be

\begin{align*} y &= y_h + y_p \end{align*}

Where \(y_h\) is the solution to the homogeneous ODE and \(y_p\) is a particular solution to the non-homogeneous ODE. Bessel ode has the form

\begin{align*} x^{2} y^{\prime \prime }+x y^{\prime }+\left (-n^{2}+x^{2}\right ) y = 0\tag {2} \end{align*}

The generalized form of Bessel ode is given by Bowman (1958) as the following

\begin{align*} x^{2} y^{\prime \prime }+\left (1-2 \alpha \right ) x y^{\prime }+\left (\beta ^{2} \gamma ^{2} x^{2 \gamma }-n^{2} \gamma ^{2}+\alpha ^{2}\right ) y = 0\tag {3} \end{align*}

With the standard solution

\begin{align*} y&=x^{\alpha } \left (c_1 \operatorname {BesselJ}\left (n , \beta \,x^{\gamma }\right )+c_2 \operatorname {BesselY}\left (n , \beta \,x^{\gamma }\right )\right )\tag {4} \end{align*}

Comparing (3) to (1) and solving for \(\alpha ,\beta ,n,\gamma \) gives

\begin{align*} \alpha &= 1\\ \beta &= \frac {2 i}{5}\\ n &= {\frac {2}{5}}\\ \gamma &= {\frac {5}{2}} \end{align*}

Substituting all the above into (4) gives the solution as

\begin{align*} y = c_1 x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+c_2 x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \end{align*}

Therefore the homogeneous solution \(y_h\) is

\[ y_h = c_1 x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+c_2 x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \]

The particular solution \(y_p\) can be found using either the method of undetermined coefficients, or the method of variation of parameters. The method of variation of parameters will be used as it is more general and can be used when the coefficients of the ODE depend on \(x\) as well. Let

\begin{equation} \tag{1} y_p(x) = u_1 y_1 + u_2 y_2 \end{equation}

Where \(u_1,u_2\) to be determined, and \(y_1,y_2\) are the two basis solutions (the two linearly independent solutions of the homogeneous ODE) found earlier when solving the homogeneous ODE as

\begin{align*} y_1 &= x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \\ y_2 &= x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \\ \end{align*}

In the Variation of parameters \(u_1,u_2\) are found using

\begin{align*} \tag{2} u_1 &= -\int \frac {y_2 f(x)}{a W(x)} \\ \tag{3} u_2 &= \int \frac {y_1 f(x)}{a W(x)} \\ \end{align*}

Where \(W(x)\) is the Wronskian and \(a\) is the coefficient in front of \(y''\) in the given ODE. The Wronskian is given by \(W= \begin {vmatrix} y_1 & y_{2} \\ y_{1}^{\prime } & y_{2}^{\prime } \end {vmatrix} \). Hence

\[ W = \begin {vmatrix} x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) & x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \\ \frac {d}{dx}\left (x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right ) & \frac {d}{dx}\left (x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right ) \end {vmatrix} \]

Which gives

\[ W = \begin {vmatrix} x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) & x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \\ \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+i x^{{5}/{2}} \left (-\operatorname {BesselJ}\left (\frac {7}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\frac {i \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{x^{{5}/{2}}}\right ) & \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+i x^{{5}/{2}} \left (-\operatorname {BesselY}\left (\frac {7}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\frac {i \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{x^{{5}/{2}}}\right ) \end {vmatrix} \]

Therefore

\[ W = \left (x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )\left (\operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+i x^{{5}/{2}} \left (-\operatorname {BesselY}\left (\frac {7}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\frac {i \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{x^{{5}/{2}}}\right )\right ) - \left (x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )\left (\operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+i x^{{5}/{2}} \left (-\operatorname {BesselJ}\left (\frac {7}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\frac {i \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{x^{{5}/{2}}}\right )\right ) \]

Which simplifies to

\[ W = -i x^{{7}/{2}} \left (\operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {BesselY}\left (\frac {7}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {BesselJ}\left (\frac {7}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right ) \]

Which simplifies to

\[ W = \frac {5 x}{\pi } \]

Therefore Eq. (2) becomes

\[ u_1 = -\int \frac {x^{3} \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \left (x^{4}+\frac {1}{x}\right )}{\frac {5 x^{3}}{\pi }}\,dx \]

Which simplifies to

\[ u_1 = - \int \frac {\operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \left (x^{5}+1\right ) \pi }{5 x}d x \]

Hence

\[ u_1 = i \pi \left (-\frac {i \left (\frac {2 i x^{{5}/{2}} \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (\tan \left (\frac {3 \pi }{10}\right ) \operatorname {AngerJ}\left (\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\operatorname {WeberE}\left (\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )}{25}-\frac {2 i x^{{5}/{2}} \operatorname {BesselY}\left (-\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {LommelS1}\left (1, \frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{5}\right )}{2}+\frac {2 i \left (-\frac {16 i x^{{5}/{2}} \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {LommelS1}\left (-2, \frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{25}+\frac {i x^{{5}/{2}} \operatorname {BesselY}\left (-\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (\cot \left (\frac {\pi }{5}\right ) \operatorname {AngerJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+\operatorname {WeberE}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )}{2}\right )}{25}\right ) \]

And Eq. (3) becomes

\[ u_2 = \int \frac {x^{3} \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \left (x^{4}+\frac {1}{x}\right )}{\frac {5 x^{3}}{\pi }}\,dx \]

Which simplifies to

\[ u_2 = \int \frac {\operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \left (x^{5}+1\right ) \pi }{5 x}d x \]

Hence

\[ u_2 = -i \pi \left (-\frac {i \left (\frac {2 i x^{{5}/{2}} \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (\tan \left (\frac {3 \pi }{10}\right ) \operatorname {AngerJ}\left (\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\operatorname {WeberE}\left (\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )}{25}-\frac {2 i x^{{5}/{2}} \operatorname {BesselJ}\left (-\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {LommelS1}\left (1, \frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{5}\right )}{2}+\frac {2 i \left (-\frac {16 i x^{{5}/{2}} \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {LommelS1}\left (-2, \frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{25}+\frac {i x^{{5}/{2}} \operatorname {BesselJ}\left (-\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (\cot \left (\frac {\pi }{5}\right ) \operatorname {AngerJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+\operatorname {WeberE}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )}{2}\right )}{25}\right ) \]

Therefore the particular solution, from equation (1) is

\[ y_p(x) = i \pi \left (-\frac {i \left (\frac {2 i x^{{5}/{2}} \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (\tan \left (\frac {3 \pi }{10}\right ) \operatorname {AngerJ}\left (\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\operatorname {WeberE}\left (\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )}{25}-\frac {2 i x^{{5}/{2}} \operatorname {BesselY}\left (-\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {LommelS1}\left (1, \frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{5}\right )}{2}+\frac {2 i \left (-\frac {16 i x^{{5}/{2}} \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {LommelS1}\left (-2, \frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{25}+\frac {i x^{{5}/{2}} \operatorname {BesselY}\left (-\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (\cot \left (\frac {\pi }{5}\right ) \operatorname {AngerJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+\operatorname {WeberE}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )}{2}\right )}{25}\right ) x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-i x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (-\frac {i \left (\frac {2 i x^{{5}/{2}} \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (\tan \left (\frac {3 \pi }{10}\right ) \operatorname {AngerJ}\left (\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )-\operatorname {WeberE}\left (\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )}{25}-\frac {2 i x^{{5}/{2}} \operatorname {BesselJ}\left (-\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {LommelS1}\left (1, \frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{5}\right )}{2}+\frac {2 i \left (-\frac {16 i x^{{5}/{2}} \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \operatorname {LommelS1}\left (-2, \frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )}{25}+\frac {i x^{{5}/{2}} \operatorname {BesselJ}\left (-\frac {3}{5}, \frac {2 i x^{{5}/{2}}}{5}\right ) \pi \left (\cot \left (\frac {\pi }{5}\right ) \operatorname {AngerJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+\operatorname {WeberE}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )}{2}\right )}{25}\right ) \]

Which simplifies to

\[ y_p(x) = -\frac {\left (5 \operatorname {LommelS1}\left (1, \frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+\pi \left (\cot \left (\frac {\pi }{5}\right ) \operatorname {AngerJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+\operatorname {WeberE}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )\right ) x}{5} \]

Therefore the general solution is

\begin{align*} y &= y_h + y_p \\ &= \left (c_1 x \operatorname {BesselJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+c_2 x \operatorname {BesselY}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right ) + \left (-\frac {\left (5 \operatorname {LommelS1}\left (1, \frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+\pi \left (\cot \left (\frac {\pi }{5}\right ) \operatorname {AngerJ}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )+\operatorname {WeberE}\left (\frac {2}{5}, \frac {2 i x^{{5}/{2}}}{5}\right )\right )\right ) x}{5}\right ) \\ \end{align*}

Will add steps showing solving for IC soon.

2.50.2 Maple step by step solution

2.50.3 Maple trace

Methods for second order ODEs:
 

2.50.4 Maple dsolve solution

Solving time : 0.005 (sec)
Leaf size : 26

dsolve(diff(diff(y(x),x),x)-1/x*diff(y(x),x)-x^3*y(x)-x^4-1/x = 0, 
       y(x),singsol=all)
 

\[ y = x \left (-1+\operatorname {BesselI}\left (\frac {2}{5}, \frac {2 x^{{5}/{2}}}{5}\right ) c_2 +\operatorname {BesselK}\left (\frac {2}{5}, \frac {2 x^{{5}/{2}}}{5}\right ) c_1 \right ) \]

2.50.5 Mathematica DSolve solution

Solving time : 0.334 (sec)
Leaf size : 316

DSolve[{D[y[x],{x,2}]-1/x*D[y[x],x]-x^3*y[x]-x^4-1/x==0,{}}, 
       y[x],x,IncludeSingularSolutions->True]
 

\[ y(x)\to \frac {\frac {5 \left (x^{5/2}\right )^{13/5} \operatorname {Gamma}\left (\frac {4}{5}\right ) \operatorname {Gamma}\left (\frac {7}{5}\right ) \operatorname {BesselI}\left (\frac {2}{5},\frac {2 x^{5/2}}{5}\right ) \, _1F_2\left (\frac {4}{5};\frac {3}{5},\frac {9}{5};\frac {x^5}{25}\right )}{\operatorname {Gamma}\left (\frac {9}{5}\right )}-\frac {\sqrt [5]{5} \left (x^{5/2}\right )^{7/5} \operatorname {Gamma}\left (\frac {1}{5}\right ) \operatorname {Gamma}\left (\frac {3}{5}\right ) \operatorname {BesselI}\left (-\frac {2}{5},\frac {2 x^{5/2}}{5}\right ) \, _1F_2\left (\frac {1}{5};\frac {6}{5},\frac {7}{5};\frac {x^5}{25}\right )}{\operatorname {Gamma}\left (\frac {6}{5}\right )}+\frac {5 \left (x^{5/2}\right )^{3/5} \operatorname {Gamma}\left (-\frac {1}{5}\right ) \operatorname {Gamma}\left (\frac {7}{5}\right ) \operatorname {BesselI}\left (\frac {2}{5},\frac {2 x^{5/2}}{5}\right ) \, _1F_2\left (-\frac {1}{5};\frac {3}{5},\frac {4}{5};\frac {x^5}{25}\right )}{\operatorname {Gamma}\left (\frac {4}{5}\right )}+\sqrt [5]{5} x^{5/2} \left (-\frac {x^5 \left (x^{5/2}\right )^{2/5} \operatorname {Gamma}\left (\frac {3}{5}\right ) \operatorname {Gamma}\left (\frac {6}{5}\right ) \operatorname {BesselI}\left (-\frac {2}{5},\frac {2 x^{5/2}}{5}\right ) \, _1F_2\left (\frac {6}{5};\frac {7}{5},\frac {11}{5};\frac {x^5}{25}\right )}{\operatorname {Gamma}\left (\frac {11}{5}\right )}+10 \left (c_1 \operatorname {Gamma}\left (\frac {3}{5}\right ) \operatorname {BesselI}\left (-\frac {2}{5},\frac {2 x^{5/2}}{5}\right )+(-1)^{2/5} c_2 \operatorname {Gamma}\left (\frac {7}{5}\right ) \operatorname {BesselI}\left (\frac {2}{5},\frac {2 x^{5/2}}{5}\right )\right )\right )}{10\ 5^{3/5} x^{3/2}} \]