alright being ragging for a couple hours now and have finally come to this place for help so here goes. The math question is the following "Have Maple compute the Nth Taylor polynomial for arctan(x) about x = 0. So now you have a formula that looks like: π≈ 4 times the Nth Taylor polynomial for arctan, evaluated at x = 1. There's nothing trigonometric on the right-hand side of this formula. It's just a polynomial. So we can use this to approximate π numerically. Use it to find π to 5 decimal places. "

 

Hello,
I have ODEs system of Hamilton-Jocobi-Bellman(HJB),in which x(t)and y(t) are status variables,lembda1(t) and lembda2(t) are co-state variables,n1 is the inital condition and n2 is the transversality condition. I try to find its numeric solutions with BVP method, but I cann't. So, would somebody help me?
thanks
zhangkai

Hello everybody,

z1 := -3*i*(2+i)*(3+2*i)*(1+4*i)

zz1 := expand(z1)

zz1 := -18*i-93*i^2-90*i^3-24*i^4

(3)  subs(i^2 = -1, i^3 = -i, i^4 = 1, zz1)=72*i+69

(4)  subs(i^2 = -1, zz1)=-18*i+93-90*i^3-24*i^4    

I don't like the way in (3) to get my answer.Are there some easy ways?

 

Why is it when I integrate expressions like cos(3*x)^5*sin(3*x)^2, I get this answers in the worksheet mode :

-(1/21)*cos(3*x)^6*sin(3*x)+(1/105)*cos(3*x)^4*sin(3*x)+(4/315)*cos(3*x)^2*sin(3*x)+(8/315)*sin(3*x)

while using the Integration tutor I get:

(1/9)*sin(3*x)^3-(2/15)*sin(3*x)^5+(1/21)*sin(3*x)^7

I know they must be equivalent but it would be nice to have some concistency and also to know how Maple got the first answer.

Anyone has a clue ?

Thanks!

 

Hi, I need to maximise z = 20*x_1 + 25*x_2 subject to: x_1 + 6*x_2

Hi

I was wondering how maple deals with the powers of a piecewise function. I've a piecewise function of f of thins kind

A_eff:=proc(f)
global Enn,f_a,f_b,f_c,alpha_var, Ell_lor,w_var;

piecewise(f<f_a, (f)^(-7/6), f< f_b and f >=f_a, alpha_var[1]^(-23/2)*(f/alpha_var[1])^(-2/3), f< f_c and f >= f_b, alpha_var[1]^(-7/6)*w_var*Ell_lor(f,alpha_var[2],alpha_var[3]))

end proc:

and then I must integrate A_eff^2 over a range of frequency which begins before f_a and ends at f_c

Hi everyone. Forgive me for bad english, but it's important to solve one problem. Here is my Maple-code: >restart; define_external(WATCOM); Integral := define_external('periodic_integral','FORTRAN','eps'::float[8], 'Low_1'::float[8],'High_1'::float[8],'Under_I_1'::PROC('x'::float[8],'RETURN'::float[8]), 'WRAPPER','REPLY_1'::float[8],'LIB'="D:/Integral/Debug/Integral.dll"); eps:=10e-5: a:=0.: b:=10.: Under:=proc(x) RETURN(cos(x)*sin(x)) end proc: Reply:=0: Integral(eps,a,b,Under,'Reply'); print(Reply);

how can i solve these two massive nonlinear equations ? and by which way ?

the 1st is:-

Hi,

I am just wondering, if dealing with 'large' numbers,

which one is better? or which is approiate?

+++++++++++++++++++++++++++

restart:
a:=[12,34,56,78,100000];
t:=time():map(i->Power(i,43214342341) mod 5423524532,a);time()-t;
+++++++++++++++++++++++++++

restart:

a:=[12,34,56,78,100000];

t:=time():
for i to nops(a) do
a:=subsop(i = `mod`(Power(a[i],43214342341),5423524532),a):
od:
a;time()-t;

+++++++++++++++++++++++++++

Hi

I'm sorry about the weird subject of this topic.

Somewher in my calculation with maple I expect to find integrals of products of derivatives of a function of (say) f and M other parameters (say a vector theta) , possibly with constant (symbolic) coefficients, times f^alpha  (alpha real. Something like

Int(  N* Diff(psi(f, theta_1, .., theta_M), theta_a))* Diff(psi(f, theta_1, .., theta_M), theta_b))* f^alpha)

(N is an unknown constant)
I want, if possible to tell to maple:

I need help on turning this code into a procedure and what changes do i have to make  so it works like the gauss-seidel algorithm. I have tried many times on my own but can't seem to get my head around it. Any help would be appriciated greatly.
 

 

How can I set up the game of Pig in Maple ?   en.wikipedia.org/wiki/Pig_%28dice%29

Does anyone have any experience with such an game in Maple ?

Could anyone please explain the solution in simple terms ?