I am solving "Fx=0" for geting "roots:x" using "solve(Fx,x)". Solution is in the form of

"a+sqrt(b)", "a-sqrt(b)"

Here my question is how to extract "a", "b" separately (a, b are complex and very big expressions).

Thank you in advance for your help.

Hello people in mapleprimes,

I think that I found a bug.

Using the screen opened with command + f, I tried to find a v__1211 in the file I appended here.

But, when the cursor is trapped on an output part, which is a blue part, maple wouldn't continue to find the next

v__1211 anymore even if I clicked the Find Next on the screen.

If I move the cursol one line below with a hand, the Find Next butttons works again, but it is intricate.

Isn't there any good way to avoid this trouble other than not using double _, that is __.?

I hope you will give me some hint.

taro

v_1211.mw

P.S. I clicked the above link and opened that file with maple. Then, the notification telling that this is read-only file and

you cannot save this file after some modification, appeared. I don't know whether there is any problem. 

Does appending a maple file on a post on this mapleprimes always done in such a way? 

The keyboard shortcut sequence for executing an entire worksheet is Alt+e+e+w. Occasionally, I hit Alt+e+w+w by accidence. In that case, Maple sometimes, not always!?, gets completely stuck and can only be shut down through the job list window (Windows Ctrl+Alt+Del). Can anybody else replicate that? And if so, has this erratically odd behaviour been fixed in later versions of Maple?

Hi,

I'm currently writing my thesis and actually haven't used Maple before.

I've got the following problem with converting the results of a sequence:

seq(Optimization:-Maximize(function with 2 variables), parameter:0..1,0.1)

The results are ok, but I can't convert the values to a spreadsheet with 4 columns (parameter value, maximum value, value of variable 1, value of variable 2).

Thank you!

Best regards

Hello everyone!

I want to plot few curves. I need plot legends with slected curves only. When I try to do so, I get an error saying the number of legends are less that the curves( not exact words obviously).

I am using this sample code please help me to achieve the goal.

plot([cos(x)^2, 1-(1/2)*x, x^2], x = -Pi .. Pi, legend = [typeset("Curve: ", cos(x)^2), typeset("Curve: ", 1-(1/2)*x)])

The maple file is attached here

legend.mw

S:=...+a^4*b*c*x^2+...

So I know it is possible to collect for example any letter collect(S,x)

But I want to collect in particular for an entire product in this case

e.g. collect(S,a^4*b*c)

This obviously doesnt work but is it possible to get it working somehow?

Hello

It has been years since I last run one of my packages (not mine actually) and consequently maple.  The package was written in Maple V and run on Maple V5.  I have used updtscr to convert the old code and not many messages came out.   The updated code does not run unfortunately.  One of the problems is the following command:

linalg[dotprod](f,map((a,b) -> diff(b,a),vars,h));

Although linalg is deprecated, that does not seem to be the problem.   Suppose h, f (vector) and vars are:

The output is:

How to avoid the conjugate? Is there a simpler way to do that?

Many thanks for your patience and help.

Regards

Ed

So I'm doing homework when I get maple to plot a graph. I realize now that the graph is actually incorrect by comparing it to a graph in another program(try it yourself).  I honestly have no clue why the plotting isn't correct which is why I need your guys help.

Here is the function that I have to plot:

Dear all,

I would like to compute numerically using Maple the following improper integral

However, Maple does seem to give a result for this integral. I have tried to compute from e.g. 0.001 as an approximation but it turns out that the integrand diverges as s goes to zero. I have also tried some options such as method = _d01amc but I get Error, (in evalf/int) powering may produce overflow.

I would appreciate it if someone here could provide with some help with regards to the computation of such improper integrals. Thank you.

Download question.mw

I am having hard time understading how a style sheet works with Maple. I am trying to use the "document mode" and would like to change the font used for math.

The first question I have is: How does one determine which style sheet is being used for the current open document?

Second: I have followed instructions on how to make a custom style sheet, as shown here: https://www.maplesoft.com/support/faqs/detail.aspx?sid=87675 and saved the style sheet on some location on my PC.

But it seems to have no effect at all. Since when I load it again using Format->Manage style sheet->User defined style set, then using the Browse... and select the file my_style.mw which I created using above instructions, I notice that fonts remain the same. I also close Maple and start again, and select my_style.mw again, but when I start typing in document mode, the font is still italic, even though in the XML I see it says  talic="false" (when I open the file in text editor):

<Font name="2D Math" background="[255,255,255]" bold="false" executable="true" family="Times New Roman" foreground="[0,0,0]" italic="false" opaque="false" readonly="false" size="12" subscript="false" superscript="false" underline="false" placeholder="false"/>

