Could somebody help me I am having trouble with an if statement.

I have defined three functions a.b and c in terms of one variable j.

I have correctly defined g_{k,j} as well as other functions and now I have run into trouble with my if statement.

p:=(k,j)->if k=0 then max(K-j*S,0) else g_{k,j} end if

I think its clear what i am trying to achieve in the if statement as I want to be able to enter p(1,4), p(4,3) etc. . .  after the if statement...

Please help me with the following.

I have this function

y(theta,t):=1/4*Pi + A*sin(m*theta) + A*sin(m*theta)* (exp(-1/4 *alpha^2*beta^2)-2)/(4*Pi)*t;

Hey!

I am trying to simplify this: (a+b)(a-b). As we all know, this is a²-b². Maple, though, returns this: a(a+b) - b(a+b) which is also correct, but not what I want it to show :D Any way to make it show a²-b²?

I tried simplify, factor, expand - they all give the same result. Am I doing it wrong? :D

Thanks in advance

I try to sketch and solve PDE

PDE:+diff(u(x,t),t)+2*diff(u(x,t),x)=0

with boundary condition

u(0,t):=piecewise(0<t and t<=2*pi, sin*t,0) 

how to get the solution u(x,t) and sketch u(x,0),u(x,pi),u(x,2*pi),u(x,3*pi)?

the derivative of the improper integral int(cos(1/sqrt(u))^2,u=0..x) at the point x=0 with Maple?

Hello,

As a new user I'm having some trouble using indexes in matrix and vector operations. For instance, I can declare three vectors from the 3 by 3 matrix E using index i: 

for i from 1 to 3 do Eigenvector[i] := Column(E, i) end do

This creates 3 vectors with indexes 1 to 3 out of the matrix E as expected. However, Maple seems unable to transpose one of the indexed vectors:

Im trying the plot the roots of

(-t)^5=abs((t^2+t+1)/(-t))

on the complex plane but its not allowing me to do so, and when i just plot it only the axes come up and no points.

Any help is appreciated.

Hello,

Using Maplets Elements I'm trying to program some inputs which I then want to use to solve a differential equation. My Problem is that my inputs are somehow in the wrong data type. I actually don't even know what data type they are, but it's not string and no number as I can't calculate with them.

I do have a little programming experience (php, Java, C++) but it's my 1st maple program which I need for school.

My code so far is:

________________

f:=x->x^3:
y[1]:=0.5:
y[3]:=subs(x=0.5,f(x)):
i := 2:
y[i] := y[i-1]-(y[1]-y[2+1])*(1/2):
i:=1:
g[i] := (y[i+1]-y[i+2])*x/(y[i]-y[i+1])+(y[i+2]*y[i]-y[i+1]*y[i+1])/(y[i]-y[i+1]):
g[i] := unapply(g[i], x):
h[i] := unapply(solve(y = g[i](x), x), y):
for i from 2 by 1 to 5 do
g[i]:=(f@h[i-1])(x);
g[i]:=unapply(g[i],x):
s:=solve(y=g[i](x),x):
h[i]:=unapply(s[1],y);
end do;

 for this code i got error "Error, (in kernels)...

I have a system of equations  AX=B where the matrix A from dimension 307x200, X from 200x1, and B from 307x1
How can I use Gauss elimination to solve these system of equations.

Can one find an integral representation of the solution of the following system of PDEs?

pde1 := diff(f(x,y),x) + A(x) * ( p11* f(x,y) + p12 + p13*x ) 
= p14 * B(y)/B(x) * diff(f(x,y),x);

pde2 := diff(f(x,y),y) + A(y) * ( p21* f(x,y) + p22 + p23*y ) 
= p24 * B(x)/B(y) * diff(f(x,y),y);

f(x,y) is the unknown function,
A(x) and B(x) are known functions,
p11, p12, etc. are real parameters.

If p14=0 and p24=0, the right-hand...

Dear All

I wonder if anyone can help me with something simple with odeplot.

Under some conditions that I can't pin down, Maple won't run the system for the whole time range I ask for, and it's not related to "maxfun". For example, in the simple lines of code below, Maple will only run out to t=3, no matter how I set the maxfun or stepsize. It is a general issue I have, for other systems as well.

Anyone know something? Thanks a lot, David.

(3 lines of code follow)

Hi guys please help me with the following.

When I evaluate the integral below

int(1/8*2^(1/2)*exp(-1/2*x^2/sigma^2)/(Pi^(5/2)*sigma)+1/8*2^(1/2)*exp(-1/2*x^2/sigma^2)*Q*exp(I*k*x)*exp(I*k*theta)/(Pi^(3/2)*sigma)+1/8*2^(1/2)*exp(-1/2*x^2/sigma^2)*Q/(Pi^(3/2)*sigma*exp(I*k*x)*exp(I*k*theta)), x = (-infinity .. infinity));    --------(1)

I get an expression with things like 

csgn(conjugate(sigma)) and 

Hi there....

I have a set P={4,5,6,7,12,14,15}

in order to create permutations of the numbers in set P into sets of 3 I did the following:

with(Statistics):

>P={4,5,6,7,12,14,15};

> O := combinat[permute](P, 3); 

But this does not produce permutation of the same number in a set as the integers in P can be repeated more than once....for example {4,4,4} or {15,15,15}?

How can I do so?

Any help will be appreciated

How can I solve the following problem using Maple:

Determine the special solution u(x,y) of the PDE

(  diff(u(x,y),x) )^2+( diff(u(x,y),y) )^2 = u(x,y)

such that the solution passes through the circle

x(s)=cos(s), y(s)=sin(s), z(s)=1        (0 ≤ s ≤ 2π) .

The solution obtained "by hand", i.e. without Maple, reads

u(x,y) = (1/4) ( 1+