61.8.6 problem 15

Internal problem ID [12087]
Book : Handbook of exact solutions for ordinary differential equations. By Polyanin and Zaitsev. Second edition
Section : Chapter 1, section 1.2. Riccati Equation. subsection 1.2.5-2
Problem number : 15
Date solved : Sunday, March 30, 2025 at 10:39:42 PM
CAS classification : [[_1st_order, `_with_symmetry_[F(x),G(x)]`], _Riccati]

\begin{align*} y^{\prime }&=a \ln \left (x \right )^{k} \left (y-b \,x^{n}-c \right )^{2}+b n \,x^{n -1} \end{align*}

Maple. Time used: 0.007 (sec). Leaf size: 24
ode:=diff(y(x),x) = a*ln(x)^k*(y(x)-b*x^n-c)^2+b*n*x^(n-1); 
dsolve(ode,y(x), singsol=all);
 
\[ y = b \,x^{n}+c +\frac {1}{c_1 -a \int \ln \left (x \right )^{k}d x} \]
Mathematica. Time used: 0.848 (sec). Leaf size: 44
ode=D[y[x],x]==a*(Log[x])^k*(y[x]-b*x^n-c)^2+b*n*x^(n-1); 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 
\begin{align*} y(x)\to \frac {1}{-\int _1^xa \log ^k(K[2])dK[2]+c_1}+b x^n+c \\ y(x)\to b x^n+c \\ \end{align*}
Sympy
from sympy import * 
x = symbols("x") 
a = symbols("a") 
b = symbols("b") 
c = symbols("c") 
k = symbols("k") 
n = symbols("n") 
y = Function("y") 
ode = Eq(-a*(-b*x**n - c + y(x))**2*log(x)**k - b*n*x**(n - 1) + Derivative(y(x), x),0) 
ics = {} 
dsolve(ode,func=y(x),ics=ics)
 
Timed Out