MaplePrimes Questions

how to massive install 100 maple into amazon to do distributed computing or cluster computing?

and how to write this distributed function to run into 100 maple instance?

assume there is a function with two parameter which is the range of array

and the total number of times of calculations is from 1 to 9^(9^2) and divided this range into many range by  each range length 100,000

how can it write the output into a list of length 9^(9^2) ?

will there limit in length of list or result?

and 100 instance of virtual machine may not enough to calculate, how to allocate the next 100,000 calculations to idle instance which finished previous 100,000 calculations?

 

How do I alter the font style of specific characters in say a plot title in the one below, i want "gcd" to be non itallics, but i want the rest to remain itallics. I need to be able to do this with command line code, because it will be for an animation made frame by frame from still images made in maple.

 




Maple Worksheet - Error
 

HELP.mw

Dear Colleagues!
I want to define a tridiagonal matrix and the entries should have the following form. Please help me in this regard.

hello! i have a problem about DEplot. can some of you help me to solve this problem? I use Maple 18. here the problem I've

restart;
with(DEtools);
 
>DE3:={diff(y(x),x)=y(x)-z(x),diff(z(x),x)=z(x)-2*y(x)};    
>DEplot(DE3,[y(x),z(x)],x=0..3,y=0..2,z=-4..4,arrows=large);

   when i enter it, I dont get the graphic. can you tell me why? thank you!

Here is an list of  expressions

[
k[a1]*C[T]*(R-x[1]-x[2])-k[d1]*x[1],
k[a2]*C[T]*(R-x[1]-x[2])-k[d2]*x[2]
]

I would like to have a counter that counts the number of parameters and variables. In my worksheets Variables always are x or y with a subscript, parameters are anything else.

I can't think of how to do this!

This is my code in which I try to solve the system of differential equations where the unknowns are the vectors x(t),y(t).
eq1:=diff(y(t),t)=-2*f(y(t),y(t))*B.A(t):
eq2:=diff(x(t),t)=2*(-1*B.Vector([1,1,1])+f(x(t),x(t))*B.y(t)-s(t)*f(y(t),y(t))*B.x(t)):
sys:=eq1,eq2;
dsolve({sys, x(0) = Vector([1,1,1]), y(0) = Vector([1,1,1]), eval(diff(x(t),t),t=0) = Vector([0,0,0]), eval(diff(y(t),t),t=0) = Vector([1,1,1])}, type = numeric, output = listprocedure);
The message I get is "Error, (in DEtools/convertsys) invalid input: solve expects its 1st argument, eqs, to be of type {`and`, `not`, `or`, algebraic, relation(algebraic), ({list, set})({`and`, `not`, `or`, algebraic, relation(algebraic)})}, but received {Vector(3, {(1) = YP[1], (2) = YP[2], (3) = YP[3]}, attributes = [coords = cartesian]), Vector(3, {(1) = YP[4]-1, (2) = YP[5]-1, (3) = YP[6]-1}, attributes = [coords = cartesian]), Vector(3, {(1) = YP[1]+1/2-2*((1...."

Any help would be much appreciated!
 

 

Does Maple have a function which finds the domain of its variables such that the function is real valued?

I am only interested in a function of two variables, x and y.  I'd like to know what is the range of x and y, where f(x,y) is real valued.

For example, given f(x,y)= x * ln(y), then the domain is all of x, and for y>0.    So it is the upper half plane.  For f(x,y)=sin(x)*cos(y), then it is the whole plane (all x and all y) and so on. 

I looked at singular(), and this does part of what I want, but it only gives me the singular points. So for the above it gives y=0 and x=x, but I am looking for something a little more specific. I also looked at package called RealDomain, but I do not see how to use this for what I want to do. But I could have missed something.

I do not know what the function is beforehand, but it will always be a function of x and y, and I need an automated way to determine the range of x and y where this function is real valued. 

I can't do plots and look at them, since this is all automated and has to be done algorithmically only and non-interactive.

I could use singular, and try evaluating the function at different points and see if it produces real or complex values, but this is not practial to do and can fail.

Does Maple have support for such functionality?

 

is there example data that can verify maxwell equations?

trig_interp3.mw

Hi all

I have this type of generalized Fourier serie: a0+Sum(an*cos(n*Pi*ln(x)/ln(2))+bn*sin(n*Pi*ln(x)/ln(2)), n = 1 .. N)

