I'm trying to solve the following inequality:

ln(x+1)<x^2-1

but the solve command returns:

"Warning, solutions may have been lost"

Can someone halp me?

Thank you.

Carmelita

u := x -> Int(exp(-(xi-x)^2)*exp(xi), xi = -infinity .. infinity, method = _d01amc);
evalf(u(0.));

gives an error

u := x -> Int(exp(-(xi-x)^2)*exp(xi), xi = -infinity .. infinity);
evalf(u(0.));

2.275875794

u := x-> Int(exp(-(xi-x)^2+xi), xi = -infinity .. infinity, method = _d01amc);
evalf(u(0.));

2.275875794


A bug is suspected...

I have exported Maple code as a Maplet file.  When I click on the file Maplet Launcher opens but nothing "runs".  It looks like it's trying because the icon flashes, but no window opens.  The Maple worksheet from which the Maplet was generated runs fine.

Any suggestions as to how to get Maplet Launcher to run my Maplets?

Thanks,

Rollie

Good afternoon sir.

I request your kind suggestion to the above cited query.

With thanks & Regards

M.Anand

Assistant Professor in Mathematics

SR International Institute of Technology,

Hyderabad, Andhra Pradesh, INDIA.

Hi everyone.

i want to undestand how to use the passing by reference in Maple i do this:

generate_x := proc (x)

    x := (rand(1 .. 10))()

end proc;

generate_y := proc (y)

    y := (rand(1 .. 5))();

    print(y)

end proc;

print_xy := proc ()

     local x, y;

     generate_x(x);

     print(x);

     generate_y(y) end proc;

print_xy();

#print(x)  works but generate_y(y) doesn't print the value of y.

Can you help me to understand WHY i dont get the print of y.

Thanks and happy christmas to you!

Hello,

Is it possible to have the labels of the x-axis and of the tickmarks above the axis?

Thank you!

Polya deals out cards from a deck one by one. How many cards must Polya deal out until he is sure that a flush (five cards of the same suit) has appeared amongst the dealt cards? What if Polya wants a straight (five cards in sequence, with an ace counting low or high)?

 The answers are 17 and 45, but how? in Maple?

for the flush the chances are 1/numbperm(13,5)/numbperm(4,1)

for the straight 1/10/numbperm(4,1)^5. 

http://www.math.hawaii.edu/~ramsey/Probability/PokerHands.html

Hello,

In a mechanical problem, i have to deal with a system with trigonometric expression. The variables are gamma[1](t), psi[1](t), phi[1](t), alpha(t), beta(t), x(t). The orthers are parameters.

I would like to have a explicit relations between  gamma[1](t), psi[1](t), phi[1](t) and alpha(t), beta(t), x(t).

In orthers words, i would like to have 

alpha(t)= f(gamma[1](t), psi[1](t), phi[1](t)).

beta(t)= f(gamma[1](t), psi[1](t), phi[1](t)).

 x(t) = f( gamma[1](t), psi[1](t), phi[1](t)).

Of course, the expresions of alpha(t), beta(t), and x(t) should be complex. Nevertheless, it will avoid me to have to solve Newton Raphson algorithm to solve these constraints equations.

Normally, it should be feasible.

When i have only one equation and not a system, isolate function is helpful.

But in this case, i don't manage to have my relations.

Have you some ideas to expression these relations ?

alpha(t)= f(gamma[1](t), psi[1](t), phi[1](t)).

beta(t)= f(gamma[1](t), psi[1](t), phi[1](t)).

 x(t) = f( gamma[1](t), psi[1](t), phi[1](t)).

Here the code of the equations :

