Hello,

I am currently doing this thing:

unapply(piecewise(x>37-0.25*t and x<37+0.25*t,-(11*sin(t/2+1.145)-10)*((x-37)^2)+(-3.5*sin(t)+ 1),10),x);

(It is used with "for t from 0 to 8 do *things* end do", hence why I use "t")

The problem I have is I don't want this (over) complicated function to go over y=10, but the conditions I tried were not working that well.

I saw on the Help page that it should be possible, but my attempts were unsuccessful...

Maple 2018.2 generates wrong latex in this example. In Latex a space in command name is important. So "\tau L" is not the same as "\tauL".  Since in the later case, Latex will complain that there is no command "\tauL"

Maple generates "\tauL" in the latex, when it should be "\tau L" in the following example, so the latex fails to compile because there is no command called "\tauL" in Latex.

Here is screen shot showing the problem and the Maple command to reproduce it

restart;
interface(showassumed=0);
pde :=  diff(u(x,t),t)=k*diff(u(x,t),x$2)+(exp(-c*t)*sin(2*Pi*x/L));
ic  :=  u(x,0)=f(x);
bc  :=  D[1](u)(0,t)=0, D[1](u)(L,t)=0;
sol:=pdsolve({pde,ic,bc},u(x,t)) assuming L>0,t>0,k>0;

latex(sol)

Any chance Maplesoft could fix this?

Possible workaround for now is to use something like "\newcommand{\tauL}{\tau L}" in preamble for this specific case.

Hello,

Assume we have the following "intervals" (I am not sure what is its formal name in Maple)

C :=[0,1/11],[1/11,1/9],[1/9, 1/7],[1/3,1/2],[1/2,1]

How can we get the "union" of these intervals? That is to say, obtain  [0,1/7],[1/3,1] 

Many thanks in advance for your comments and suggestions.

Hi,

I'm trying to plot a 3 dimensional vector equation of motion in Maple for my dissertation. The equation is as follows:

vec(v_r) = (v_b)*i + (v_g*cos(Omega*t))*j + (v_g*sin(Omega*t))*k

where Omega is the gyrofrequency, v_b is the velocity parallel with the i direction, and v_g is the perpendicular velocity of gyration. v_g and v_b are both in terms of the velocity of incidence and two angles, which are all just numerical values that I've introduced.

It should look like a helix spiralling around the i axis, but I'm fairly new to Maple and I've tried everything I can think of and I can't get it to work.

When I use plot3d it turns out looking like a sphere or a cylinder. When I use spacecurve, it doesn't work at all and I get the error message " Warning, unable to evaluate the function to numeric values in the region; see the plotting command's help page to ensure the calling sequence is correct.".

Any help is greatly appreciated.

I am trying to find the number a and b (-20 < a < 20, -20 < b <20) so that two circles (x+1)^2+(y+3)^2 = 125 and (x-a)^2+(y-b)^2 = 225 cut at two points A and B and coordinates A and B are pairs of integers.
I tried
 

restart; L := []; 
for a from -20 to 20 do 
for b from -20 to 20 do 
for x from -20 to 20 do 
for y from -20 to 20 do 
if (x+1)^2+(y+3)^2 = 125 and (x-a)^2+(y-b)^2 = 225 and nops({a, b, x, y}) = 4 and x*y*a*b <> 0 then 
L := {op(L), {[a, b], [x, y]}} 
od: od: od: od:
nops(L); 
L

How to select the number a and b so that the system of equations (x+1)^2+(y+3)^2 = 125  and (x-a)^2+(y-b)^2 = 225 have two integral solutions. For example
 

restart; 
solve({(x-6)^2+(y+2)^2 = 225, (x+1)^2+(y+3)^2 = 125}, {x, y})

restart;

Digits := 32;

t0 := 1;

eq := 1-w*v^2-2*v*exp(-t/v);

equ := eval(eq, v = -t/ln(u));

us := solve(eval(equ, t = t0), u);

vs := -t0/ln(us);

plot(Re(vs), w = 0 .. 10, view = 0 .. 1)

I want to plot the solution of this equation, but it doesn't quite work. I tried to transform it, because I thought the singularity in the denominator of the exponential causes the issues.

any suggestions?

Dear all.

Trying to plot the function below:

         epsilon                                            
    f := ------- = 0.78417289325174246201875653872811303 + (
          2 Pi                                              
    -24.020590879328464004990474127244023 + Y 

      (671.68643760557259657756434855357346 + (
    -314.15926532756339731350799859659950 Y

       - 48.382487297515945228479754993851165)^2))^(1/2)

