Timeline for Solving a second order non-linear D.E using series
Current License: CC BY-SA 3.0
7 events
| when toggle format | what | by | license | comment | |
|---|---|---|---|---|---|
| Mar 19, 2018 at 15:30 | vote | accept | CommunityBot | moved from User.Id=49048 by developer User.Id=86366 | |
| Mar 15, 2018 at 22:40 | answer | added | user49048 | timeline score: 2 | |
| Mar 15, 2018 at 17:36 | answer | added | Nasser | timeline score: 2 | |
| Mar 15, 2018 at 16:11 | comment | added | user49048 | Thanks for taking the time to answer, however in your code as in the first bit of mine there are unevaluated derivatives. | |
| Mar 15, 2018 at 16:07 | comment | added | Mariusz Iwaniuk | Try:findSeriesSolution[t_, nTerms_] := Module[{pt = 0}, {ic = {u[0] -> \[Pi]/2, u'[0] -> m}}; ode = Sin[ u[t]]^2 (3 Cos[u[t]] (1 + t^2 u'[t]^2) + t Sin[u[t]] (3 u'[t] + 4 t^2 u'[t]^3 - t u''[t])); s0 = Series[ode, {t, pt, nTerms}]; s0 = s0 /. ic; roots = Solve@LogicalExpand[s0 == 0]; s1 = Series[u[t], {t, pt, nTerms + 2}]; sol = Normal[s1] /. ic /. roots[[1]]]; seriesSol = findSeriesSolution[z, 5] | |
| Mar 15, 2018 at 15:54 | history | edited | user49048 | CC BY-SA 3.0 | I edited some useful info regarding the original post. |
| Mar 15, 2018 at 15:26 | history | asked | user49048 | CC BY-SA 3.0 |