Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

Hi everyone,

Do you know how to displya this kind of things on the screen: 

[12 Elements Column Vector

Data Type: anything

Storage: rectangular

Order: Fortran_order]

 

I think it is just that the vector is too big, but I want to see it. Any suggestions?

Thanks.

have some problem with Numerical Integration this function:

 > f221 := (0.1255914626e-2*(375.*sin(2.*a)*cos(b)*cos(w)-150))*Heaviside(abs(375.*sin(2.*a)*cos(b)*cos(w)-375.*sin(a)^2*sin(b)*sin(w))-150.)*sin(a)*cos(b)^3*sin(w)*(1.+.25*cos(2.*b));

> evalf(Int(f221, [a = 0 .. 2*Pi, b = 0 .. (1/2)*Pi, w = 0 .. 2*Pi], method = _cuhre, epsilon = .1)) 

How can i take this integral and  decrease calculation's time? I was trying different...

Some time ago, I posted a two-letter-words quiz for Scrabble players. That one is particularly useful to beginner players wanting to increase their scoring opportunities. I've created another worksheet for those looking for a greater challenge. This one tests your knowledge of the three-letter words that can be created from the valid two-letter words. Enjoy!

restart:
with(PDEtools):with(plots):
declare(u(x,y,t)):
PDE1:=diff(u(x,y,t),t$1)+a*u(x,y,t)*diff(u(x,y,t),x$1)+diff(u(x,y,t),x$3)+
b*diff(u(x,y,t),y$2)=0;
Sol1:=pdsolve(PDE1);
Test1:=pdetest(Sol1,PDE1);

params:={a=6,b=1,_C1=1,_C2=1,_C3=1,_C4=1};
Sol2:=subs(params,Sol1);
plot3d(subs(t=1,rhs(Sol2)),x=-10..10,y=-10..10,axes=boxed,grid=[50,50],
style=patchnogrid,shading=Z,orientation=[-40,50]);

Hi everyone,

Can somebody help me to make this code faster? Or if somebody have fast computer and can execute it and give me the result.

When I execute it, I don't have the result of the last command and get the error of not enough memory allocation or something.

Here is the code:

>restart;with(LinearAlgebra):with(VectorCalculus):with(linalg):
> a1:=1:
> a2:=1:
> T:=<x1,x2,x3,x4,y1,y2,y3,y4,u1,u2,u3,u4>:
>

I have created the following:

a := proc (b, r)
local x, n;
x := [seq(b, x = 0 .. 99)];
for n from 1 to 99 do x[n+1] := r*x[n]*(1-x[n])
end do;
return x
end proc;

> a(.5, 2.5);

 

This returns a list of points in a list representing a population at each generation from x_0 to x_99.  How can I get Maple to plot these points as a time series?

The new VolumeOfRevolution command in the Student[Calculus1] package has lots of nice features for controlling the output (Riemann sum, 3D plot, animation, inert integral, numerical approximation, ...).

The default colors for the plot are not very appealing. Not only is the pink easily washed out by a projector in a moderately light room, but the detail is missing. To illustrate, consider

with(Student[Calculus1]):
VolumeOfRevolution(2-x^2, x, x=0..1, output=plot );

Hi,

I want to put some code into a Maple library. I'm new to producing packages. The following code runs OK, but when I try to use one of the procedures added by the LibraryTools[Save] command, Maple returns

input: MySum(a, b);
output: MyMapleLibrary:-MySum(a, b)

Why does Maple return an unevaluated call to MySum?

The code is below:

restart:
with(LibraryTools):

MyMapleLibrary:=module()
  description "A sample Maple library.":

Hi,

In chapter 2 of the Advanced Programming Guide, it says:

"Important Always ensure that the standard Maple library is write-protected to avoid saving expressions in it. If you accidentally save something to the standard Maple library, you may need to restore the original from media on which you obtained the Maple software".

How do I make the standard Maple library write-protected? Is it by marking as read-only the following folder?

How can I see the steps of solving a PDE ( partial differential equation ) in maple .
for example see the sepration variables and other equations that lead to final Eq .

Given f(0)=.9996227171873666421850099370279559699139150588529262999972424126225010232473280487452608765415854234

a=5/6

then how to plot the function in Maple 12 

f(t)=a*f(0)*[1-f(0)]*e^(-a*f(0)*t)

restart:with(plots):

eq := diff(f(eta), eta, eta, eta)+.11-(diff(f(eta), eta));

bc2 := f(0) = 0, (D(f))(0) = 1, (D(f))(10) = .1;

dsolve({eq,bc2}):

F1:=evalf(rhs(%));

contourplot(x*F1,x=-3..3,eta=-0.2..0.2);

I need to get the data from the above plot in a .txt file.

Thanks  

I have been given the logistics map:   xn+1 = rxn(1-xn) where xn is a number between zero and one that represents the size of the population in the nth generation as a ratio of the environment’s maximum capacity.
The parameter r is a positive number related to both the reproduction rate and the rate at which the
population dies due to limited resources.  Create a procedure (taking arguments r and initial population size x

rsolve(a(n)=2/a(n-1)+1,a(1)=1),

thx in advance.

Sorry, this seems like a silly question. But is there an easy way to convert trig funcitons, or even non trig functions to orthogonal (in this case Legendre) polynomials? 

First 1565 1566 1567 1568 1569 1570 1571 Last Page 1567 of 2249