## 0 Reputation

11 years, 214 days

## MaplePrimes Activity

### These are replies submitted by sanaz

hello,

i compute more terms of original function f(X),

`> with(numapprox);> f := (29/2)*x^2-(899/24)*x^4+(26941/720)*x^6-(808259/40320)*x^8+(24247799/3628800)*x^10-(727433999/479001600)*x^12+(1983910909/7925299200)*x^14;> e := pade(f, x, [5, 4]);> with(plots);> P := plot(f, x = 0 .. 1, y = 0 .. 2, style = point, color = "SteelBlue");> G := plot(e, x = 0 .. 1, y = 0 .. 2, style = line);> display(P, G);`

`excuse me i i have a request ,the following command give me 2 term of series but i want get more terms of higher order,  `
`> de := diff(x(t), `\$`(t, 2))+30*x(t)+.1*x(t)^3 = 29*cos(t);> dsolve({de, x(0) = 0, (D(x))(0) = 0}, x(t), series);`
`result is: x(t) = (29/2)*t^2-(899/24)*t^4+O(t^6)`
`please help me`

hello,

i compute more terms of original function f(X),

`> with(numapprox);> f := (29/2)*x^2-(899/24)*x^4+(26941/720)*x^6-(808259/40320)*x^8+(24247799/3628800)*x^10-(727433999/479001600)*x^12+(1983910909/7925299200)*x^14;> e := pade(f, x, [5, 4]);> with(plots);> P := plot(f, x = 0 .. 1, y = 0 .. 2, style = point, color = "SteelBlue");> G := plot(e, x = 0 .. 1, y = 0 .. 2, style = line);> display(P, G);`

`excuse me i i have a request ,the following command give me 2 term of series but i want get more terms of higher order,  `
`> de := diff(x(t), `\$`(t, 2))+30*x(t)+.1*x(t)^3 = 29*cos(t);> dsolve({de, x(0) = 0, (D(x))(0) = 0}, x(t), series);`
`result is: x(t) = (29/2)*t^2-(899/24)*t^4+O(t^6)`
`please help me`

f(x)=(29/2)*x^2-(899/24)*x^4+(26941/720)*x^6-... is a original function(f(x) obtained of solve differential equation by using differential transform method )

I want write Pade approximation for "f(x)" and i want  compare these approximations with the original function.