Items tagged with maple maple Tagged Items Feed

How to write a procedure to find the product of two different primes

The ability of Maple to solve differential equations is unsurpassed, but when the solutions appear in terms of Heun functions that result is disappointing because it is either difficult or impossible to convert those functions to other functions more commonly used and for which plots are readily generated.

Specifically, does any reader have a suggestion what to do with Heun C and Heun G functions?  In principle, they seem to be related to 1F1 and 2F1 hypergeometric functions, but the conversion seems not to succeed, and it is not obvious how to make it succeed.  In both cases of interest, the literature contains hints of solutions in other functions.

It seems that a solution of a differential equation in terms of Heun functions is not a solution at all.

Hi,

I'm sorry, a few das ago I asked about it. Problamy my question was unclear.
I've decieded asking again.

I need a prcocedure (or contitional loops/sequences) which allow me to put values which are equivalent
to symbols into the array. The value are taken from eight diferent list. 

I enclose maple worksheet and screenshoot with explanation what I need.

I wil be appreciated for any help.

 

DA_-_help.mw

How can I plot a vertical line say x = a in Maple 15 worksheet?

Thanks

Maple 15 does not allow me to do even small changes after executing even the smallest bit of command. Is there a way to overwrite this default setting and force Maple to undo? Do the newer versions of Maple provide this functionality and what is the purpose of undo getting deactivated after a command, at least it should be enabled for the input?

deqn4 := {4*eta^4*(diff(f(eta), eta, eta, eta))*(diff(f(eta), eta))-12*eta^3*(diff(f(eta), eta, eta, eta))*f(eta)+12*eta^4*(diff(f(eta), eta, eta))*(diff(f(eta), eta))-36*eta^3*(diff(f(eta), eta, eta))*f(eta)-24*eta^3*(diff(f(eta), eta))^2+12*eta^2*(diff(f(eta), eta))*f(eta)-36*eta*f(eta)^2-4*eta^3*(diff(f(eta), eta, eta))*(diff(f(eta), eta))-12*eta^2*(diff(f(eta), eta, eta))*f(eta)+12*eta^3*f(eta)*(diff(f(eta), eta))+36*eta^2*f(eta)^2-4*eta^3*(diff(f(eta), eta, eta, eta, eta))-12*eta^3*(diff(f(eta), eta, eta, eta))+12*eta^2*(diff(f(eta), eta, eta))-12*eta*(diff(f(eta), eta))+24*f(eta) = 0};
/
| 4 / d / d / d \\\ / d \
< 4 eta |----- |----- |----- f(eta)||| |----- f(eta)|
| \ deta \ deta \ deta /// \ deta /
\

3 / d / d / d \\\
- 12 eta |----- |----- |----- f(eta)||| f(eta)
\ deta \ deta \ deta ///

4 / d / d \\ / d \
+ 12 eta |----- |----- f(eta)|| |----- f(eta)|
\ deta \ deta // \ deta /

3 / d / d \\
- 36 eta |----- |----- f(eta)|| f(eta)
\ deta \ deta //

2
3 / d \ 2 / d \
- 24 eta |----- f(eta)| + 12 eta |----- f(eta)| f(eta)
\ deta / \ deta /

2
- 36 eta f(eta)

3 / d / d \\ / d \
- 4 eta |----- |----- f(eta)|| |----- f(eta)|
\ deta \ deta // \ deta /

2 / d / d \\
- 12 eta |----- |----- f(eta)|| f(eta)
\ deta \ deta //

3 / d \ 2 2
+ 12 eta f(eta) |----- f(eta)| + 36 eta f(eta)
\ deta /

3 / d / d / d / d \\\\
- 4 eta |----- |----- |----- |----- f(eta)||||
\ deta \ deta \ deta \ deta ////

3 / d / d / d \\\
- 12 eta |----- |----- |----- f(eta)|||
\ deta \ deta \ deta ///

2 / d / d \\ / d \
+ 12 eta |----- |----- f(eta)|| - 12 eta |----- f(eta)|
\ deta \ deta // \ deta /

