DSolve[-2*a*x*y[x] + (6*n + a*x^2)*Derivative[1][y][x] - 2*(1 + n)*x*Derivative[2][y][x] + x^2*Derivative[3][y][x] == 0,y[x],x]