MaplePrimes Questions

Hi, whenever I write something like A[m](i,j):=0, the clarify expression box will pop out. It will ask me to select a meaning for the expression.

All the expressions in my worksheet is "remember table assignment". Instead of pressing it so many times, is there a way to set it to the particular worksheet so that it will remember the answer everytime I run the worksheet?

Please advice. Thanks.

Dear everyone,

 

  Hello,

 

  I have a question about how to get the power 'n' in an expression "(x+y)^n". For instance, I have a Maple code

 

******

eq1:=4*x^n*y^m+(x+y)^n+x^3;

f1:=map(t -> `if`(match(t = c*y^d, y, 's'), subs(s,d), NULL),
      convert(eq1, list));
f2:=map(t -> `if`(match(t = c*x^d, x, 's'), subs(s,d), NULL),
      convert(eq1, list));

It will be possible to manipulate this behavior with options "dsolve / event" or "dsolve / Error Control"?

> restart;
> Digits;                                10
> ode := sin(x(t))*(diff(x(t), t, t))+x(t)^3 = t*sin(x(t));

> ics := x(0) = 0, (D(x))(0) = 0;

> s := 250;

Hi Guys,

I was wondering if there is a way to get data from an array solution.

The system of odes, I am trying to solve is

eq2:= diff(f(eta),`$`(eta,3))+f(eta)*diff(f(eta),`$`(eta,2))+beta*(1-diff(f(eta),eta)^2) = 0;

eq2 := diff(theta(eta),`$`(eta,2))+pr(f(eta)+(beta-1)*
eta*diff(f(eta),eta))*diff(theta(eta),eta) = 0;

bcs:=f(0)=gama,D(f)(0)=lambda,D(f)(N)=1,theta(0)=0,theta(N)=1:

gama:=2;lambda:=1:pr:=10:N:=10:beta:=3:

Dear Maple Users

What am i doing wrong?

I would like to draw some areas between curves. I tried to use ?plots/implicitplot but I often need to use gridrefine option which consumes so much memory. When I want to draw e.g. the area between f and g:

f := x-> piecewise(x < 5, 2, x-3):
g := x-> piecewise(x < 4, x, 4):

I can do:

p:=plot({f, g}, color...

Hi, Here is what i have

with(LinearAlgebra):
nodes:=9:
Xfull:=RandomMatrix(nodes):

for i from 1 to nodes do
newXfull(i):=zip(`/`,Column(Xfull,i),Row(Xfull,1)(i)):
end do:

the answers are correct, but it gives me 9 sets of 9x1 matrix. How do I write so that it would give me a 9x9 output? As in, all the answers represented in one big matrix.

OR

If I join it one by one, I wrote << newXfull[1]>|< newXfull[2...

Dear Maple users

This might have been asked before, I'm asking because I believe the solution to my problem is simpler than what i found on google.

I have this problem:

 


                

How would you do the substitution below?

eq1 := ((2*mu[2]-2)*R[S]*B[n]*lambda[0]*mu[3]*n^2*N[p]^2+(-2*mu[2]+2*mu[2]^2)*R[S]*B[n]*lambda[0]*n^2*N[p]^2+d^2)/(d^2+b*n);

 eq2 := algsubs((2*mu[2]-2)*R[S]*B[n]*lambda[0]*mu[3]*n^2*N[p]^2 = q11, eq1);

Thanks

I am making a 2D plot and need to mark certain irregular points on the x-axis, so I managed to put tickmarks (and gridlines) at those points, and somehow Maple even labels each tickmark, which is what I want. 

Except, there is no room along the x-axis for all the labels, so I need the labels to appear vertically at each tickmark.

Is  there any way to do this? The only instructions I can find for vertical labelling just apply to axis labels, not tickmark or gridline labels.


Hola,
How can leave a trail/trace of black point in the yellow and purple screens? Something very similar to the option "animate / trace."

SVD-filtering.mw

Make it possible to take the numerical data of each screen from the "plottools [getdata]"

Gracias

 

Dear Maple Users

I wonder how I can use Maple to solve the problem:

 

for the potential \phi(r). The problem is from the artikle: http://en.wikipedia.org/wiki/Electric-field_screening

I'm particularly puzzled how to implement this differential operator and how to enter the Dirac delta function.

 

Thanks for any hints.

seriestoratpoly(series(simplify(LaguerreL(5, x)),x,6),['egf']);

seriestoratpoly(series(simplify(LaguerreL(5, a, x)),x,6),['egf']);

inverse z transform of sqrt(1-a^2)/(1-a/z)

restart;
alpha := 0;
s := x;
tau := alpha + 1 - x;
source := s*Diff(y(x),x$2)+tau*Diff(y(x),x)+n*y(x)=0;
sol := dsolve(source,y(x),method=laplace);
zsol := ztrans(sol,x,z);
convert(zsol, ratpoly);

sol := y(x) = _C1*invlaplace((_s1-1)^n*_s1^(-1-n), _s1, x)
zsol := ztrans(y(x), x, z) = _C1*invlaplace((_s1-1)^n*_s1^(-1-n)*z/(z-1), _s1, x)
Error, (in convert/ratpoly) expecting a Laurent series or a Chebyshev series

what are _C1 and _s1?

Maple 16:

Given Matrix A of size nRow,nCol, and a vector b of size nCol, I wanted to divide each value in column 
K by b(K) where k=1..nCol and the result will be a matrix B also of size nRow,nCol ofcourse.

For example, I want to do A[..,1]/b[1],  A[..,2]/b[2], etc.. for each column of A

The way I do it now is by using seq(), then convert the result to matrix, like this:


nCol := LinearAlgebra:-ColumnDimension(A):
B    := convert([seq(A[..,i]/b[i],i=1..nCol)],Matrix);

And it works.  But was wondering if there is a better way to do this. I tried to use apply map but did 
not know how to
Here is below the complete Maple 16 code I have:

------------------------
A := LinearAlgebra:-RandomMatrix(3,4);
b := MTM:-sum(A,1);
nCol := LinearAlgebra:-ColumnDimension(A):
B := convert([seq(A[..,i]/b[i],i=1..nCol)],Matrix);
MTM:-sum(B,1);  #verify the sum is 1

First 1706 1707 1708 1709 1710 1711 1712 Last Page 1708 of 2434