Hi,

I have this problem when I use assume and assign a value to an assumed parameter.

Example:

restart:assume(beta>0):

g:=int(Sum(5*sin(n*beta*x),n=1..5),x) ;

beta:=1;

g;

Normaly beta:=1 is replaced into g. The result obtained is function of beta and beta:=1 is not replaced.

Why beta:=1 is not replaced in g ?

Thanks for suggestion

 

>

Following Christopher2222 request, I wrote the following procedures for "exact" cubic Hermite spline interpolation,

p:=proc(x0,p0,m0,x1,p1,m1,x)
local t,d;
d:=x1-x0;
t:=(x-x0)/d;
p0+(d*m0+(3*(p1-p0)-d*(2*m0+m1)+(2*(p0-p1)+d*(m0+m1))*t)*t)*t
end:

pb:=proc(x0,p0,x1,p1,m1,x)
local t,d;
d:=x1-x0;
t:=(x-x0)/d;
p0+(2*(p1-p0)-d*m1+(p0-p1+d*m1)*t)*t
end:

pe:=proc(x0,p0,m0,x1,p1,x...

Hello friends, help, I created a symmetric matrix whose graph is 17 * 17, but in trying to apply

I'm trying to compute the determinant of a 19x19 matrix, each with entries consisting of multivariate polynomials (polys in 6 vars, of degree at most 8).  Specifically I want to factor the determinant.  Running this on Maple 15 quickly gives an "object too large" error in the determinant function, after using only 700 MB of RAM in about 2 minutes.  My machine has 3GB of RAM, so I am confused as to why this object is "too large". 

 

I...

It looks like maple uses the "builtin" `*` for multiplying polynomials.

I am trying to write a new function `&*` that will multiply polynomials with non-commutative coeficients. I was wondering how I could start by looking at how the "builtin" `*` works.

Hi,

F1(S):=1/(R*S-S+1);

G:=R3*k*(1-R1)/(C*Peci);

F(S):=F1(S)*(1-R*S*G);

I want to find, whether F(S) is postive or nagetive considering the following

1. if R3>0 and Peci>0 then F(S)>0 or <0 ?

2. if R3>0 and Peci<0 then F(S)>0 or <0 ?

3. if R3<0 and Peci>0 then F(S)>0 or <0 ?

Good afternoon.

I have a problem.

I want to evaluate that equations

> aux1 := tau1-c11*x2q1(t)-c12*x2q2(t)-c13*x2q3(t)-g1-fric1;
> aux2 := tau2-c21*x2q1(t)-c22*x2q2(t)-c23*x2q3(t)-g2-fric2;
> aux3 := tau3-c31*x2q1(t)-c32*x2q2(t)-c33*x2q3(t)-g3-fric3;

when the variable fric1, fric2 and fric3 are cero and other values.

I like to watch the result in the same plot.

I am using Ode.

i send my file

Hello, I need help in integrating a procedure in Maple 10. I got a numerical solution of a 2nd order ODE as a procedure (using dsolve), and want to integrate it over x=0..1. I tried the recipe from Maple help, but it doesn't go, because I can't separate the solution from the procedure which is a triple - the argument x, the solution itself, and its x-derivative. What should I do? Thanks in advance!

First, here is my code (the last 3 lines are actually a single expression, despite being split over multiple lines below):

with(Statistics):
with(Student):
with(Student[NumericalAnalysis]):
Student[Calculus1][Roots]:
k := 8;
size:=5000;
h:=3.1;
Llimit := evalf((size-1)-10*sqrt(2*(size-1)));
Uplimit := evalf((size-1)+10*sqrt(2*(size-1)));
evalf(Int((Int(CDF(Normal(0, 1), h/sqrt((size-1)*(1/x+1/y)))*PDF(RandomVariable
(ChiSquare(size-1...

How do I update  Maple 5 version  files ( or programs)  to the Maple 14  version ? . I mean I've done a lot of programs in the  Maple 5 version many years ago and now ( using   Maple 14 version) I can't visualize my  complete equations and worst my graphics .Could you help me ?

Hi,

 

I am trying to export an array of complex numbers to MathML.

I would like the numbers to be formatted a.aa x 10^aa + a.aa x 10^aa i

Anybody know how to do this?

 

Regards.

Hi all,

I have this piecewise function:

Mr := theta->piecewise(theta>=0 and theta<=(Pi/(2*p))-(beta/2),0,theta>(Pi/(2*p))-(beta/2) and theta<=(Pi/(2*p))+(beta/2),Br/mu0,theta>(Pi/(2*p))+(beta/2) and theta<=((3*Pi)/(2*p))-(beta/2),0,theta>((3*Pi)/(2*p))-(beta/2) and theta<=((3*Pi)/(2*p))+(beta/2),-Br/mu0,theta>((3*Pi)/(2*p))+(beta/2) and theta<=2*Pi/p,0);

I want to calculate the Fourier serie of this function without giving...

 

The coefficient of determination also known as R^2 tells how good a fit is. If R^2=1 the fit is perfect an if R^2=0 it's useless. But Maple don't have a native function to calculate R^2. I seached and found this: 
http://www.mapleprimes.com/questions/40171-Determining-An-Equations-Accuracy

But it only describe how to calculate R^2 on a 

with(gfun):
gfun['maxdegcoeff'] := 50:
gfun['maxdegeqn'] := 2:

i use number of balls in each basket to get a list, but all functions return fail? where is wrong? and how to use correctly?
l := [0,0,0,2,0,0,0,0,1,1,0,1,0,1,1,0,0,0,0,0,0,1,0,0,1,0,1,1,0,1,1,0,1,0,2,0,0,0,1,0,0,0,0,0,1,1,0,1,1]:
listtoratpoly([1,1,2,3,5,8,13],z);
listtoalgeq(l,y(x));

l := [12,14,27,35,46,49,31];
listtohypergeom(l,z);
guessgf(l,z);