In[]:=
eq2=a
3
a0
-a0w-a1bwλμ+
(3a
2
a0
a1-a1w-a1bw
2
λ
-2a1bwμ)
′
ψ
[ξ]
ψ[ξ]
+
3aa0
2
a1
2
′
ψ
[ξ]
2
ψ[ξ]
-
3a1bwλ
2
′
ψ
[ξ]
2
ψ[ξ]
+
a
3
a1
3
′
ψ
[ξ]
3
ψ[ξ]
-
2a1bw
3
′
ψ
[ξ]
3
ψ[ξ]
​​CoefficientListeq2,
′
ψ
[ξ]
ψ[ξ]
​​(*
0
′
ψ
[ξ]
ψ[ξ]
=a
3
a0
-a0w-a1bwλμ;​​
1
′
ψ
[ξ]
ψ[ξ]
=3a
2
a0
a1-a1w-a1bw
2
λ
-2a1bwμ;​​
2
′
ψ
[ξ]
ψ[ξ]
=3aa0
2
a1
-3a1bwλ;​​
1
′
ψ
[ξ]
ψ[ξ]
=a
3
a1
-2a1bw;*)​​SeriesCoefficient%,
′
ψ
[ξ]
ψ[ξ]
,0,3
Out[]=
a
3
a0
-a0w-a1bwλμ+
(3a
2
a0
a1-a1w-a1bw
2
λ
-2a1bwμ)
′
ψ
[ξ]
ψ[ξ]
+
3aa0
2
a1
2
′
ψ
[ξ]
2
ψ[ξ]
-
3a1bwλ
2
′
ψ
[ξ]
2
ψ[ξ]
+
a
3
a1
3
′
ψ
[ξ]
3
ψ[ξ]
-
2a1bw
3
′
ψ
[ξ]
3
ψ[ξ]
Out[]=
a
3
a0
-a0w-a1bwλμ+
3a
2
a0
a1
′
ψ
[ξ]
ψ[ξ]
-
a1w
′
ψ
[ξ]
ψ[ξ]
-
a1bw
2
λ
′
ψ
[ξ]
ψ[ξ]
-
2a1bwμ
′
ψ
[ξ]
ψ[ξ]
+
3aa0
2
a1
2
′
ψ
[ξ]
2
ψ[ξ]
-
3a1bwλ
2
′
ψ
[ξ]
2
ψ[ξ]
+
a
3
a1
3
′
ψ
[ξ]
3
ψ[ξ]
-
2a1bw
3
′
ψ
[ξ]
3
ψ[ξ]

Out[]=
{0}