Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

Hi

How to insert captions fig.1,fig.2,fig.3,fig.4 in the Tabulate command ( variable G) without taking into account the random order of the graphs

Thanks

TEST_-_Copie.mw

Dear all
Dear all, is  there any Maple code available to solve the heat  two dimensional heat equations using Rk4. The second derivative will be replaced using Finite difference, so that we get a linear system of odes.  
Thank you for any help 

Hello,

I realize that I can use solve to isolate a specific expression. However, often I have a complicated equation and I want to move 2 or more variables to one side, not knowing a-priori what the expression is going to look like. Is there a way to do this? It almost seems like I have to do work by hand to figure out what expression to pass to solve in this case.

It could be that I'm following the wrong workflow, but I often want to do this, move variables to one side as best as I can, and then look at what expression I endup with to make other decisions about how to solve the problem(computationally, etc).

Thanks.

One of our users asks how they can find the Re ( sqrt(a+I*b)) where a, b are real.

They had tried entering the latter as "assume", without any luck. 

We told them that it may not be very intuitive, but such expressions can be evaluated by wrapping into evalc which implicitly assumes that free parameters are real-valued:

evalc(Re(sqrt(a+I*b)));

Hello. I don't have much experience using Maple. Sorry if this question is really specific. I am trying to solve a system of six equations, with six variables. This is what i type into maple:

solve({0 = a_2*cos(7.5*b_2) + a_2, 250 = Pi*int((a_2*cos(b_2*x) + a_2)^2, x = 0 .. 7.5), 750 = Pi*int((a_1*x^2 + b_1*x + sqrt(d_1*x) + 7.5)^2 - (a_2*cos(b_2*x) + a_2)^2, x = 0 .. x_2), 2.5 = a_1*20^2 + 20*b_1 + sqrt(20*d_1) + 7.5, 2*a_1*x_2 + b_1 + sqrt(d_1)/(2*sqrt(x_2)) = 0, (2*a_1)*20 + b_1 + sqrt(d_1)/(2*sqrt(20)) = 0, x_2 <> 20}, {a_1, a_2, b_1, b_2, d_1, x_2})

When i try to solve i get the output "Warning, solutions may have been lost." When i try to remove the equeation that says that x_2 can't be equal to 20, i get some answers, but i want to know if there are any where x_2 is not 20. (I know that it also can be one other number, because of the type of function). Does the output i get mean that there simply aren't any answers where thos conditions are true, or that there might be some, that Maple can't figure out? If so, what could i do to figure it out? 

Thank you!

I am trying to get Maple 2021 to printout the intervals on which a differentiable function increases/decrease in a Maple document as part of a procedure. 

The function: 

A := x^2 + 400/x

the attempt. 

solve(evalf(diff(A, x) < 0))

which gives the result: RealRange(-infinity, Open(0.)), RealRange(Open(0.), Open(5.848035476))
There is no extreme point at x = 0 for A? So how do I get Maple to do an output which makes sense?  

Hi to all,

Dr. Lopez's "Advanced Engineering Mathematics with Maple" is just excellent... I strongly advise...

That book is my most favorite and Dr. Lopez is my favorite teacher :)

I've been trying to implement numeric integration by using different methods of Int, for example _d01ajc, but when I use it, the following error comes up:

