Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

To answer this question you need to create a Maple function using Maple's arrow (->) notation.

Your function should take a Maple list of complex numbers as its input and return the largest modulus from that list.

Enter your function in the box below.

 

Really need help 

Cheers.

Hello,

I'm new as to write programs in Maple.

My problem is: How can i write program code into an empty worksheet?

How can i insert new commands into an existing program/procedure?

What do i have to do?

Can you help me please for my first steps, i didn't find any helpful information about this.

Thanks in advance

Volker

Hi, I am new to Maple 2017. I would appreciate advice on how to plot the following integral over the range a = -10 to a = 10

I(a):=int(exp(-x^2)*sin(a*x),x=0..infinity)

 

Thank you.

Aidan

# Riemann hypothesis is false! (simple proof)
 

restart;
assume( s>0, s<1/2, t>0 );
coulditbe(abs(Zeta(s+I*t))=0);

                              true

# Q.E.D.

Unfortunately coulditbe(Zeta(s+I*t)=0) returns FAIL, but our assertion is already demonstrated!

The moral: the assume facility deserves a much more careful implementation.

Enter the matrix

To prevent typing errors you may copy and paste following Maple command for entering A.

 

A := Matrix([[4, 7, 5, 2, 6, 4, 9, 7, 5, 8, 5], [7, 7, 3, 9, 4, 5, 2, 3, 5, 6, 8], [5, 6, 5, 6, 6, 3, 7, 4, 9, 1, 9], [9, 1, 4, 8, 9, 4, 4, 2, 1, 3, 3], [5, 6, 8, 2, 2, 1, 2, 9, 5, 4, 1], [4, 7, 9, 6, 9, 2, 3, 5, 6, 3, 5], [7, 2, 5, 7, 3, 4, 9, 8, 1, 8, 9], [5, 7, 1, 2, 7, 9, 9, 2, 2, 4, 7], [1, 6, 5, 3, 9, 9, 1, 5, 7, 4, 2], [3, 7, 8, 7, 8, 3, 6, 4, 6, 9, 2]]);

 

[Note that Maple does not display the full matrix when it has more than 10 rows or 10 columns.  However, you can still work with the matrix using Maple commands.]

Use Maple to create the vector b that is column 6 from A and the matrix C that is made from columns 1 to 5 and 7 to 11 of A (in the same order as the columns of A).

Now solve the matrix equation

x = b

and enter the 6th component of the unique vector solution for x in the box below.  (Your answer should be an exact fraction, not a decimal)

The answer is 63695593/46022164

Can someone help me out?

Cheers.

 

The question is to find principle argument of the 5 roots of the polynomial z^5-5*z^4-z^2-2 

I used the Maple command:

Solve(z^5-5*z^4-z^2-2);

evalf(%);

argument(%);

But the Maple told me that expecting 1 argument but got 5.

I want to find all the argument and then use Max command to find the principle argument...it's doesn't work

Another similar thing is to find the moduli of a 5 roots of the polynomial z^5-5*z^4-z^2-2 

I got the same error as previous one ..

Can someone help me out ?

Cheers.

The question is to fin limit (n^1.5)*sum of 2*k/(2*k+3) k=1 to n as n goes to infinity 

I got the answer is float infinity...

How can I get a correct answer ?

Can someone help me out .

Cheers.

 

The question is to find integral of [e^(-x)*sin(x^2/)]/(2+x) from x=1 to infinity.

I typed in Maple and used evalf(%) 

But I got a float(infinity) on the upper limits instead of a correct numeric answer...

Can someone help me ?

Cheers.

1. Where do we report potential bugs

 

2. My finding:

https://imgur.com/a/w688r

The image uploading on this forum is not letting me and I find it to be less user friendly. Please view the sequence of images in the given link above.

This is not a problem, just my finiding.

 

type(.5, rational);
                             false
is(.5, rational);
                              true
is([.5], list(rational));
                             false

is(.5, rational) seems to be the odd one out.

 

Hello all,

I have a vector with 3 rows and each row is an equation with 2 variables.  What I am wanting to do is simplify based on the leading coefficient of one of the variables to make the equation a monic polynomial wrt that variable, primarily because it will allow me to quickly check the eigenvalues of the system.  Here is a basic example of what I want to do:

2*x+1 --> x+1/2

Any ideas? Ive tried combinations of simplify, factor, and collect and have gotten nowhere.

Hello everyone,

I need to expand this:

>abs(u+v)^2+abs(u-v)^2

so I have as a final expressioin

>|u|^2+|v|^2=1

This is the property that has to be true so the probability is one.

>assume(u::complex, v::complex);  does not work and the simple commande

>expand() neither.  Any idea?

Let us assume we have a square matrix $A$ with known entries. We know the system is asymptotically stable by inspection of the eigenvalues, hence we know that the Lyapunov equation

A^TP+PA=-Id

will have a symmetric matrix P as a solution with Id being the identity matrix. How can I obtain the entries of the P matrix? I have tried the following code but was not able to solve for the entires of the P matrix.

 

I would be happy if someone could share a solution to this problem.

gc();
restart:

with(LinearAlgebra):

A := <<a__11|a__12>,<a__21|a__22>>;
P := <<p__11|p__12>,<p__12|p__22>>;
Id := <<1|0>,<0|1>>;
eqn := Transpose(A).P+P.A = -Id;


 
 

I am having a problem with image tools read a file from workbook.

In one document i get

Read("this:///101-Escher.bmp");
Error, (in ImageTools:-Read) unable to open database file

In another document I cant save the file. 

Please find my error in the doc which produces outputlines always. Is there any otherway (other than view -  show contents and uncheck output which hides all other outputs as well in a programm) by commands, which can suppress these output lines.

Also is there any other way of giving continuously varying inputs (and visible in RotaryGauge ) like sin wave form (0 to 8 to 0 in a period) ?

                                                                                         
with(DocumentTools); for i to 12 do SetProperty("RotaryGauge0", value, 6); SetProperty("RotaryGauge1", value, .66*GetProperty("RotaryGauge0", value))*time*[]; 3^100; GetProperty("RotaryGauge0", value); SetProperty("RotaryGauge0", value, 4); SetProperty("RotaryGauge1", value, .7*GetProperty("RotaryGauge0", value))*time[real](); 3^100; SetProperty("RotaryGauge0", value, 2); SetProperty("RotaryGauge1", value, .5*GetProperty("RotaryGauge0", value))*time[real](); 3^100 end do

515377520732011331036461129765621272702107522001

(1)

``


 

Download varying_input.mwvarying_input.mw

?

First 910 911 912 913 914 915 916 Last Page 912 of 2219