Scott03

774 Reputation

10 Badges

19 years, 326 days

MaplePrimes Activity


These are answers submitted by Scott03

Try something like this using the return statement to set what is being returnd test1 := proc (x) local p1, t1; p1 := plot(sin(z), z = 0 .. x); t1 := x^2; return p1, t1 end proc: first, second:= test1(5); Scott
I am sure that someone would be able to come up with a better algorithm for this, but here is a possible solution that may solve the problem: UmMat := proc (M1::Matrix) local m, n, tm, tn, um, un, OM1, i, j; m, n := LinearAlgebra[Dimension](M1); OM1 := Matrix(ceil((1/10)*m), ceil((1/10)*n)); tm := 1; tn := 1; um := 10; un := 0; if m < um then um := m end if; if n < un then un := n end if; for i to ceil((1/10)*m) do for j to ceil((1/10)*n) do un := 10+un; if n < un then un := n end if; OM1[i, j] := M1[tm .. um, tn .. un]; tn := 10+tn end do; tn := 1; un := 0; tm := 10+tm; um := 10+um; if m < um then um := m end if; end do; return OM1 end proc: Scott
I wasn't able to download the file (or view the maplenet file) since it appears that there is either a broken link somewhere (or maybe the server was down shortly for some repairs/updates). I did try the equation in both Maple 11 and Maple 10 on my machine and got the following answer: y(x) = (sqrt(2)*(x+(3/2)*exp(x)*x-(3/2)*exp(x))+_C1)*exp(-x) This looks roughly what you were expecting and seems to satisfy your initial equation. Could you verify that the equation you typed is correct? Scott
The firewall settings that they are talking about is concerning a Software firewall. These would include the Windows firewall, Norton firewall, Mcafee firewall, or software like that. Most of these softwares allow you to set the exceptions. Please also not that the files that you noted are for Maple 10 not Maple 11, so all you need to do is change the 10's to 11. If this doesn't help, please let us know what software firewall software you have (remember that mcafee and Norton both have security packages that contain a firewall with the virus scanner). Also, could you let us know what symptoms you are finding to make sure what to suggest. To get this solved faster, you may wish to contact Maplesoft Technical Support. Scott
with(Statistics): X := RandomVariable(Normal(0, 1)): evalf(CDF(X, 0.2)); You want to pass the CDF the random variable (X) and the point. Scott
I want to let you know that I haven't touched Statistics in a long time so someone may correct me but I believe the function that you are looking for is the CDF (or CumulativeDistributionFunction) when it is passed the Normal distribution. Since Maple doesn't want to lock you to one certain distribution, you need to specify the distribution. For example the following will work: with(Statistics): X := RandomVariable(Normal(0, 1)): evalf(CDF(X, 1)); I have an evalf on the last line so that maple will give you a floating point evaluation of the answer. That is not needed but it may help you see that it is the same answer as Excel gives you (just with more decimal points than Excel is capable of). Scott
Two things that you may want to try is: 1) Contact technical support who would be able to run through the technical support steps with you. 2) If you would like some help on this forum, you will likely need to provide the following information -OS version -amount of RAM and processor speed -exact error message that comes up -have you just opened up the standard interface or have you used that interface yet Any other information on what you are doing or if there is anything different on your computer compared to what other people may have. Scott
I noticed that in your code that you mistyped the r4 line, it should be r4:=rhs(S4); (the s in S4 should be capitalized). Is there any missing bits? I can only reproduce the error if I assign the plot to a variable called plot. Is this happening in your code? If so, change the variable name so something like pl1. Scott
I believe that the question is asking if you want the BesselJ(nu,x) to be a function definition or a table assignment. By hitting your enter key the function definition should be selected (which I believe is the default selection). Scott
You can get an answer for the integration on the worksheet that you attached if you changed the section that looked like this if art = RMS then int((add(iLk_waveform_func(Ue,Ua,Ia,L,T,t,n,k),k=1..n))^2,t=0..T_input); elif art = AVG then int(add(iLk_waveform_func(Ue,Ua,Ia,L,T,t,n,k),k=1..n),t=0..T_input); end if; to look like this if art = RMS then Int((add(iLk_waveform_func(Ue,Ua,Ia,L,T,t,n,k),k=1..n))^2,t=0..T_input); elif art = AVG then Int(add(iLk_waveform_func(Ue,Ua,Ia,L,T,t,n,k),k=1..n),t=0..T_input); end if; Then near the end call evalf(iL_waveform_func_RMS_AVG(Ue_input,Ua_input,Ia_input,L_input,T_input,3,RMS)); This holds off the integration till the end. Scott
If z is known you could try something like the following: type(z, Range(1, 10)); You can find information on this on the Range,type help page. Scott
I am not sure but there are some reference to using the :- on the help page for with. The line in code could be changed to the equivalent Do(%Plot0=plots[fieldplot]([x,y],x=-2..2,y=-2..2)); This is just a way of reference a procedure from a package without needing to use the with command. The help page for use talks about this. Scott
I am not sure what the problem is exactly but this can be avoided by using the following code instead: plotxy:=plots:-fieldplot([x,y],x=-2..2,y=-2..2): SetProperty('Plot0', 'value', plotxy): Also note that with Maple 11 there is the Do command that can make the code even simpler: Do(%Plot0=plots:-fieldplot([x,y],x=-2..2,y=-2..2)); Scott
I am not sure what is happening, I will leave the explanation to someone else but the following code will allow you to get past this problem so that you can finish whatever you are working on. solset2 := proc (k) local eqn1, x; eqn1 := x^2+k = 3; fsolve(eqn1, x) end proc: points := [seq(eval('[solset2(z)]', z = i), i = -1 .. 1, 0.0005)]: plots[pointplot](points); Scott
The following for loop will allow you to set-up the plots for the plot[display] command: for n to 30 do plot || n := plot([[X1[n], Y1[n]], [X2[n], Y2[n]]]) end do: plots[display]([seq(plot || i, i = 1 .. 30)], insequence = true); Scott Maplesoft
First 25 26 27 28 29 30 Page 27 of 30