W := -16*(x - 1/2)*x*(t + 2*w)*(ln((m^2 + w*x*(-1 + x))/m^2)*ln(-1/(w*(t + w)*x^2 - w*(t + w)*x + m^2*t)) + ln(-x*w^2*(-1 + x))*ln((x^2 - x)*w + m^2) + ln(1/m^2)*ln((t + w)*(-1 + x)) + ln(-1/(x*w))*ln(m^2) + dilog(x*w^2*(-1 + x)/(w*(t + w)*x^2 - w*(t + w)*x + m^2*t)) - dilog(x*w*(-1 + x)*(t + w)/(w*(t + w)*x^2 - w*(t + w)*x + m^2*t)))/t^3 + 8*(x - 1/2)*((t + w)*x - t/2)*(-t*(w*x^2 + m^2 - w*x)*(t + w)*ln((x^2 - x)*w + m^2) + w*(x*w*(-1 + x)*(t + w)*ln((t + w)/w) + m^2*t*ln(m^2)))*(2*w*x + t)/(w*(t + w)*(w*(t + w)*x^2 - w*(t + w)*x + m^2*t)*t^3*x) + (16*x^2 - 8*x)/(t*w*(-1 + x)) + (2*t*x + 2*w*x - t - 2*w)*(2*w*x + t - 2*w)*(1 - 2*x)*ln((t*x + (-1 + x)*w)/((-1 + x)*w))/(((-1 + x)^2*w^2 + w*t*x*(-1 + x) + m^2*t)*t^2) + (-1 + 2*x)*(2*m^2 + w*x - w)*(2*w*x^2 + 2*m^2 - 3*w*x + w)*ln(m^2/(m^2 + w*x*(-1 + x)))/(w^2*(-1 + x)^2*((-1 + x)^2*w^2 + w*t*x*(-1 + x) + m^2*t)) + (-1 + 2*x)*(2*m^2 + w*x - w)*(2*w*x^2 + 2*m^2 - 3*w*x + w)*ln(m^2/(m^2 + w*x*(-1 + x)))/(w^2*(-1 + x)^2*(w*(t + w)*x^2 - w*(t + w)*x + m^2*t)) + (2*w*x + t)*((t + w)*x - t/2)*(x - 1/2)*ln(w^4/(t + w)^4)/(t^2*(w*(t + w)*x^2 - w*(t + w)*x + m^2*t)) - 8*(x - 1/2)*((-2 + 2*x)*w + t)*((-1 + x)*w + (x - 1/2)*t)*((t*x + (-1 + x)*w)*w^2*(-1 + x)^2*ln((t*x + (-1 + x)*w)/((-1 + x)*w)) + (-(t*x + (-1 + x)*w)*((x^2 - x)*w + m^2)*ln((x^2 - x)*w + m^2) + ln(m^2)*m^2*w*(-1 + x))*t)/((t*x + (-1 + x)*w)*w*(-1 + x)*t^3*((-1 + x)^2*w^2 + w*t*x*(-1 + x) + m^2*t)) + 16*(x - 1/2)*(ln(1/m^2)*ln((t*x + (-1 + x)*w)*(-1 + x)*w/((-1 + x)^2*w^2 + w*t*x*(-1 + x) + m^2*t)) + ln((x^2 - x)*w + m^2)*ln(1/((-1 + x)^2*w^2 + w*t*x*(-1 + x) + m^2*t)) + ln((-1 + x)^2*w^2)*ln((x^2 - x)*w + m^2) - dilog((t*x + (-1 + x)*w)*(-1 + x)*w/((-1 + x)^2*w^2 + w*t*x*(-1 + x) + m^2*t)) + dilog((-1 + x)^2*w^2/((-1 + x)^2*w^2 + w*t*x*(-1 + x) + m^2*t)))*(t*x + 2*(-1 + x)*w)/t^3

f3 := (mm, ss, tt, ww) -> Int(eval(W, [s = ss, t = tt, w = ww, m = mm]), x = 0 .. 1, _d01ajc)

A3 := evalf(f3(1, 3, -2, -1))

Error, (in evalf/int) number expected for float[8] parameter, got 0.+0.*I

What's wrong?

How is the matrix of the affinity of base the plan of equation x+2*y-z=1, of direction u <1,0,-1>and of ratio 2 determined? Thank you.

restart; with(LinearAlgebra); with(plots); with(SolveTools); eq1 := m1*m2*x^4+(c1*m2+c2*m1+c2*m2)*x^3+(c1*c2+k1*m2+k2*m1+k2*m2)*x^2+(c1*k2+c2*k1)*x+k1*k2

m1*m2*x^4+(c1*m2+c2*m1+c2*m2)*x^3+(c1*c2+k1*m2+k2*m1+k2*m2)*x^2+(c1*k2+c2*k1)*x+k1*k2

(1)

m1 := 2;
m2 := 4;
c1 := 1;
c2 := 0;
k1 := 3;
k2 := 2;

2

 

4

 

1

 

0

 

3

 

2

(2)

eq1

8*x^4+4*x^3+24*x^2+2*x+6

(3)

``

sol1 := evalf(solve(8*x^4+4*x^3+24*x^2+2*x+6 = 0))

-0.2293604281e-1+.5263956354*I, -.2270639572+1.627879522*I, -.2270639572-1.627879522*I, -0.2293604281e-1-.5263956354*I

(4)

assign(sol1)

Error, invalid left hand side in assignment

 

NULL

``

Download complex_numbers.mw

Has anyone come across this artical?

https://jdc.math.uwo.ca/roots/

Massive graphing, they said that this was created partially in the wolfram lanuage. We can't them get a leg up on us Maple code. Help me understand this in our native Maple tounge.

Hi,

I am trying to learn how to apply initial conditions to pdes with maple.  I have figured out how to do it with odes, but when assigning initial values to derivatives, I get weird results.  I have attached my Maple file, with the error, and a link to the document I am using as motivation for my analysis.

Test_1D_Wave_Equation.mw

https://personal.math.ubc.ca/~ward/teaching/m316/lecture21.pdf

Can I specify a unit for a symbol using the Units package, so that when I substitute a value for that symbol into an expression, the units for the value are already known?

Dear all

How can I show using maple that the function g(x,y,z) =f(x,y,z)- 4 2^1/2 is strictly positive

strictly_positive_function.mw

thank you for your help 

1 2 3 4 5 6 7 Last Page 3 of 1855