It strips the units because it acts as a multiplying factor. Change Unit=1 to Unit=2 to see this in action. This does not work for the Classic Interface version of Maple, only for the Standard interface. I wonder why that is. Regards, Georgios

Take a look at the worksheets here, Unit 4 - Parametric Probability Distributions. Regards, Georgios Kokovidis Dräger Medical

Here is a starting point for you with regards to animating the screw of Archimedes. The point moving up the screw is up to you. Good luck with your assignment. >restart:with(plots): >screw:=[seq(plot3d([a*cos(x),a*sin(x),3*x],a=-20..20,x=1..4*Pi,numpoints=1500,orientation=[i,60]),i=-30..30)]: >display(screw,insequence=true); Right click on the graph, go to Animation, Play to see it spin. Regards, Georgios Kokovidis Dräger Medical

Your values for r[1] are created with the seq command inside the first pointplot statement below. r[1] and r[2] are the same, so if you use the display command, you will not see them, because they will be on top of each other. As an example, I modified on of the sequences so the values are different. Then using the display command you can see them clearly near each other. >restart:with(plots): >pointplot({seq([x^2,x^3],x=1..5)},symbolsize=20); >p1:=pointplot({seq([x^2,2+x^3],x=1..5)},color=blue,symbolsize=20): >p2:=pointplot({seq([x^2,x^3],x=1..5)},color=red,symbolsize=20): >display({p1,p2}); Regards, Georgios Kokovidis Dräger Medical

Take a look at the help files for the plot3d command and the examples that are listed. Given the symbolic output of your differential equation, you should be able to use that to get what you are looking for with this command. >?plot3d >?plot3d[coords] Later edit: I replied soon after Alex above, without seeing his posting. //G Regards, Georgios Kokovidis Dräger Medical

If you have the Mathematica notebook file (*.nb), you can try to open it directly in Maple. I have not tried this feature, but you can give it a try and see what happens. Under the File-Open menu, one of the options is Mathematica notebook, in the dropdown list that is available. Otherwise, cut and paste you actual Maple code here so that we can take a look at it. Regards, Georgios Kokovidis Dräger Medical

You could display both plots at the same time over each other to see if there are differences. What version of Maple are you using? Maple 11 handles this better than Maple 10. At the Maple prompt, type ?axis and look at the help files for more info. >restart: with(plots): >ReZ:=sin(omega); >ImZ:=cos(omega); >p1:=plot([ReZ,ImZ,omega=0..0.5],color=green): >p2:=plot([ReZ,ImZ,omega=0..1]): >display(p1,p2); Regards, Georgios Kokovidis Dräger Medical

How about using Asymptotes: >restart: >with(Student[Calculus1]): >f:=1/sqrt(k); >s:=(k-2)*exp(-k); >Asymptotes(f,k=1..infinity); >Asymptotes(s,k=1..infinity); Regards, Georgios Kokovidis Dräger Medical

I make a partial attempt here to solve the problem. >restart: >sc:=readdata("c:/temp/cubicvar.txt",float,4); Here I read in a file that I created similar to what you are describing. Below, the writedata command shows the contents of that file. Each column represents the a,b,c and d values of your cubic function. >writedata(terminal,sc); 1.5 2.02 3.04 10 2.07 3.4 5.6214 10 3.6 5.33 1.0667 10 >i:=nops(sc); Return the number of rows of the data values. >j:=nops(sc[1]); Return the number of columns in the data. These values can be used for controlling a for loop to iterate over all of the variables(functions) that you are trying to solve. >ans:=fsolve(-sc[1,1]*x^3-sc[1,2]*x^2+sc[1,3]*x-sc[1,4],x,real); ans := -2.865688206 >ans2:=fsolve(-1.5*x^3-2.02*x^2+3.04*x-10,x,real); ans := -2.865688206 Your "for" loop can plug in values indexed like I have above in the fsolve command. ans and ans2 are identical. >type(ans,nonnegative); false Your can check your answer, and if it is false, ignore it, otherwise print it or write it off to a file. Hope this helps, or points you in the right direction. Regards, Georgios Kokovidis Dräger Medical

The code above posted by Mariner works exactly the same in Maple11 as in Maple10. Both instances used the Classic Interface, WinXP. Regards, Georgios Kokovidis Dräger Medical

An example. >restart:with(plots): >data:=[[6,10],[6.1,11],[6.2,12],[6.3,13],[6.4,14],[6.5,15],[6.6,16],[6.7,17],[6.8,18],[6.9,19],[7,20]]; >plot(data); >dataM:=convert(data,matrix); >dataL:=convert(dataM,listlist); >plot(dataL); >f1:=%: >plot(x,x=4..10); >f2:=%: >display({f1,f2}); Regards, Georgios Kokovidis Dräger Medical

Greetings. The above code from Scott works as long as the number that you are testing is not the first element or the last element in your range. > restart: z:=5: > type(z, Range(1, 10)); true > restart: z:=1: > type(z, Range(1, 10)); false > restart: z:=10: > type(z, Range(1, 10)); false Take a look at the help page for the "in" command: > restart: z:=5: > evalb(z in {$ 1..10}); true > restart: z:=1: > evalb(z in {$ 1..10}); true > restart: z:=10: > evalb(z in {$ 1..10}); true > restart: z:=11: > evalb(z in {$ 1..10}); false > restart: z:=0: > evalb(z in {$ 1..10}); false Regards, Georgios Kokovidis Dräger Medical

The answer to your question is yes. Google books link here: Regards, Georgios Kokovidis Dräger Medical

Greetings. From the help pages: The stats package has been superseded by the Statistics package. As far as explaining the difference, I will defer that to others with much more experience than myself regarding this package. There is a lot of overlap here. I am familiar with the stats package and I have example worksheets that I created over the years that call the stats package, so I continue to use it. Here is the Statistics version of the previous example. > restart: > with(Statistics): > dist:=PDF(Normal(0,1),x); > plot(dist,x=-3..3); Regards, Georgios Kokovidis Dräger Medical

Look at the help pages for the statevalf command. In the code segment below, inside the square brackets: 0 is the value of mu - the mean of the distribution 1 is the value of sigma - the standard deviation You can alter these values as you wish. >restart: >with(plots): >with(stats): >plot(statevalf[pdf,normald[0,1]],-3..3); Regards, Georgios Kokovidis Dräger Medical