I even tried editing the style sheet I think Maple is using, by hand (it is an XML, and modified the font to be not italic) and reloaded it, and no effect. I even added invalid entries in there, and invalid font names, just to see the effect, and nothing happens, no error or anything. It is as if Maple does not even read the style sheet I just saved.

All what I want to do it to make the math 2D input, be _not_ italic font. I spend one hr on this, and nothing seems to make any difference, Maple insist on using italic for math input when in document mode.

Why is it that the style sheet says talic="false" for 2D math, but when I start to type, it types as italic?

As you can see, when I type, it switch to italic, even though the style sheet I just set, it clearly saying italic=false. There is not one single italic=true in the whole XML file. Why is Maple insisting on using italic?

I am using Maple 2016 on windows. 

There are 4 points which I want to plot as solid spheres in 3d. Here is the code:

Rplot := pointplot3d(`<,>`(r, Transpose(Vector([0, 0, 0]))), style = point, symbolsize = 40, color = [red, grey, grey, green])

plotsetup(ps, plotoutput = `E:\\.../C.eps`, plotoptions = `width=2000, height=2000, noborder`); print(plots:-display(Rplot, axes = boxed, labels = [x, y, z], symbol = solidsphere));

plotsetup(default, plotoptions = `width=2000, height=2000, noborder`); display(Rplot, axes = boxed, labels = [x, y, z], symbol = solidsphere)

In Maple itself everything looks fine, but once I try to export it to ".ps" I see this.

The problem lies in "symbol = solidsphere". When I change it to "diamond", for example, export is successful:

But I need solidsphere. What should I do to fix this error (except manual editing in Adobe Illustrator)?

Two weeks ago i didn`t have problem with calculate and plot this pareto`s frontier. I got plot it, but if i try it now, i can´t . Why?.

Before

f1 := (1+x1^2+4/3*(x2^2+1))/(x1+x2); f2 := (1+x1^2+3/4*(x2^2+1))/(x1+x2);

with(plots); with(Optimization); ind := 1; ans := Array(); for i from 1.73205080756887853 by 0.1e-4 while i < 2.87500000000000000 do roll := i; f1max := NLPSolve(f1, {f2 = i}, x1 = 0 .. 2, x2 = 0 .. 3, method = sqp, maximize = false); ans := proc (ind) options operator, arrow; [op([1], f1max), roll] end proc; ind := ind+1 end do; ans;

st := time[real]();

               Array(%id = 18446746983952876598)

pointplot(convert(ans, list));

 After

with(plots); with(Optimization); ind := 1; ans := Array(); for i from 1.73205080756887853 by 0.1e-4 while i < 2.87500000000000000 do roll := i; f1max := NLPSolve(f1, {f2 = i}, x1 = 0 .. 2, x2 = 0 .. 3, method = sqp, maximize = false); ans := proc (ind) options operator, arrow; [op([1], f1max), roll] end proc; ind := ind+1 end do; ans;

st := time[real]();

                              ans
pointplot(convert(ans, list));
Error, (in plots:-pointplot) number of elements in list must be a multiple of 2  (????)

I would like to apply inverse Laplace transform to U(x,p), which is defined by

For simplicity with my calculations, I assumed p:=i*beta^2. That is why I have the following equation after applying Laplace transform

(beta=0 is not a pole, that is why I removed the last term in my calculations later. Because there is no contribution) where

Here p and beta are complex values, we can write Re(p)=-2*Re(beta)*Im(beta), Im(p)=(Re(beta))^2-(Im(beta))^2 due to p:=i*beta^2. I numerically compute the roots of h(beta), you can find the numerical values of beta (I assumed digits are 50 due to accuracy ) betap.mw

Finally, I would like to plot U(x,t) with the values t=0.8, lambda=1, L=10, k=1. For checking the figure give t=0 and observe that U(x,0)=0.

I am expecting the plot is more or less like the following figure

PS: I already tried to solve and plot the problem, but I could not find where I make a mistake. I  share the worksheet below. Thank you!

complexplot.mw

Hi, community

I want to take a series of plots and convert them into an image-type to export using the ImageTools (Write) command.

Something like this:

for i from 1 to N do

 x[i]:=procedure;    <--- This procedure has a plot as output

 y[i]:= ** convert x[i] into an image type ** <-- This is the part that I haven't figured out

 Write( filename[i], y[i]);

end do;

I don´t know if something like this is possible. Any hints or suggestions would be appreciated.

I guess I could generate N plots and then right click the images to save them... But N is large (hundreds of images) and it is not a nice option to sit all day long saving N images one by one.

Thanks and regards...