restart:
with(LinearAlgebra):
with(Student[MultivariateCalculus]):
with(plots):
constants:= ({constants} minus {gamma})[]:
`evalf/gamma`:= proc() end proc:
`evalf/constant/gamma`:= proc() end proc:
unprotect(gamma);
restart:
with(LinearAlgebra):
with(Student[MultivariateCalculus]):
with(plots):
constants:= ({constants} minus {gamma})[]:
`evalf/gamma`:= proc() end proc:
`evalf/constant/gamma`:= proc() end proc:
unprotect(gamma);
eq_liai[1]:= rF[1]*cos(a[1])-cos(a[1])*cos(gamma[1](t))*e[1]-l[1]*(cos(phi[1](t))*cos(a[1])*cos(gamma[1](t))*cos(psi[1](t))-cos(phi[1](t))*cos(a[1])*sin(gamma[1](t))*sin(psi[1](t))-sin(a[1])*sin(phi[1](t)))-cos(alpha(t))*rBTP[1]*cos(a[1])-sin(alpha(t))*sin(beta(t))*rBTP[1]*sin(a[1])-sin(alpha(t))*cos(beta(t))*h = 0;
eq_liai[2]:= rF[1]*sin(a[1])-sin(a[1])*cos(gamma[1](t))*e[1]-l[1]*(cos(phi[1](t))*sin(a[1])*cos(gamma[1](t))*cos(psi[1](t))-cos(phi[1](t))*sin(a[1])*sin(gamma[1](t))*sin(psi[1](t))+cos(a[1])*sin(phi[1](t)))-cos(beta(t))*rBTP[1]*sin(a[1])+sin(beta(t))*h = 0;
eq_liai[3] := h[1]+sin(gamma[1](t))*e[1]+l[1]*(sin(gamma[1](t))*cos(psi[1](t))+cos(gamma[1](t))*sin(psi[1](t)))*cos(phi[1](t))+sin(alpha(t))*rBTP[1]*cos(a[1])-cos(alpha(t))*sin(beta(t))*rBTP[1]*sin(a[1])-cos(alpha(t))*cos(beta(t))*h-z(t) = 0;

or directly a maple file

constraints.mw

Thanks a lot for your help

Hi.

How to present two indexed values a[n] and b[n] in form

a₀ = ...,

a₁ = ...,    b₁ = ...;

a₂ = ...,   b₂ = ...;

in MathContainer component?

Thank you.

Dear all,

I have encounter a Maple response but I don't know how to interpret it.

When I tried the following Maple codes:

A := solve( x^4 + x^3 + x^2 + x + 1  = n, x ):

asympt( A, n, 2 )

Maple responded with a mysterious "pt".  What is going on?  Any help will be appreciated!

Thanks in advance.

Cheers, Yen-chi Roger Lin

Assistant Professor in Mathematics

National Taiwan Normal University

Good morning Maple users.

I request your kind suggestion to the above cited question.

With thanks & Regards

M.Anand

Assistant Professor in Mathematics

SR International Institute of Technology,

Hyderabad, Andhra Pradesh, INDIA.

I am playing around with a crude implementation of the bisection algorithm. I am using printf  to display some of the output, however there are a couple extra characters, namely, ()^2, at the end. When the very last line is removed, it goes away. What is causing this?

Download bisect.mw

Maple Player seems like it could be an outstanding piece of software, yet with the new operating system for Ipad, the program crashes immediately. I am unable to find any solutions. I also stumbled across a post in which Maplesoft is no longer providing support for the APP. Is this true?

I am attaching my file. Many of you have given great help on how to get dynamic Maple activities working.  My question again is along those lines. I have created a parabola with sliders a,h, and k.  What I am trying to do is have a button that says show vertex on the equation . However, when I connect the button with Plot3, I plot the the vertex in a new window.  Here is the most successful code I used:

Do(%Plot3=(plot([[%Slider2,%Slider1]],style=point,colour=blue,symbol=solidcircle,symbolsize=18)));

So I do get the point I want (h,k), but the point is not on the function itself.  I have tried muliple maple commands with no luck.  I am wonder how I can get the point (h,k) to be on the function when I hit the "show vertex" button. 

Parabolas_In_Vertex_.mw

Thank you for you time,

Nicholas

restart;

diffeq := diff(w(r), `$`(r, 1))+2*beta*(diff(w(r), `$`(r, 1)))^3-(1/2)*S*(r-m^2/r) = 0;

con := w(1) = 1;

ODE := {con, diffeq};

sol := dsolve(ODE, w(r), type = numeric);

How can i have numerical solution of the above differential equation with corresponding boundary condition?