g(theta) := array([[cos(theta), -sin(theta)],[sin(theta), cos(theta)]]);
dg := map(diff, g(theta), theta);
invg := inverse(g(theta));
w := multiply(invg, dg);
w := map(simplify, w);

crossprod(-w, w); <- have error?

How to cross product between matrix?

As i know wedge product is cross product, so i use cross product

I am trying to plot a function and its horizontal and vertical asyptotes into one graph. I have been trying but unable to get the results I need. I am getting too many Maple errors. What is the correct way to do this? The function is : 6x^2+5x-4/2x^2-7x-4. The asymptotes are y=3,x=-1/2,x=4.asymptote_and_functi.mw

Hi,

I would like to plot three dimention using plot3d,

How to make label using plot3d. If i assume the label is [a,b,d] how to insert in plot label

could you please help me with provide Example.

when i type in the command plot3d(sin(x*y),x=-Pi..Pi,y=-x..x) maple keeps returning error. why is that so?

Good morning,

I want to  to show the 2-simplex (in R^2) obtained from the inequality

x+ y+ z < = 12*a

 with a:=1;

x, y, z  >= 0.

(the angles of the triangle are (12,0,0), (0,12,0) and (0,0,12) )

The CORE of a cooperative game, is the set points that additionally satisfy the system

x+ y >= 6

x+ z >= 6

y + z >= 6

Hi Everyone,

I'm wondering if anyone here has had a similar experience.

I assign Maple projects to my students in table format.  They do their work in the first column and I write my comments in the second column.

I noticed that while I grade a worksheet (Maple 14 on a Windows 7 laptop), Maple becomes very sluggish.  I started monitoring  Maple's memory usage while editing.  When I open the file, the memory footprint is roughly 60,000K....

I have the simplified version of what I want to do:

restart: with(LinearAlgebra):
d:=4:

product(MatrixExponential(I*Matrix(d,{(l,l)=1})*A[l,l]),l=1..d):

 

But I get the following error:

Error, (in Matrix) integer indices required for Matrix

Help appreciated.

Hello friends,

I would like to obtain the "n" for which the second column reaches its maximum and minimum (in the case of my example below, n= 5, 11 and 17 (for -10) and n = 8 and 14 (for 10))

restart:
interface(rtablesize=20):
Matrix([  seq([ n,round(10*sin(n)),round(10*cos(n))], n=1..20)]  );

How can I do that?

Thanks a lot for you attention,

Jean-Jacques

Hello,

I use the following commands to generate some complex numbers:

equ := 2+(s+1)*exp(tau*s) = 0;

a := [0, .8, 2*Pi/(3*sqrt(3)), 4*Pi/(3*sqrt(3))];

for i to nops(a) do

   evalf(solve(subs(tau = a[i], equ), s));

end do

then maple output four complex numbers. I want to get a list which contains the four output complex numbers,how can I do that without retyping the output numbers manually?

By the...

I am trying to use Maple 14.01 for implementing the computation of some cooperative game solutions with transferable utility.

As a first step for computing the CORE, I need to be able to draw the 2-simplices ( a triangle in R^2 with vertices (1,0,0), (0,1,0), (0,0,1) and 3-simplices ( a tetrahedron  with vertices  (1,0,0,0), (0,1,0,0), (0,0,1,0), (0,0,0,1) ). Certainly, I would like to be able to rotate and to visualize from different angles the figure.

restart:
with(LinearAlgebra):
with(ArrayTools):
with(Statistics):
randomize():
with(plots):
with(combinat):

n := 100:
nstock := 7:
corr := .8:

R := Matrix(nstock, nstock, proc (i, j) options operator, arrow; `if`(i = j, 1, corr) end proc):
CD := Matrix(LUDecomposition(evalf(R), 'method' = 'Cholesky'), datatype = float[8]):

ev := [seq((1/5)*(rand(-3 .. 4))(), i = 1 .. nstock)]:
st := [seq((rand(1 .. 2))(), i = 1 .. nstock)]:

A small question:

When I send the following command, I can see the matrix of 10 x 2:

Matrix( [seq( [ n , sum( evalf(1/(n+1)), k=(1/3*n)..(2/3*n) )], n= 1..10)]);

However, when I want to evaluate for  n=1..50.. I cannot see any numbers but only a description of a matrix.

How may I can I see the matrix for n=1..50?

Thanks a lot for your attention,

Jean-Jacques

Hi; every body

i have a problem with fsolve using fours equestion. i use fsolve to slove four equestions and it doesnot give any soltion even if i determent the period of solution as follow,

x1=0..3, x2=0..2, x3=0..1/2, x4=0..5.

i have increased the digit to 100 but it still does not give solution where i am sure there is solution in this interval.

I am looking to create a list-of-lists with all the combinations of 1..7.
The order is not important so for example [1,7] [7,1] should only return [1,7]

ie

[[1],[2],[3],[4],[5],[6],[7],[1,2],[1,3],[1,4],[1,5],[1,6],[1,7],

[2,2], [3,3], [4,4] ......................
[3,2]...................
.......
[7,2].............

[1,2,1]........

[1,2,2].......     ]

I am no sure I am explaining...

I just bought an HP 8500A 910A printer. So far every other application except Maple prints correctly and well. When I print, each (whole) page is printed in the upper left hand quarter of a letter size sheet of paper. This never happened with my old HP LaserJet 4L. After much search, there do not seem to be any setable preferences that could lead to this result.

On the HP forum, there is another user with the same problem except the application is different....