<?xml version="1.0" encoding="UTF-8"?><!DOCTYPE article  PUBLIC "-//NLM//DTD Journal Publishing DTD v3.0 20080202//EN" "http://dtd.nlm.nih.gov/publishing/3.0/journalpublishing3.dtd"><article xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:xlink="http://www.w3.org/1999/xlink" dtd-version="3.0" xml:lang="en" article-type="research article"><front><journal-meta><journal-id journal-id-type="publisher-id">AJCM</journal-id><journal-title-group><journal-title>American Journal of Computational Mathematics</journal-title></journal-title-group><issn pub-type="epub">2161-1203</issn><publisher><publisher-name>Scientific Research Publishing</publisher-name></publisher></journal-meta><article-meta><article-id pub-id-type="doi">10.4236/ajcm.2018.83021</article-id><article-id pub-id-type="publisher-id">AJCM-87598</article-id><article-categories><subj-group subj-group-type="heading"><subject>Articles</subject></subj-group><subj-group subj-group-type="Discipline-v2"><subject>Physics&amp;Mathematics</subject></subj-group></article-categories><title-group><article-title>
 
 
  Sinusoidal Time-Dependent Power Series Solution to Modified Duffing Equation
 
</article-title></title-group><contrib-group><contrib contrib-type="author" xlink:type="simple"><name name-style="western"><surname>Haiduke</surname><given-names>Sarafian</given-names></name><xref ref-type="aff" rid="aff1"><sub>1</sub></xref></contrib></contrib-group><aff id="aff1"><label>1</label><addr-line>The Pennsylvania State University, University College, York, PA, USA</addr-line></aff><pub-date pub-type="epub"><day>31</day><month>08</month><year>2018</year></pub-date><volume>08</volume><issue>03</issue><fpage>259</fpage><lpage>268</lpage><history><date date-type="received"><day>1,</day>	<month>September</month>	<year>2018</year></date><date date-type="rev-recd"><day>26,</day>	<month>September</month>	<year>2018</year>	</date><date date-type="accepted"><day>29,</day>	<month>September</month>	<year>2018</year></date></history><permissions><copyright-statement>&#169; Copyright  2014 by authors and Scientific Research Publishing Inc. </copyright-statement><copyright-year>2014</copyright-year><license><license-p>This work is licensed under the Creative Commons Attribution International License (CC BY). http://creativecommons.org/licenses/by/4.0/</license-p></license></permissions><abstract><p>
 
 
  Duffing equation,
  <inline-formula><inline-graphic xlink:href="dit_16964a74-24d2-4f65-8106-cf43b797afc6.png" xlink:type="simple"/></inline-formula>,
   has a standard well-known ex-act solution [1]. Approximate solutions to this equation also are available [2]. Reference [3] [4] introduces a sinusoidal time-dependent Power Series solution. Applying this method successfully we investigate the approximate solution of the modified Duffing equations,<inline-formula><inline-graphic xlink:href="dit_de5185f1-70ec-41cc-9b60-ddab23bb1f67.png" xlink:type="simple"/></inline-formula>
  , for n = 4 and 5. Symbolic manipulative utilities of a Computer Algebra System (CAS) specifically 
  Mathematica
   [5] extensively is used investigating the results.
 
