Hello every one,

I want to plot two parameters against each other from a system of ode.

The system is

restart:

with(plots):with(LinearAlgebra):

Eq1:=diff(f(eta),eta$3)+f(eta)*diff(f(eta),eta$2)-diff(f(eta),eta$1)^2-M^2*diff(f(eta),eta$1)+M^2*b+b^2=0;

Eq2:=diff(g(eta),eta$3)+f(eta)*diff(g(eta),eta$2)+(Lambda-2*diff(f(eta),eta$1)-M^2)*diff(g(eta),eta$1)+diff(f(eta),eta$2)*g(eta)=0;

N:=10: M:=0.1:

bc:=f(0)=0,D(f)(0...

Dear friends,

I ran into another problem while using Maple to do residue calculus. The following call

residue(1/x^(1/3)/(x^2+2*x*cos(phi)+1), x=-exp(I*phi));

returns zero -- it does not recognize the residue. On the other hand, if I do a subsitution like this

subs(x=-exp(I*phi), 1/x^(1/3)/(x^2+2*x*cos(phi)+1));

followed by

convert(%, trig); simplify(%);

then I get a divide by zero error, which shows that the...

Hello all,

I recently helped someone with a contour integration problem, you may find my calculation at the following link. It occurred to me to test this integral with Maple and Mathematica.

For example,

int(1/x^(1/3)/(x^2+2*x*cos(Pi/7)+1), x=0..infinity);

produces an unusable output from Mathematica. Maple is a little better,...

I have a procedure which accepts arguments of a (created by myself) type which are records, like so:

Subs:=proc(eqn::seq(equation),elemt::Element,$);
...

Here "Element" is  type I have defined; it is a record with certain fields present.

My question: will this work with option remember? I have the procedure sort-of working without the remember option, but I need to make it work recursively (the Element record can have fields which contain names of other records of type Element...

How to find the maximum of sqrt((x-1)*(y-x))+sqrt((7-y)*(1-x))+sqrt((x-y)*(y-7)) for x=-2..3,
y=0..11 with Maple?
Here are  a few unsuccessful attempts.
> Optimization:-Maximize(sqrt((x-1)*(y-x))+sqrt((7-y)*(1-x))+sqrt((x-y)*(y-7)),
 x = -2 .. 3, y = 0 .. 11);
Error, (in Optimization:-NLPSolve) complex value encountered
> maximize(sqrt((x-1)*(y-x))+sqrt((7-y)*(1-x))+sqrt((x-y)*(y-7)), x = -2 .. 3, y = 0 .. 11);

How to solve the inequality 3^((x+3)/(5*x-2))-4 >= 5*3^((9*x-7)/(5*x-2)) with Maple?
An exact and explicit solution is required.

Hi,

I'm trying to solve system of linear and nonlinear equations with inequalities and it looks like this:

    SX := solve(
                   [
                       seq(diff(EX,WX[k+1])=0, k = 0..m), # these are linear
 ...

use the formula provided in

http://en.wikipedia.org/wiki/Hermite_polynomials

and run in Maple

Restart;
with(SumTools):
Hn := n!*Summation(((-1)^(n/2-l))/((2*l)!*(n/2-l)!)*((2*x)^(2*l)),l=0..n/2);
genfun := Summation(Hn/n!*z^n,n=0..infinity);

but result is not exp(2*x*t - t^2)

1. I use your previous reply on V_G derive  on other characteristic function, but most are undefined

or complicated solution or can not evaluate, why?

for example

charc := 1+i*X/(i*X-1);
int(exp(-I*X*u)*charc, X = -infinity .. infinity);

it got this complicated thing
piecewise(Im(1/i) = 0, undefined, int(exp(-I*X*u)*(1+i*X/(i*X-1)), X = -infinity .. infinity, method = _UNEVAL))

Density := int(exp(-I*X*u)*charc, X = -infinity .. infinity);

How do i show that i am a student before my liscence expires.

Does the current implementation of Maple has any any command to characterize the solution of a linear PDE system with m unknows (functions) and n variables?

I need a command that receives as input the PDE system and tells the nature of the solutions: k0 constants, k1 functions of 1 variable, k2 functions of 2 variables, ... , kn functions of n variables. I think mathematicians call this the Cartan character of the system (I am an economist).

I was reading and...

Hi,

I'm running a 2D parameter sweep from Maple 15 on a MapleSim 5 model. The output is stored in a 2D matrix.  I've encountered two problems:

1) when I graph it with matrixplot the z-axis values are fine but I can't figure out how to change the x-axis and y-axis values from the matrix indices to the actual values of the swept parameters. 

2) When the parameter sweep begins I get a warning about storing the values in a matrix.  Maple...

Hi all,

I have a large equation where i need to substitute a part by omega but it doesn't work.
To illustrate the problem i uploaded a simplified program showing the same problem.
I know i can do it manually but since i have a lot of these substitutions I would like to do it automatically...

thanks in advance!

 
In the simple equation f I want to substitute the sqrt(g)*sqrt(m+M)/(M^(3/2)*sqrt(l) by omega so the function becomes cos(omega*t)

x = a*(3*cos(t) - cos(3*t))
y = a*(3*sin(t) - sin(3*t))

is there a library or function to convert above parametric equations into one equation in terms of x and y?

sys := x = a*(3*cos(t) - cos(3*t));
k := solve(sys, t);
simplify(subs(t=k[1], y = a*(3*sin(t) - sin(3*t))));

any simpler form?

Howdy

would like to know how to generate alternating series.

eg, we have an infinite (large number) number of coins all Heads up.

seq(H,i=100)=HHHHHHHHH.......

Now we flip every 2nd coin (to tails), eg HTHTHT.......

then flip every 3rd coin, eg HTTTHH........

what does it coverge to or does it....?

How to simulate this in maple?

I guess we could also use binary code.