Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

I adopted the approach suggested in an earlier post (http://www.mapleprimes.com

/questions/137320-Plotting-A-System-Of-Ode) for the known results,

but some part of curve is missing.

The output I got is

Hello All ,

I would liek to know if ther is a way to tabulate the results in a matrix form , like matlab does .Each time i copy paste it in excel and do the text to colum to sort out the results.It would save me a lot of time if anyone has an idea about this.

Like in the file i have results of various parameters displayed but how do i tabulate it.

Steam_800_below_crit.mw

Hi folks,

I'm trying to find the x value of my data set that corresponds to 50% of area under the curve. I've used curvefitting and splines to generate a piecewise function, and am able to find the area under the curve between my two approximated zeros (as this is the only relevant region). I would greatly appreciate any help, as I've been pulling my hair out for a couple hours now!

 

Cheers!

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  

First 1540 1541 1542 1543 1544 1545 1546 Last Page 1542 of 2224