</p></abstract><kwd-group><kwd>Duffing Equation</kwd><kwd> Modified Duffing Equation</kwd><kwd> Nonlinear Quartic and Quintic Terms</kwd><kwd> &lt;i&gt;Mathematica&lt;/i&gt;</kwd></kwd-group></article-meta></front><body><sec id="s1"><title>1. Introduction</title><p>There are numerous scientific and engineering phenomena encountering oscillations. The simplest oscillations are described by a generic linear differential equation, ξ &#168; ( t ) + ξ ( t ) = 0 , where ξ(t) is the time-dependent quantity of interest. For instance, ξ(t) could describe the oscillation of the electric charge, q(t), in an LC series electric circuit, or it may describe oscillating coordinate, x(t), of a particle under the influence of a linear force. This equation modifies if one includes retarding, ξ ˙ ( t ) , term and external forces, f(t), resulting, ξ &#168; ( t ) + ξ ˙ ( t ) + ξ ( t ) = f ( t ) , preserving its linearity. Motivation of considering Duffing type equation stems from the fact that the nonlinearity implicitly is embedded in the former equation. For instance, for a mechanical system one might encounter an equation such as, θ &#168; ( t ) + sin [ θ ( t ) ] = 0 . Replacing the second term with its approximate form</p><p>yields, θ &#168; ( t ) + θ ( t ) − 1 6 θ 3 ( t ) ≃ 0 . Meaning Duffing equation is implicit to</p><p>oscillating motion. As in another instance a nonlinear force may result an equation of motion, x &#168; ( t ) + x ( t ) + ϵ x 3 ( t ) = 0 . Solving these ODEs is a prime interest. Aside searching for their exact solutions [<xref ref-type="bibr" rid="scirp.87598-ref1">1</xref>] various approximation methods have been sought for [<xref ref-type="bibr" rid="scirp.87598-ref2">2</xref>] . Method introduced in [<xref ref-type="bibr" rid="scirp.87598-ref3">3</xref>] [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] is the most updated approximation solution of the Duffing equation.</p><p>It is one of the objectives of our investigation to examine the validity of the method [<xref ref-type="bibr" rid="scirp.87598-ref3">3</xref>] [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] solving modified Duffing equation. Modified Duffing equations are the ones that replace the cubic term with either quartic or quintic term.</p><p>With these motivations we craft this note; it is composed of four sections. Aside the Introduction, in Section 2 first we brief on the exact and Power Series solution of Duffing equation. Section 3 is the results. Section 4 is the conclusions embodying suggestions for extensions and modifications.</p></sec><sec id="s2"><title>2. A Brief Review of Exact and Power Series Solution of Duffing Equation</title><p>To establish the basis, we begin with the standard Duffing equation,</p><p>x &#168; ( t ) + x ( t ) + ϵ x 3 ( t ) = 0 , (1)</p><p>Its exact solution with two initial conditions, x ( 0 ) = a 1 and x ˙ ( 0 ) = 0 , is [<xref ref-type="bibr" rid="scirp.87598-ref1">1</xref>] ,</p><p>x ( t ) = a 1 c n [ u , k ] , (2)</p><p>where, u = a 2 t , with a<sub>2</sub> and k subject to,</p><p>a 2 = 1 + a 1 2 ϵ and k = a 1 2 ϵ 2 ( 1 + a 1 2 ϵ ) , (3)</p><p>In Equation (2), c n [ ζ , m ] , is the Jacobi elliptic function, c n [ ζ , m ] = cos φ , with φ = F − 1 [ F [ φ , m ] , m ] , where, F [ φ , m ] is subject to [<xref ref-type="bibr" rid="scirp.87598-ref6">6</xref>] [<xref ref-type="bibr" rid="scirp.87598-ref7">7</xref>] ,</p><p>F [ φ , m ] = ∫ 0 φ d ϑ 1 − m 2 sin 2 ϑ , (4)</p><p>As one expects Duffing equation describes oscillations. The severity of deviation of the oscillations given by Duffing equation from the corresponding linear case (ϵ = 0) depends on the value of ϵ. The value of ϵ implicitly impacts the period</p><p>of the oscillations given by, T = 4 a 2 F [ π 2 , k ] .</p><p>Having established the fundamentals now we cross-examine the accuracy of the Power Series approximation Method outlined in [<xref ref-type="bibr" rid="scirp.87598-ref3">3</xref>] [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] .</p><p>The fundamental underlying concept of the approximation method proposed in [<xref ref-type="bibr" rid="scirp.87598-ref3">3</xref>] stems from the fact that the Duffing equation describes oscillations. As such, it is intuitive to proposing an approximation solution composed of oscillating functions―e.g. a polynomial composed of sinusoidal functions. The proposed approach resembles the Fourier method―with two structural differences. 1) The solution is a polynomial in contrast to the Fourier method that is composed of sinusoidal orthogonal linear-basis, and 2) the frequencies of the sinusoidal functions of the polynomial are the same. The absence of dissipative term, <inline-formula><inline-graphic xlink:href="/html.scirp.org/file/7-1100710x23.png" xlink:type="simple"/></inline-formula> x ˙ ( t ) , in Duffing equation warrants the conservativeness of energy of the system leading to a unique value for the frequency of the polynomial. As is true in general, the accuracy of the series method is being controlled by the order of the polynomial―for the case on hand the order depends implicitly to the coefficient of the nonlinear term, ϵ.</p><p>As is outlined in [<xref ref-type="bibr" rid="scirp.87598-ref3">3</xref>] [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] a Power Series solves the Equation (1),</p><p>x ( t ) = ∑ n = 1 N   a [ n ] [ sin ( ω t ) ] n − 1 , (5)</p><p>A change of variable, τ = sin ( ω t ) , replaces t, t ≥ 0 , with − 1 ≤ τ ≤ + 1 yielding Equation (1),</p><p>ω 2 ( 1 − τ 2 ) d 2 d τ 2 x ( τ ) − ω 2 τ d d τ x ( τ ) + x ( τ ) + ϵ x 3 ( τ ) = 0 , (6)</p><p>Noticing significant changes; e.g. Equation (6) gained a dissipative term with a τ-dependent coefficient.</p><p>Realizing, x ( τ ) = ∑ n = 1 N   a [ n ] τ n − 1 and x 3 ( τ ) = ∑ n = 1 N   b [ n ] τ n − 1 , Equation (6) yields the recurrence relationship between the coefficients,</p><p>a [ n + 2 ] = a [ n ] [ ω 2 ( n − 1 ) 2 − 1 ] − ϵ b [ n ] ω 2 n ( n + 1 ) , for n = 1 , 2 , 3 , ⋯ (7)</p><p>For the chosen initial conditions, x [ t = 0 ] = A = a [ 1 ] and x ˙ [ t = 0 ] = 0 = a [ 2 ] , Equation (7) gives the remaining coefficients yielding the solution of Equation (5). Because of the second initial condition all the even expansion coefficients are zero limiting the polynomial to even powers of the base only. More on this in Conclusion section.</p><p>The lack of dissipative term in Duffing equation signifies the conservation of energy. The energy of the system, E = T + V , stays constant. The T and V for a point-like particle of mass m under the action of a nonlinear force, F = k ϵ x 3 , respectively are,</p><p>T = 1 2 m x ˙ 2 ( t ) and V = 1 2 k x 2 ( t ) + 1 4 k ϵ x 4 ( t ) , (8)</p><p>Equation (8) for the generic case, m = k = 1 is associated with the Lagrangian, L ( x , x ˙ ) = T − V . Applying Euler-Lagrange equation, d d t ∂ L ∂ x ˙ − ∂ L ∂ x = 0 , yields the equation of motion, Equation (1).</p><p>Utilizing the time independence of energy and implied initial conditions yields an equation conducive the needed, ω, in Equation (5).</p><p>The maximum potential energy occurs at t=0 when the particle is at maximum distance from the equilibrium, i.e. V max ( t = 0 ) = 1 2 A 2 + 1 4 ϵ A 4 . The maximum kinetic energy occurs when the particle passes the equilibrium, T max = 1 2 ω 2 ( 1 − τ 2 ) [ d d τ x ( τ ) ] 2 , at τ = &#177; 1 2 . Equating these two gives the ω.</p><p>T max = V max , (9)</p><p>With these outlines we craft a Mathematica program leading the quantity of interest. For objectively chosen numeric values for initial displacement, A, stiffness, ϵ, we investigate the accuracy of the Power Series Method vs. the exact solution; these are given in Sect. 3.</p></sec><sec id="s3"><title>3. Results</title><sec id="s3_1"><title>3.1. Solutions of Duffing Equation: Power Series, Exact, and Numeric</title><p>For the chosen value of A and ϵ the number of terms, N, in Equation (5) ought to be determined warrants the convergence of series. To compare our CAS approach to [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] we set the values of { A , ϵ } = { 1.0 , 2.0 } . By trial and error and the CPU run-time limitations, we set N = 28. As we pointed out because other than the first term only the even powers of sin(ωt) are contributing, evaluation of x(t), Equation (5), requires determination of fourteen expansion coefficients. Recursive relationship between the coefficients, Equation (7), makes the symbolic expressions massive. For instance, a [<xref ref-type="bibr" rid="scirp.87598-ref7">7</xref>] , is,</p><p>30 ω 2 a [ 7 ] = ( − 1 + 16 ω 2 ) ( − 3 A 2 ϵ ( − A − A 3 ϵ ) 2 ω 2 + ( − A − A 3 ϵ ) ( − 1 + 4 ω 2 ) 2 ω 2 ) 12 ω 2   − ϵ ( 3 A ( − A − A 3 ϵ ) 2 4 ω 4 + A 2 ( − 3 A 2 ϵ ( − A − A 3 ϵ ) 2 ω 2 + ( − A − A 3 ϵ ) ( − 1 + 4 ω 2 ) 2 ω 2 ) 4 ω 2 ) (10)</p><p>Evaluation of the kinetic energy, Equation (8), calls for T ∼ [ d d τ x ( τ ) ] 2 , i.e.,</p><p>169 symbolic expressions are to be called upon. Each term is a complicated ω-dependent, one of these terms is the squared of Equation (10)! Justifiably we suppressed writing it down. Display of the kinetic and potential energies vs. ω and their intersection is shown in <xref ref-type="fig" rid="fig1"><xref ref-type="fig" rid="fig">Figure </xref>1</xref>. <xref ref-type="fig" rid="fig1"><xref ref-type="fig" rid="fig">Figure </xref>1</xref> helps guesstimating the abscissa of the intersection.</p><p>Applying the FindRoot utility of Mathematica at about the guesstimated abscissa gives the exact root value of Equation (9), ω = 0.7992207. Reference [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] uses eighty terms, e.g. N = 80 evaluating ω. In our case, N = 28, yields an acceptable value.</p><p>To further our investigation, we compare the expansion coefficients of our approach vs. [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] . Utilizing the recurrence relationship between the coefficients given by Equation (7) along with the initial conditions outlined in the text we tabulate the first fourteen expansion coefficients of the series in Equation (5). <xref ref-type="table" rid="table1">Table 1</xref> is our values that ought to be compared to the “corrected notations” of <xref ref-type="table" rid="table2">Table 2</xref> [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] .</p><p>Having the values of expansion coefficients and ω we plot the t-dependent position x(t) given by Equation (5). This is shown in <xref ref-type="fig" rid="fig2"><xref ref-type="fig" rid="fig">Figure </xref>2</xref> in Black.</p><p>Duffing equation, Equation (1) as discussed has an exact solution [<xref ref-type="bibr" rid="scirp.87598-ref1">1</xref>] . The</p><table-wrap id="table1" ><label><xref ref-type="table" rid="table1">Table 1</xref></label><caption><title> The first fourteen expansion coefficients of Equation (5) for { A , ϵ } = { 1.0 , 2.0 } with N = 28</title></caption><table><tbody><thead><tr><th align="center" valign="middle" >n</th><th align="center" valign="middle" >1</th><th align="center" valign="middle" >3</th><th align="center" valign="middle" >5</th><th align="center" valign="middle" >7</th><th align="center" valign="middle" >9</th><th align="center" valign="middle" >11</th><th align="center" valign="middle" >13</th><th align="center" valign="middle" >15</th><th align="center" valign="middle" >17</th><th align="center" valign="middle" >19</th><th align="center" valign="middle" >21</th><th align="center" valign="middle" >23</th><th align="center" valign="middle" >25</th><th align="center" valign="middle" >27</th></tr></thead><tr><td align="center" valign="middle" >a[n]</td><td align="center" valign="middle" >1.</td><td align="center" valign="middle" >−2.3482</td><td align="center" valign="middle" >1.3617</td><td align="center" valign="middle" >−1.4977</td><td align="center" valign="middle" >1.1270</td><td align="center" valign="middle" >−1.0472</td><td align="center" valign="middle" >0.8581</td><td align="center" valign="middle" >−0.7593</td><td align="center" valign="middle" >0.6390</td><td align="center" valign="middle" >−0.5568</td><td align="center" valign="middle" >0.4727</td><td align="center" valign="middle" >−0.4099</td><td align="center" valign="middle" >0.3489</td><td align="center" valign="middle" >−0.3021</td></tr></tbody></table></table-wrap><p>solution may be expressed in terms of the built in Mathematica library JacobiCN function,</p><p>x ( t ) = A J a c o b i C N [ 1 + ϵ A 2 t , ( ϵ A 2 2 ( 1 + ϵ A 2 ) ) 2 ] . <xref ref-type="fig" rid="fig2"><xref ref-type="fig" rid="fig">Figure </xref>2</xref> displays this function</p><p>in Green. Although our numeric computation applying Power Series includes “only” 14-terms its accuracy is as close as the exact solution. We further our investigation applying Mathematica NDSolve solving Equation (1) numerically. NDSolve uses one of the common numeric methods of Implicit Runge Kutta or StiffnessSwitching which is a combination of the explicit and implicit methods solving the equation. The numeric solution perfectly matches the exact solution. The Green curve is the exact solution, it indistinguishably overlaps with the numeric solution. The black curve is the Power Series solution.</p><p>Despite the fact that the number of terms in Equation (5) is limited to fourteen the agreement between the exact/numeric and approximate results are quite acceptable. As shown in <xref ref-type="fig" rid="fig2"><xref ref-type="fig" rid="fig">Figure </xref>2</xref>, within the long range of the t-axis the positive amplitude of the approximated method overlaps the exact amplitude and overestimates the negative ones. This can be rectified if a greater number of terms could be included in Equation (5). On the other hand, the period of all three methods is in very good agreements.</p><p>As shown in <xref ref-type="fig" rid="fig2"><xref ref-type="fig" rid="fig">Figure </xref>2</xref>, the oscillation has a period of about four. Applying the value of ω the period is ( 2 π ) / ( 2 &#215; 0.799227 ) = 3.92 . For the exact solution as pointed out in Sect. 2 the period is, T = 4 3 K [ 1 3 ] = 4 , where K [ m ] = ∫ 0 π 2 1 1 − m 2 sin 2 ϑ d ϑ ; these two are in good agreement.</p></sec><sec id="s3_2"><title>3.2. Nonlinear Quartic Term</title><p>In this subsection we investigate the validity of the Power Series Method for a modified Duffing equation by replacing the ϵx<sup>3</sup>(t) with ϵx<sup>4</sup>(t). Being practical for the case on hand we consider { x [ 0 ] , ϵ } = { 0.5 , 0.5 } . By trial and error, we set the number of the terms, N, in Equation (5) to 20. Based on what we have discussed the non-zero terms limits the contributing terms to eleven. For the quartic term</p><p>the maximum potential energy is, V max ( t = 0 ) = 1 2 A 2 + 1 5 ϵ A 5 . Plotting the kinetic</p><p>and potential energies vs. ω their intersection abscissa according to Equation (9) yields ω. This is shown in <xref ref-type="fig" rid="fig3"><xref ref-type="fig" rid="fig">Figure </xref>3</xref>.</p><p><xref ref-type="fig" rid="fig3"><xref ref-type="fig" rid="fig">Figure </xref>3</xref> assists evaluating the exact abscissa of the intersection; ω = 0.510225. Utilizing ω, we tabulate the expansion coefficients; these are given in <xref ref-type="table" rid="table2">Table 2</xref>.</p><p>Numeric values of <xref ref-type="table" rid="table2">Table 2</xref> are based on utilizing the recurrence relationship between the coefficients given by Equation (7).</p><p>Plot of Equation (5) is shown in <xref ref-type="fig" rid="fig4"><xref ref-type="fig" rid="fig">Figure </xref>4</xref> (Black). Applying NDSolve of Mathematica, as in the previous section we display the numeric solution in Green. For chosen parameters the results are in good agreement; noting analytic solution for the case on hand is not available.</p><table-wrap id="table2" ><label><xref ref-type="table" rid="table2">Table 2</xref></label><caption><title> The first ten expansion coefficients of Equation (5) for { A , ϵ } = { 0.5 , 0.5 } with N = 20</title></caption><table><tbody><thead><tr><th align="center" valign="middle" >n</th><th align="center" valign="middle" >1</th><th align="center" valign="middle" >3</th><th align="center" valign="middle" >5</th><th align="center" valign="middle" >7</th><th align="center" valign="middle" >9</th><th align="center" valign="middle" >11</th><th align="center" valign="middle" >13</th><th align="center" valign="middle" >15</th><th align="center" valign="middle" >17</th><th align="center" valign="middle" >19</th></tr></thead><tr><td align="center" valign="middle" >a[n]</td><td align="center" valign="middle" >0.5</td><td align="center" valign="middle" >−1.0203</td><td align="center" valign="middle" >0.0681</td><td align="center" valign="middle" >−0.0745</td><td align="center" valign="middle" >0.0384</td><td align="center" valign="middle" >−0.0119</td><td align="center" valign="middle" >0.0047</td><td align="center" valign="middle" >−0.0037</td><td align="center" valign="middle" >0.0001</td><td align="center" valign="middle" >−0.0012</td></tr></tbody></table></table-wrap><p><xref ref-type="fig" rid="fig4"><xref ref-type="fig" rid="fig">Figure </xref>4</xref> compares the numeric solution vs. the Power Series Method. <xref ref-type="fig" rid="fig">Figure </xref>caption indicates the parameters. As shown plots are acceptably comparable. The accuracy of the Power Series Method could have been increased had we could include a greater number of terms. More on this in Conclusion section.</p></sec><sec id="s3_3"><title>3.3. Nonlinear Quintic Term</title><p>In this subsection similar to Sect. 3.2 we investigate the validity of the Power Series Method for solving a modified Duffing equation with ϵx<sup>5</sup>(t). We consider, { A , ϵ } = { 0.5 , 0.5 } . With trial and error, we set the number of the terms, N, in Equation (5) to 20. The maximum potential energy for the case on hand is</p><p>V max ( t = 0 ) = 1 2 A 2 + 1 6 ϵ A 6 . We skip displaying the kinetic and potential energies</p><p>vs. ω as is similar to <xref ref-type="fig" rid="fig1"><xref ref-type="fig" rid="fig">Figure </xref>1</xref> and <xref ref-type="fig" rid="fig3"><xref ref-type="fig" rid="fig">Figure </xref>3</xref>. Suffices noting the intersection of these two curves yields, ω = 0.506614.</p><p>The numeric solution is the output of NDSolve. The equation on hand likewise to the previous case, Sect. 3.2, has no exact solution.</p><p><xref ref-type="fig" rid="fig">Figure </xref>5 compares the numeric solution vs. the Power Series Method. <xref ref-type="fig" rid="fig">Figure </xref>caption indicates the parameters. As shown oscillations are acceptably comparable. The accuracy of the Power Series Method would increase if a greater number of terms could be included. More on this in Conclusion section.</p></sec></sec><sec id="s4"><title>4. Conclusions and Suggestions</title><p>We applied a Computer Algebra System (CAS), Mathematica examining its applicability to solving Duffing equation utilizing the Power Series Method. We have shown with Mathematica we are able producing the numeric results of [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] .</p><p>Moreover, we extend the calculation to symbolic domain; this is not included in [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] . Applying Mathematica we then successfully explore its applicability to solving modified Duffing equations embodying nonlinear quartic and quintic terms.</p><p>For Duffing equation computation power of a laptop with a double processor prevents increasing the number of the terms evaluating Equation (5) to achieve accuracies beyond what is reported. Equation (7) is a recursive relationship between the expansion coefficients embodying b[n]. In general we write</p><p>{ ∑ n = 1 N   a [ n ] τ n − 1 } m = ∑ n = 1 N   b [ n ] τ n − 1 , for m = 2 , 3 , 4 , ⋯ ; for Duffing case, m = 3. We</p><p>notice replacing N = 28 with 30 drastically increases the number of b[n] greatly elongating the computation run-time crashing the computer. Number of terms in [<xref ref-type="bibr" rid="scirp.87598-ref4">4</xref>] is eighty, this is not achievable for our symbolic calculation approach.</p><p>Extension of the current investigation. A curious reader may inquire: “What are the implications to numeric and symbolic solutions of the Duffing, modified Duffing equations embodying quartic and quintic terms if the second initial condition is replaced with, x ˙ [ t = 0 ] ≠ 0 ?” Quantification of the answer would require accessibility to a much more powerful computer as it would encounter lengthy symbolic calculation.</p><p>A note to the readers: Figures and calculations in this article are carried out utilizing Mathematica resources [<xref ref-type="bibr" rid="scirp.87598-ref5">5</xref>] [<xref ref-type="bibr" rid="scirp.87598-ref8">8</xref>] . Readers may also find [<xref ref-type="bibr" rid="scirp.87598-ref9">9</xref>] resourceful addressing related issues.</p></sec><sec id="s5"><title>Acknowledgements</title><p>Motivation of this investigation stems from the questions that the author put to the presenter of “Power Series solution for strongly non-linear conservative oscillators” at “6<sup>th</sup> International Physics Conference”, Athens/Greece, July 2018. One of the questions was “...has the Power Series Method been tested for nonlinear terms higher than three?” the answer was negative. The author initiated the investigation crafting this note. The author thanks Professor Mazen I. Qaisi for private communications and appreciates the support staff of Wolfram Research Inc. for consulting the issues concerning the numeric algorithm used in NDSolve.</p></sec><sec id="s6"><title>Conflicts of Interest</title><p>The authors declare no conflicts of interest regarding the publication of this paper.</p></sec><sec id="s7"><title>Cite this paper</title><p>Sarafian, H. (2018) Sinusoidal Time-Dependent Power Series Solution to Modified Duffing Equation. American Journal of Computational Mathematics, 8, 259-268. https://doi.org/10.4236/ajcm.2018.83021</p></sec></body><back><ref-list><title>References</title><ref id="scirp.87598-ref1"><label>1</label><mixed-citation publication-type="other" xlink:type="simple">Salas, A. and Castillo, J. (2014) Exact Solution to Duffing Equation and the Pendulum Equation. Exact Mathematical Sciences, 8, 8781-8789.</mixed-citation></ref><ref id="scirp.87598-ref2"><label>2</label><mixed-citation publication-type="other" xlink:type="simple">Rand, R. (2005) Lecture Notes on Nonlinear Vibrations. http://www.tam.cornell.edu/randdocs/</mixed-citation></ref><ref id="scirp.87598-ref3"><label>3</label><mixed-citation publication-type="other" xlink:type="simple">Qaisi, I. (1996) A Power Series Approach for the Study of Periodic Motion. Journal of Sound and Vibration, 196, 401-406. https://doi.org/10.1006/jsvi.1996.0491</mixed-citation></ref><ref id="scirp.87598-ref4"><label>4</label><mixed-citation publication-type="other" xlink:type="simple">Qaisi, I. (2018) Presented Note at “6th International Physics Conference”. 6th International Physics Conference, Athens, July 2018.</mixed-citation></ref><ref id="scirp.87598-ref5"><label>5</label><mixed-citation publication-type="other" xlink:type="simple">Wolfram, S. (1996) Mathematica Book. 3rd Edition, Cambridge University Press, Cambridge.</mixed-citation></ref><ref id="scirp.87598-ref6"><label>6</label><mixed-citation publication-type="other" xlink:type="simple">Mathworld. http://mathworld.wolfram.com/JacobiEllipticFunctions.html</mixed-citation></ref><ref id="scirp.87598-ref7"><label>7</label><mixed-citation publication-type="other" xlink:type="simple">Abramowitz, M. and Stegun, I. (1970) Handbook of Mathematical Functions with Formulas, Graphs, and Mathematical Tables. Dover Publications, Inc., New York.</mixed-citation></ref><ref id="scirp.87598-ref8"><label>8</label><mixed-citation publication-type="other" xlink:type="simple">Sarafian, H. (2015) Mathematica Graphics Example Book for Beginners. Scientific Research Publishing, Wuhan.</mixed-citation></ref><ref id="scirp.87598-ref9"><label>9</label><mixed-citation publication-type="other" xlink:type="simple">Sarafian, H. (2013) Linear, Cubic and Quintic Coordinate-Dependent Forces and Kinematic Characteristics of a Spring-Mass System. World Journal of Mechanics, 3, 265-269. https://doi.org/10.4236/wjm.2013.36027</mixed-citation></ref></ref-list></back></article>