want the (x-axis) be epsilon/(2*Pi) and the y-axis is Y
implicitplot(f,epsilon=0..100,Y=0..10,numpoints=1000,axes=boxed,thickness=2,color=black,font=[1,1,20],tickmarks=[3, 3],linestyle=1);

many thanks in advanced.

example1 := (x -> (2 + 3));
example2 := (x -> int(1, y));

When I execute these, Maple evaluates the "2 + 3" into 5, but it does not evaluate the "int(1, y)" into "y". Why does it evaluate the former but not the latter?

Also, how can I modifiy example 2 so that it evaluates the "int(1, y)" and returns "x -> y"?

I try to plot this matrix as shown below and I keep getting this error. First how do I simplify these units? Secondly how do I plot this because it seems like it doesn't let plot with units.

Just a simple use of DataFrames.  Looking for a new flashlight, I decided to compile a small selection of flashlights for comparison.
 

Download flashlight3.mw

Using allvalues (twice) I can uncover the three roots of this expression: 1 real, 2 complex. But fsolve gives me just one real and 1 complex. Interestingly the free version of Woldframalpha.com gives the same single complex root.

Is there any way of coercing fsolve to give both?

Many thanks for any advice

Fsolve5.mw
 

Download Fsolve5.mw

What is the simplest method for adding a color bar for plottings? (a scale that shows the correspondence 
between numbers and colors)

and could you interpret the graphics and the color bar?  I need your valuable comments.

I use Maple 2018.

For example;  

question.mw

I mean

Hello Everyone,

First of all I want to thank you to pay attention to my post.

For some reasons I want to know when does the root of my solution is equal to 0 isolating α, which yields the following equation
 

When I substitute 1/2 it verifies the equation, but when I substitute other solutions my equation is not verified. For instance substituting "α=-1/l" I get something different from 0 as you can see

This code used to work OK in an earlier version of Maple 2018. I do not know what changed and if it some change in Physics package that caused it.

restart;
pde:=diff(u(r,theta),r$2)+1/r*diff(u(r,theta),r)+1/r^2*diff(u(r,theta),theta$2)=0;
bc:=u(r,0)=0,u(r,Pi)=0,u(0,theta)=0,u(1,theta)=f(theta);
sol:=pdsolve([pde,bc],u(r,theta),HINT = boundedseries(r = 0));

Now it gives the error 

Error, (in assuming) when calling 'assume'. Received: 'invalid arguments'

Workaround is to remove the HINT above. So the following now works

restart;
pde:=diff(u(r,theta),r$2)+1/r*diff(u(r,theta),r)+1/r^2*diff(u(r,theta),theta$2)=0;
bc:=u(r,0)=0,u(r,Pi)=0,u(0,theta)=0,u(1,theta)=f(theta);
sol:=pdsolve([pde,bc],u(r,theta));

Should this error message show up when using the HINT option?

Maple 2018.2 with Physics package cloud version 205.

Here is screen shot showing it was working in Physics 170

From time to time, people ask me about visualizing knots in Maple. There's no formal "Knot Theory" package in Maple per se, but it is certainly possible to generate many different knots using a couple of simple commands. The following shows various examples of knots visualized using the plots:-tubeplot and algcurves:-plot_knot commands.

The unknot can be defined by the following parametric equations:

x=sin(t)

y=cos(t)

z=0

The trefoil knot can be defined by the following parametric equations:

x = sin(t) + 2*sin(2*t)

y = cos(t) + 2*sin(2*t)

z = sin(3*t)

The figure-eight can be defined by the following parametric equations:

x = (2 + cos(2*t)) * cos(3*t)

y = (2 + cos(2*t)) * sin(3*t)

z = sin(4*t)

The Lissajous knot can be defined by the following parametric equations:

Where n[x], n[y], and n[z] are integers and the phase shifts phi[x], phi[y], and phi[z] are any real numbers.
The 8 21 knot ( n[x] = 3, n[y] = 4, and n[z] = 7) appears as follows:
 

A star knot can be defined by using the following polynomial:
 

By switching x and y, different visualizations can be generated:

Please feel free to add more of your favourite knot visualizations in the comments below!

You can interact with the examples or download a copy of these examples from the MapleCloud here: https://maple.cloud/app/5654426890010624/Examples+of+Knots