The coefficients I calculated and the results seems correct. However, the amplitude of Fourier expansion is twice the amplitude of the function.

Find in the attached file my maple code.

Regards

Dear Users!

Hoped everyone is fine here. I am facing the problem to find the transpose of FDM[1], FDM[2] and FDM[0]. Please see the attachment and fix the mistake. I am waiting your positive respone. 
Help.mw

How to calculate determinant of a cube matrix ?

is there function to calculate 3x 3x 3 cube determinant?

Hellow ,

any body can help me to remove the error from the plot, here is my codes .

Note. 1. *Title {Effect of alpha when 'Gamma2'=Gamma2}

2. *on the y axis i want  bar(deltap)

 

 

 

restart;

 

 

h:=z->1-(delta2/2)*(1 + cos(2*(Pi/L1)*(z - d1 - L1))):
K1:=((4/h(z)^4)-(sin(alpha)/Gamma2)-h(z)^2+Nb*h(z)^4):
lambda:=unapply(Int(K1,z=0..1), Gamma2):
L1:=0.2:
d1:=0.2:
alpha:=Pi/6:
plots:-display(Vector[row]([seq(plot([seq(eval(lambda(Gamma2), Nb=j), j=[0.1,0.2,0.3])], delta2=0.02..0.1, legend=[Nb=0.1,Nb=0.2,Nb=0.3],labels = ["d1 ", "Dp"],labelfont = ["SYMBOL", 12], title=(Effect of alpha when 'Gamma2'=Gamma2)), Gamma2=[10,20,30])]),axes=boxed);
 

How to proof classical and quantum both p summation equal to one in maple?

with(linalg):
A := matrix([[1,0],[0,1]]);
AA := exponential(t*A);

A := matrix([[-i/h,0],[0,-i/h]]);
AA := exponential(t*A);
Error, (in evalf/matrixexp) cannot determine if this expression is true or false: 0.9482523555e34*abs(t*i) < 1

arctan(sqrt(3)/2/(1/2));
cos(Pi/3) + i*sin(Pi/3);

exp(i*Pi/3);

cos(Pi/3) + i*sin(Pi/3) - exp(i*Pi/3);

with(ScientificConstants):
Constant(hbar);
h := evalf(%);
dsolve(diff(s(t),t) + i/h*s(t)=0,s(t));
dsolve(diff(s(t),t) + i*s(t)=0,s(t));
 

after solve differential equation, there is no Pi/3, 

can s(t) be a matrix ?

where do Pi/3 come from?

then i try Ket

with(Physics);
K1 := Ket(&psi;t);
dsolve(diff(K1,t) + i/h*K1=0,K1);

Error, invalid neutral operator;
Ket is matrix or complex number ?

and how to solve?

I am still buffled by a Record in Maple.

I simply want to make one variable be a Record. Then make separate variable, by making a COPY of the content of the first variable, then change the second variable. Sounds easy, right?

When I do this, I find that the changes in the second variable are being made also to the first variable.

I used eval() to make a copy of all field of first variable to the second.  May be this is not the correct way, but do not know how else (other by explicit copying one field one at a time).

I looked at help, and see nothing there. It talks about making the Record packed. I tried that, but it is still not working. Not a single example in help of how to copy the "content" of one record to another.

I simply want to make a new instance of the first variable, a copy. and change the second instance without the first changing at same time. Why is this so hard in Maple?

restart;
c:=Record('a','b'):
c:-a:=0:
c:-b:=-1:

c1:=eval(c): #make a copy of c??
print("c1=",eval(c1)); #yes, made a copy

c1:-b:=99:  #change one field  in the second variable

print("c1=",eval(c1));
print("c=",eval(c)); #why did c change?

I tried using Record[packed]('a' , 'b'): since help says something about same Record sharing same memory but that make no difference.

How to make a copy of a record to another in Maple without them being the same? I know I could do this

restart;
c:=Record('a','b'):
c:-a:=0:
c:-b:=-1:

c1:=Record('a','b'):
c1:-a:=c:-a;
c1:-b:=c:-b;

c1:-b:=99:  #change one field  in the second variable

print("c1=",eval(c1));
print("c=",eval(c)); #Now it did not change.

But my actual record has many fields. and I do not want to do the above each time.

First 800 801 802 803 804 805 806 Last Page 802 of 2428