Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

How can I expand the series in multi-variable, where all variable tends to infinity.

Suppose I have a function F(x,y,z) and I want the series of F in all three variable at {x=Infinity, y=infinity, z=infinity} 

 

Does MAPLE have capabability to do multidimensional FTs i.e. (x,y)->(u,v)? If not, are there any links to MAPLE packages which meet this requirement that can be recommended?

Melvin Brown

 

 

I used thread for a loop and found that it takes more time than evalf. Please help to decrease the computational cost. Thank you.

 

thread_mp.mw

Consider the finite field G:=GF(p,k) for some prime p and a positive integer k. Let H be an nxm matrix over G.

My question: How to obtain the minimum number of linearly dependent columns of the H over G. 

Thanks in advance  

Hello, i wish to get dot displayed for time derivative and prime displayed for space derivative. I put typesetting in extended mode but it seems to only work for variable that depend only of time. So how can i get (in 2D math) dot displayed for derivative in time and prime displayed for space? 

Example u(x,t):
 

diff(u(x,t),x) --->  u'(x,t) output displayed in prime

diff(u(x,t),t)  --->  u^. (x,t) output displayed in dot

Thanks

hi guys i have a question for you,

can anyone help me to find the correct code to mantain the structure of vel_qD list and simplify the term diff(s1(t),t)??

i'm driving crazy for that beacuse i'm not able to do it...

thanks, down here i post the code...

 

vel_qD := [diff(theta1(t), t) = -(diff(s1(t), t))*cos(theta3(t))/(LAD*sin(theta1(t)+theta3(t))), diff(theta2(t), t) = (L1*sin(theta1(t)+theta3(t))*(diff(s1(t), t))+L1*sin(theta1(t)-theta3(t))*(diff(s1(t), t))-2*LAD*sin(theta1(t)+theta3(t))*(diff(s1(t), t)))/(LAD*LBC*cos(theta1(t)+theta3(t)-theta2(t))-LAD*LBC*cos(theta1(t)+theta3(t)+theta2(t))), diff(theta3(t), t) = (diff(s1(t), t))*cos(theta1(t))/(L3*sin(theta1(t)+theta3(t))), diff(s2(t), t) = (L1*sin(theta1(t)+theta3(t)-theta2(t))*(diff(s1(t), t))+L1*sin(-theta3(t)-theta2(t)+theta1(t))*(diff(s1(t), t))-LAD*sin(theta1(t)+theta3(t)-theta2(t))*(diff(s1(t), t))-LAD*sin(theta1(t)+theta3(t)+theta2(t))*(diff(s1(t), t)))/(LAD*cos(theta1(t)+theta3(t)-theta2(t))-LAD*cos(theta1(t)+theta3(t)+theta2(t)))]


 

with(Physics)

Setup(mathematicalnotation = true)

[mathematicalnotation = true]

(1)

Setup(dimension = 3, coordinates = (X = [x1, x2, x3]), metric = 2*F6(X)*dx2*dx3+2*F5(X)*dx1*dx3+2*F4(X)*dx1*dx2+F1(X)*dx1^2+F2(X)*dx2^2+F3(X)*dx3^2)

`* Partial match of  'coordinates' against keyword 'coordinatesystems'`

 

`Default differentiation variables for d_, D_ and dAlembertian are: `*{X = (x1, x2, x3)}

 

`Systems of spacetime Coordinates are: `*{X = (x1, x2, x3)}

 

[coordinatesystems = {X}, dimension = 3, metric = {(1, 1) = F1(X), (1, 2) = F4(X), (1, 3) = F5(X), (2, 2) = F2(X), (2, 3) = F6(X), (3, 3) = F3(X)}]

(2)

g_[]

Physics:-g_[mu, nu] = Matrix(%id = 18446746167581484926)

(3)

Weyl[alpha, beta, mu, nu, nonzero]

`[Length of output exceeds limit of 1000000]`

(4)

Weyl tensor is identically equal to zero in 3D and I have tried to show this by inputting an arbitrary metric and calculating components of Weyl tensor. Thus this answer should give me the empty set but I am not getting that, thanks in advance.

CODE:

with(Physics):

Setup(mathematicalnotation = true)

Setup(dimension = 3, coordinates = (X = [x1, x2, x3]), metric = 2*F6(X)*dx2*dx3+2*F5(X)*dx1*dx3+2*F4(X)*dx1*dx2+F1(X)*(dx1^2)+F2(X)*(dx2^2)+F3(X)*(dx3^2))


g_[]

Weyl[alpha, beta, mu, nu, nonzero]

 

Download Weyltensor0in3d.mw

Hi all, I have a problem but can't solve, anyone help me. Example we have json link http://myjson.com/16knzm

How to read procedure getName and getAge from json link above to be

Thank you very much. Sory because my english is bad.

Hi,

While trying to run this code :

pde := diff(u(x, t), t) = k*diff(u(x, t), x, x);
bc := u(x, 0) = T, u(0, t) = a*t + b, u(L, t) = T;
pdsolve([pde, bc], u(x, t)) assuming (0 < k, 0 < L, 0 < a, 0 < b, 0 < T, 0 <= t, 0 <= x and x <= L);

I get the following error :

Error, (in assuming) when calling 'factor'. Received: 'floating point coefficients are incompatible with field extension; use 'real' or 'complex' instead'

Any idea why ?

 

Assume I know some relations like 0<a<b<c<1, n is positive integer, and I want to know if

a^(n+1)-b^(n+1)<c * (a^(n)-b^(n)) holds. How to check this in Maple? Is there any command like verifiy evalb for this kind of problem.? Or solve the inequality in terms of c, given the relations of a,b,c?

Thanks.

Hi, I'm trying to plot equipotential lines and streamlines in Maple, and both equations are in polar coordinates. I can plot a contourplot in cartesian coordinates, but adding "coords=polar", it throws an error. I tried to write a do loop but it wasn't having it either. any help would be appreciated

 

restart; with(LinearAlgebra); with(plots);
K := 1;
psi := K*r^(4/3)*sin(4/3*theta);
phi := K*r^(4/3)*cos(4/3*theta);

 

p1 := contourplot(psi, r = 0 .. 1, theta = 0 .. 3*Pi*(1/8));

p2 := contourplot(phi, r = 0 .. 1, theta = 0 .. 3*Pi*(1/8));
display(p1, p2);

 

which version of maple start to support Grid Computing Toolbox?

Hi I need to write procedure to find a cubic equation... anyone could help me ...? 

Hello

 Every time im working with maple and answer is in term of sin or cos maple dont calculate them for example it give me sin(pi/2) but i want it himself know that sin(pi/2)=1 some times i use of [eval] but it again dont calculate it what i should do?

 

Generate Matrix Automatically for solving Higher order Differential Equation For Chebyshev Polynomial

First 561 562 563 564 565 566 567 Last Page 563 of 2097