Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

hello everyone, I have a numerical methids exam in acouple of hours and I just dound out that maple 11 on our campus computers has an old student package tht doesnt include numercalanalysis , is there anyway to update it ?

Hi everyone,

 

I would like to do:

f:=unapply(x**2,x);
j:=unapply(2*f(x),f(x));
 
Basically it is to define j(f(x))
But this is doesn't work. What is the right way to do it?\
 
My final goal is to calculate int(j(f(x)), f(x)=-infinity..infinity).

I have the following lines of code:

 

W:=sum((k^(2*i))*sum((e^(j))*w[i,j](r,t),j=0..2),i=0..2);

P:=sum((k^(2*i+1))*sum((e^(j))*w[i,j](r,t),j=0..2),i=0..2);

for c from 0 to 2 do

  for d from 0 to 2 do

    rw[c,d]:=coeff(coeff((k/(2*r))*(diff(W,r)*diff(P,t)-diff(W,t)*diff(P,r)),k,2*c),e,d)

  end do

end do;

 

I mean to compute the coefficients in front of powers of e inside...

Hi everyone,

 

Is it possible to perform an integral over vector without writing a multiple integral over each component?

I am integrating over a vector of dimension 12, so I am trying to find another way to calculate rather than writing 12 integrals.

 

Thanks

Please write for me a code for the following problem.

Let (S): x^2 + y^2 + z^2 -2*x +2*z + 1 = 0 be a sphere and M(1, 2, -1), N(3, 1, -1) be two points. Find the coordinates of the point K lies on the sphere (S) such that the triangle KHN has minimum area. 

Thank you very much.

Hi!

Probably trivial, ...but how to set up a slider in degrees.
I'd like to use degrees instead radians in expresion ...from some reasons.
Help will be apreciated :-)

 

wzelik

slider.mw

Hello, 

I am fairly new to using Maple and am a university student. Bascially, I wanted to ask, how can I solve for all roots of the transcendental equation 

tan(9*(1.1575*10^12/(1-.5)^1.2-x^2)^(1/2)*10^(-6)*(1/2))/tan(9*(5.555*10^11/(1-.5)^1.2-x^2)^(1/2)*10^(-6)*(1/2))

=

I more than 20000 data points on a an excel file and i want to plot one column against the other. So I imported 10 data points from each column seperately and tried ploting it as a normal plot but it would not work. I kept on getting error messages like 

plot([CosAa,CosBb]);

Error, (in plot) incorrect first argument [Array(1..10, 1..1, {(1, 1) = 0.83333e-2, (2, 1) = 0.166666e-1, (3, 1) = 0.249999e-1, (4, 1) = 0.333332e-1, (5, 1) = 0.416665e-1, (6, 1...

Dear All,

 

I have an equation to solve. 


1= sum_{i=1}^n 1/(x+a_i) where a_i is given. I want to solve this equation for unknown x. I know there is a value between 0 and 1. Although I can find the solution by numerical method, I am interested in close form to solve this equation.

Help please.

 

Best Regards,

Saeid

I have these as outputs from comparing the coefficients. How do i assign the g2xyz totheir associated numbers.


eg at present g2000 is g2000. I need it to be 1.2e7. And so on down the list.

The*MRB*constant = sum((-1)^n*(n^(1/n)-1), n = 1 .. infinity) and sum((-1)^n*(n^(1/n)-1), n = 1 .. infinity) = sum((-1)^n*(n^(1/n)-1), n = 2 .. infinity)

But what can we say about

 (∏)(-1)^(n)*(n^(1/(n))-1)?

``

``

Maple does not evaluate it:

evalf(product((-1)^n*(n^(1/n)-1), n = 2 .. infinity))

product: Cannot show that (-1)^n*(n^(1/n)-1) has no zeros on [2,infinity] product((-1)^n*(n^(1/n)-1), n = 2 .. infinity)

(1)

And perhaps it should not because of the alternating sign;

evalf(product((-1)^n*(n^(1/n)-1), n = 2 .. 10^2))

-0.3908773173e-101

(2)

evalf(product((-1)^n*(n^(1/n)-1), n = 2 .. 10^3))

-0.7676360791e-1799

(3)

evalf(product((-1)^n*(n^(1/n)-1), n = 2 .. 10^3+1))

0.5316437097e-1801

(4)

``

 

Download 3232012.mw

I got an MS Excel file where the matrix (7054x60) is created and the last row of the matrix is used for optimization of its (the matrix) values. In Maple you can create the matrix as follows:

M := Matrix(7054, 60):
for i to 10 do M[1, i] := 1 end do:

Mat_proc := proc(x)
  local i, j;
  global M;
  for i from 2 to 7054 do

How does this  function  work:

rtable_scanblock( M, [rtable_dims(M)],

    (val,ind,res) -> `if`(val > res[2],[ind,val],res),

    [[1,1],-infinity]);

 

Please could comment on each statement.


Taken from  http://www.mapleprimes.com/questions/131889-Finding-A-Max-In-A-3d-Plot#comment131997

Gracias

xsys11demo.mw

The attached worksheet (xsys11demo.mw, first-order non-linear ODE system) is ~x100 (one hundred) times slower that the "same" program in Mathematica 8. Both give the same/satisfactory numerical results and have similar/identical structure (I can supply the Mathematica 8 notebook, if requested).

I assume that my attached worksheet must be sub-optimally programmed and would be grateful...

Like this! Some error. How to do it

[IMG]http://i730.photobucket.com/albums/ww309/ytyyutianyun/Capture-6.png[/IMG]

First 1628 1629 1630 1631 1632 1633 1634 Last Page 1630 of 2253