I am creating a maple document to display the tangent plane to a function. the resulting function and tangent plane are displayed in a plot component. The problem I am having is that I can display both the function and the tangent plant at the same time with the foloowing statements:

PlotSurfs := plot3d([Func,TanPln], x = Xo-DmX .. Xo+DmX, y = Yo-DmY .. Yo+DmY,axes=VarAxes,scaling=VarScl,orientation=[OrX,OrY,OrZ]);

 DocumentTools[SetProperty](PlotWin, value, PlotSurfs);

I'm trying to make a Cayley table with a group of permutations (Specifically S₃ and A₄) and can't figure it out.  I've been looking through the help without much success.  Here is the code I have so far:

Matrix(nops(permgroup(6, {[[1, 2]], [[2, 3]]})), proc (i, j) options operator, arrow; multperms(i, j, permgroup(6, {[[1, 2]], [[2, 3]]})) end proc)

Thanks

I have a calculation (analytic) involving sums (finite) that ends up with an expression structured like a sum over an expression with several terms, like

sum(Y(t)*cos(omega*t) + a*sin(omega*t)+b*cos(omega*t),t);

(The real case is more involved but this simple example shows the issue.)

What I want is to distribute the sum over each term separately, observing that a & b are numbers & therefore can be pulled out of the sum. Note that the expression...

Hi,

I've figured out several ways to accomplish this, using a series of commands, but is it possible using only dsolve to solve a first-order ivp involving two constants: the constant of integration and a constant of proportionality. For example, the type that arise using Newton's basic law of heating/cooling:

y'(t) = k*(y(t)-10), y(0)=70, y(1/2)=50

I welcome all ideas, especially if there is something easy I'm missing, thanks! 

Hi there,

I am designing a Buck Converter Power Supply, and in that regard I need to design the input filter and compare it to the characteristics of the converter, and for that I need to compare two Bodeplots.

How can I plot the two Bodeplots that I have attached in one?

Thank you

Download converter.mw

Download input_filter.mw

I have problem because mserver.exe stopped working

Yesterday that file was working very well.

help me please

robot-circulo-botone.mw

Hello folks,

I have some code where I need to solve a system of polynomials with 2 equations and 2 variables. I am only interested in Real roots, so I used the Isolate function.

However I would still wish something faster. Then I see what it seems a more specific function called BivariatePolynomial. However when using it, it seems as I don't get proper results. Below it is an example with both functions. Am I doing something wrong?

Isolate method:

How to calculate the integral
restart; int(cos(a*x)*cos(x)^(a-2), x = 0 .. (1/2)*Pi) assuming a>1
with Maple? Mathematica 8.01 produces a very doubtful answer
In[1]:=Assuming[a > 1, Integrate[Cos[a*x]*Cos[x]^(a - 2), {x, 0, Pi}]]
Out[1]=((-1)^a* a* HypergeometricPFQ[{1, 1 - a, 1 + a}, {3/2, a}, 1/2]* Sin[a *[Pi]])/(-1 + a)

Dear Dr. Lopez,

I would like to make a visualization of the following:

y=0.9       0 <= x <=4

y=1-0.1e^(-0.1x)   4<x

z=1

Please help. Thank you very much.

Sincerely,

Giao Che

Hi:

I am trying to use the Physics package to help me deal with non-commuting operators, but having some problems when trying to simplify expressions.The following should explain what i mean:

################

restart:
with(Physics):
# 'a' represents a quantum operator
Physics[Setup](noncommutativeprefix={a}, mathematicalnotation = true);

#we can try to expand to see that a and Dagger(a) do not commute!
expand((2*a+Dagger(a))^2);

Sorry if this is a well-known feature of Maple, but I haven't had much success searching for an answer.

Consider trying to separately solve each of the following two equations for x.

alpha * x + conjugate(alpha) * x = 1 

Maple 15 solves this equation to give x = 1/(alpha + conjugate(alpha)) , as expected.

alpha * x - conjugate(alpha) * x = 1

Maple 15 fails to solve this equation, returning nothing as if there is no solution.

This should be astonishingly simple as a MapleGraded question but it stubbornly refuses to agree with me.  Everything is marked incorrect ... one wishes for some feedback from MapleTA as to what is going on.

Student enters a vector.  The goal is to have the dot product with <5,3,1> to be whatever value is chosen for $p, which is in the $ANSWER field:

$m:=<5,3,1>;
$d:=LinearAlgebra:-DotProduct($m,$RESPONSE);
is(($d-$p)=0);

The Li function is defined in Maple as

> FunctionAdvisor(Li, definition)
               [Li(z) = Ei(ln(z)), with no restrictions on (z)]

Special values are known

> FunctionAdvisor(Li, special_values)
Warning: when function identities information is required, only one argument -
the function name - is expected. Extra arguments are being ignored.
          ...

How would you transform a 3D plot structure into a 2D plot structure? I have in mind 1) creating a 3D plot with odeplot or with plot3d, 2) selecting (say) 4 orientations, 3) transforming each into a 2D plot, 4) exporting the 2D plots using the Standard GUI.

The reason behind my question is that the best-looking exported plots that I have been able to obtain with Maple are 2D plots exported as postscript with the Standard GUI. 3D plots don't look nearly as good when...

I have been working on this for a while and Maple Support has been no help.

I have a series of unsimplified questions that I am solving for. I am trying to run it from 0 to 2*Pi and plot that against the value that is calculated for r3. it solves for opposites (positive and negative) and I only want the first set. From there I am unable to have the r3 value assigned as a value and then used for the calculation of r3a (which is just the array name).

here is my code and the errors that occur