Advanced Search

Question: How to find the n-th component?

Question:How to find the n-th component?

hind 45 Maple
December 22 2015
0

 

Qu_in_maple.mw

How to compute the  n component of U[i] even to reach the exact solution?

 

``

> 

k := proc (t) options operator, arrow; t end proc:
> 

U[0] := f(x):
> 

for i to N do U1[i-1] := subs(x = t, U[i-1]); U[i] := (1/2)*x^2*(int(t*U1[i-1], t = a .. b)) end do:
> 

Parse:-ConvertTo1D, "first argument to _Inert_ASSIGN must be assignable"

cos(x)+x^2+(1/2)*x^2*(-2+(1/4)*Pi^4)+(1/8)*x^2*(-1+(1/8)*Pi^4)*Pi^4+(1/64)*x^2*(-1+(1/8)*Pi^4)*Pi^8

  

cos(x)+(1/512)*x^2*Pi^12

 (1)
> 

Exact := proc (x) options operator, arrow; cos(x) end proc

``

 

 

``

 

 
 

 
 

 
 

 

 

  

 

  
 

 

``

 

Download Qu_in_maple.mwQu_in_maple.mw

How to find the  n component of U[i] even to reach the Exact solution cos(x)
Please Wait...