Hello 

 I couldn't make plot3d in my Maple code please see the file I attached it and let me know any idea how can I make plot it in 3D

Thanks

Good morning sir,

I request you to provide the Maple Proc to solve the equations by Muller's method because it requires three 

initial approximations and the iteration process is very much tedious to get the desired accurate approximation.

Hello everyone,

I am dealing with an Eigen value problem, the equations are

restart:with(plots):

Eq1:=diff(f(y),y$2)-a^2*f(y)+a*(h(y)+R*q(y))=0;

Eq2:=diff(h(y),y$2)-a^2*h(y)+a*Z*y*f(y)=0;

Eq3:=diff(q(y),y$2)-a^2*q(y)+a*f(y)=0;

ic:=f(0)=0,f(1)=0,D(h)(0)=0,q(0)=0,h(1)=0,q(1)=0;

where f,h,q are Eigen functions, R, Z are dimensionless...

I am having trouble getting Maple to work with fractional exponents.  When I ask Maple to compute 8^(2/3) and 8^(1/3), it just echoes my input, instead of returning 4 and 2, respectively, as it should (I think the overwhelming majority of mathematicians would agree that Maple should return 4 and 2.  It is conventional not to consider complex numbers when defining, e.g.,  "8^(1/3)" unless a problem specifies that you need to consider complex numbers).  When I ask for 4^(1/2...

Hello,

It's a very easy question but i don't find for the moment.

I want to measure an angle in a revolute joint. For that purpose, i use a probe to measure the angle. The angle is measured in rad. How can i do to change in deg ?

Thank you for your help.

 how to find 6x^2 +5x+1 mod 2x+1 ? please using maple slove 

Hi all,

I'm getting started with maple. Want to solve the following integral:

int(     (  1+(a*x)^t  )^(-1/t)      , x = 0 .. z)

Constraint: 0<t<1

Maple 8 installed on an old WinXP gave me a solution with

hypergeometric functions. Maple 17 installed on a Linux64

gave me no answer at all. What could explain this difference?

Thx...

Dear all,

I would like to solve the following function:

f:=sum(Y[i]*ln(t[i]), i = 1 .. n)+(sum(Y[i]*t[i]^beta[1], i = 1 .. n))*ln(theta[1])/theta[1]^beta[1]-(sum(Y[i]*t[i]^beta[1]*ln(t[i]), i = 1 .. n))/theta[1]^beta[1]+(sum(Y[i], i = 1 .. n))/beta[1]-ln(theta[1])*(sum(Y[i], i = 1 .. n));

Hi 

Is it possible to disable/out comment lines in a maple sheet in a similar way to ctrl + r in Matlab?

Thanks in advance

regards Brian

Hi!

I'mtrying to use Maple's statistic and linear algebra packages to get a functionality similar R. The biggest problem that I have currently is to find an easy/simple way to import and access data from tables/spreadheets in ascii notation (essentially what read.table(<filename>, <options>) gives you in R). I tried to use something like M:=ImportMatrix(<filename>) for that, which actually reads a table, but I don't know how to use to access/use the...

Hi,

New to maple and I have 2 questions that I'm stuck on.

1) Find the principal arguments of the 5 roots of the polynomial

and enter a decimal approximation to the largest principal argument in the box below.

ans: 2.589502038

2) Find the moduli of the 5 roots of the polynomial

and enter a decimal approximation to the largest modulus in the box below

ans: 2.34880159160143

I dont really know what to write in maple to get the answer. So, if someone could help me out that would be really great. cheers

Hello,

I'm trying to sort a list of symbols respecting some assumptions I have made about them. For example, I'd like to assume that 0<x<1, and I would like [x, x^2, x^3] to be sorted into [x^3, x^2, x]. How would I accomplish that? Making an assumption with assume() does not affect anything, as the sort() function does not seem to be actually comparing the values of symbols (only numeric values). Any help will be appreciated.

Thank you. 

Dear All,

I need your help, what function in Maple must be used to find the different form of this function

into this function

Diff(x1(t),t) - x2(t) = 0;

Diff(x2(t),t) - x3(t) = 0;

Diff(x3(t),t) +3*x3(t) + 4*x2(t) + x1(t) = 2*Diff(u(t),t$2) + 5*Diff(u(t),t) + 7*u(t);

multiply above system by test functions -lambda1(t),-lambda2(t),-lambda3(t) and integrate by part

in order to find adjoint operator in the form

x1 -> Diff(lambda1(t),t) - lambda3(t) = miu1(t)

x2 -> Diff(lambda2(t),t) + lambda1(t) - 4*lambda3(t) = miu2(t)

This is what i have done to find the difference between a ball thrown with different starting angle, and then ploted they into the same plot.

restart; Digits:=20: with(plots):

C_0:=0.4: d:=0.0002: mu:=1.8*10^(-5): rho:=1.2: g:= 9.81:
rho_v:=1000.0: m:=evalf((4/3)*Pi*rho_v*(d/2)^3):   


F_D:=proc(v::list)                 
local k,vx,vy; 
vx:=v[1]; 
vy:=v[2];