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...

hi....how i can extract Coefficients  (i.e. {f1[2],f2[2],f2[3],f3[2],.....f3[6]}) from every algebric equations and create matrix A ,in form AX=0, (X are f1[2],f2[2],f2[3],f3[2],.....f3[6] ) then the determinant of the matrix of coefficients (A) set to zero for obtaining unknown parameter omega.?

Note that  if m=3 then 6 equations is appeare and if m=4 then 9 equations is appeare.thus i need a procedure that works for every arbitary value of ''m''.

in attached file below m=4 thus we have 9 equations, i.e. 3 for eq1[k_] and 3 for eq2[k_] and so on...

also we should use boundary conditions for some amount of fi[j] (i=1,2,3 and j=2,3,...,7)

be extacting above Coefficients for example from first equation ,

''**:= (1/128)*f1[2]*omega^2-(1/4)*f2[2]-(1/2)*f2[3]+(1/4)*f2[4]+(1/4)*f3[2]-(1/2)*f3[3]+(1/4)*f3[4]+140*f1[2]-80*f1[3]+20*f1[4]'''

must compute

coeff(**, f1[2]); coeff(**, f2[2]) and so on...

fdm-maple.mw

Download fdm-maple.mw

Good morning, I'm a student and I installed Maple 18 on my PC, as a "Single User Profile". Unfortunately, I had to buy another computer, so now I'm trying to install the program on my new one. Even if I enter my Purchase Code and my details, Maple says that no more activations are left in my account, even if the expiration date is on March 2020. Is it possible to activate again the program? 

Thank you,

Laura

Hi everybody,

I would like to understand why the instruction

seq(X__k, k=1..2)

returns

X_k, X_k

and not X₁, X₂ ?

Is it possible to force the evaluation of X__k each time k changes in the "seq" loop ?

Thank you for your explanations

It seems as if arrays can only be displayed in 2-D form when the array dimensions start at 1.

Sometimes I want to construct arrays where an index starts from 0 (or other values). This is purely for my convenience in some problems. However such arrays do not display in 2-D form. Consider the displayed form of

Array(1..4,1..5,(i,j)->i+j);

Array(1..4,0..4,(i,j)->i+j);

Why doesn't the latter 'display' in 2-D form?

Hello people in Mapleprimes,

I want to factor

g^((2*(-sigma+k+1))/(-1+sigma))-tau^2

as

(g^((-sigma+k+1)/(-1+sigma)) -tau)*(g^((-sigma+k+1)/(-1+sigma))+tau);

I know that the following code works:

subs(g^((2*(-sigma+k+1))/(-1+sigma))=(g^((-sigma+k+1)/(-1+sigma)))^2,g^((2*(-sigma+k+1))/(-1+sigma))-tau^2);

factor(%);

Isn't there another better way than this?

I will be very glad if you teach me about this.

Thanks in advance.

taro

Dear Colleagues,

I am not sure if there exist a simple way to handle the issues I am facing. I am trying to obtain numeric roots for a polynomial f(x,a). I know for sure that there can be many roots depending on the value of parameter a. However, I cannot say for sure how many roots are possible for each value of parameter a. Some of these roots are complex numbers. Also, I need to choose only those roots that have following properties:

1. They are real.

2. f(x*,a) i.e., function value at a root is positive. 

How do I solve f(x,a)=0 to store all roots in a set? Furthermore, how do I select and print roots that have the properties mentioned above? Is there a way to do filtering of a set specifying properties of the members of the set? Please suggest. Your help is highly appreciated.

Regards,

Omkar

Please help me.I don't know how to achieve the following iteration relation by maple code.

I am a beginer in Maple, and even more beginner with differential geometry on maple. I am trying two dayes now to define the following Lie group on Maple by reading the help guid of DifferentialGeometry and some documents on the web, but I failed. Now I am seeking for your assistance, Plese help me and thanks for being as xplicite as you can.

The group I want to introduce is the real lie group

$ \mathbb R \times \mathbb C $ () equipped with the group law
$$ (x_0,x) \cdot (y_0,y) = (x_0+y_0+\frac{1}{2}Im(x\bar{y}), x+y) $$

(I didn't figure out how to use something other than LaTeX code)

For illustration purpose I am sticking with the above simple example, but I want next to move to higher dimensions analog.
I want also an explication about how Maple distinguishes between a real and complex coordinate.

I want next to compute  the left multiplication pushforward of a tangent vector of the identity.
Then compute the structure constants of the Lie algebra associated. I think Maple can do this kind of manipulation without problem, am I wrong?

hi .may every one help me for pdsolve this differential equations?

all initial boundary condition are zero

thanks...

pdeSol_(1).mw

Download pdeSol_(1).mw

Hello everybody, I'm an engineer student and I'm having quite some troubles with Maple. See my teacher told us to program a homework using Maple, problem is I've never used Maple in my life and it's not that hard, but I'm having some trouble with my homework.

My homework is about a 4-bar mechanism (grashof's condition) which will define the type of movement my mechanism will have depending on the data I input:

we define 4 variables expressed lenght measurments:

L= (largest link in the mechanism) 
S= (smallest link in the mechanism)

P and Q= other 2 links in the 4 bar mechanism

also 

L0: the link of the mechanism which is FIXED (frame)

L1: the link of the mechanism which is moves (driver)

L2: coupler link

L3: follower link

here 1 will be the fram, 2 the driver, 3 the coupler and 4 the follower

grashofs condition consist on the following:

1. IF L + S < P + Q

and S is the frame, then the program should print that the mechanism presents a rotatory-rotatory movement

or L+S < P+Q and the FRAME is the opposite link of the shortest link, then the program should print that the mechanism presents oscilatory-oscilatory movement

or L+S<P+Q and S is the driver and the frame is adyacent to the driver, then the program should print that the mechanism presents two rotatory movement.

2. IF   L + S > P + Q

the program should print that the mechanism doesn't follow grashof condition and the movement is roker-rocker (doesnt matter what link is the driver and what link is the frame)

3. IF L+S=P+Q

the program should print that the mechanism doesn't follow grashof condition and the mechanism will have deadpoints.

I'm sorry, im a mechanical engineer student and I have very few experience programming (I only learned python like 2 years ago) and I'm having trouble with maple's language (which i know is very simple)

If someone could help me or guide me I would really appreciate it

Thanks alot 

PD. excuse my english