\
|
+ 24 f(eta) = 0 >
|
/
init4 := { {f(0) = 1, (D(f))(0) = 0, ((D@@2)(f))(0) = 0, ((D@@3)(f))(0.1e-2) = 0} };
{{f(0) = 1, D(f)(0) = 0, @@(D, 2)(f)(0) = 0,

@@(D, 3)(f)(0.001) = 0}}
dsol4 := dsolve(deqn4 union init4, numeric, method=rkf45);

Error, (in dsolve/numeric/process_input) system must be entered as a set/list of expressions/equations

i find maple help using regular chain library, but it has ideal source and ideal target,

when compare with singular, seems different, i am not sure singular code whether correct or not.

so, would like to ask how to do this in maple

if you know singular, i would like to know too.

 

ring r = 32003, (x,y), lp;
setring r;
ideal Z;
ideal i = x-x2-2*x*y+2*x2*y-2*x*y2+y+y2, 1-x2-2*x*y+2*x2*y-2*x*y2+y2;
map phi = r, i;
ideal i1 = preimage(r,phi,Z);
i1;
ideal i2 = preimage(r,i,i);
i2;
ideal i3 = preimage(r,i,Z);
i3;
ideal i4 = preimage(r,Z,i);
i4;

 

would like to apply to find Cohen Maculay

 

While(NewKer <> 0)

Mapping = Basis(M – N) ^ K[M]

NewKer = ker(Mapping, M, N)

N = M

M = NewKer

If IsCM(NewKer) = true then

    NewKer

End if

Do

Hallo, I have a list with derrivatives. I'd like to choose elements with highest derrivative.

Is there any procedure in Maple to determine order of derrivative?

Hallo. I'd like to use two commands in loop like:

for i from 1 by 1 to k  do r:=Search(polyQ[i],[Q]) and T[r]:=T[r]-polyeq[i] end do

But Maple: "Error, unterminated loop". Hmm...

For different reasons I need to ocasionally export a number of Maple worksheet in a folder to pdf files. Is there a way to automate this? I would want that the worksheet is opened, output removed, then executed and eventually exported to pdf. It can take quite a while to do this manually for about 50 worksheets.

Hi

I'm trying make Maple write the actual result, when i differenting an expression: x[s] := x(t)+sin(theta(t))*a.
when i differentiate with respect to t, i get:

> diff(x[s], t);
=
print(`output redirected...`); # input placeholder
/ d \ / d \
|--- ()(t)| + cos(theta(t)) |--- theta(t)| a
\ dt / \ dt /

Maple, writes the expression as a table, but i need to see the normal function? Why does it do that? And how can i make it show the expression as a normal function?


When i derive the two parts serperately i get the normal result, but as soon as i add them together, i get the table rasult again?

Is there an easy trick for this one?

-Nicolai

 

 

Consider the function

 

 

The above definition may result in four cases depening on r and x.

Can Maple calculate automatically all possible cases and the corresponding Maxima, Minima and Values at intervals limits?

 

 

 

Nm= p1. p2 ...pm + 1, for m more than or equals 1.

 

So N1 = p1 + 1 = 2 + 1 = 3, N2 = p1 p2 + 1 = 2  3 + 1 = 7, etc.

 

We prove that Nm is not divisible by any of p1, p2, . . . , pm, so that Nm is either a prime or it is divisible by a prime larger than pm.

 

(c) Use Maple to find out which of these numbers Nm, for m = 1, 2, . . . , 15, is actually prime.

 

Use Maple to compare pm with the smallest prime number that divides Nm, for m =1, 2, . . . , 15.

 

Dear all,

I woul line integrate e gradient moltiply to a vector. I will try to explain better.

I have define this function:

phi(xi,eta)=(2*xi-1)*(xi-1)*(2*eta-1)*(eta-1)

and I have a vector a

v=(0,1)

I would like to applu a dot product between the gradient of phi an the vector and integrate the results. 

I have already try in many way but without succeed. Someone could please help me?

Thanks 

1 2 3 4 5 6 7 Last Page 3 of 266