What is the number of all the solutions of the equation frac(x*floor(x)) = 1/2 belonging to RealRange(1,100)? How to count it with Maple?

Hi,

is the series expansion for the following expression bugged in maple or am I missing some crucial thing of series?

series((1/epsilon-log(4)),epsilon=0);

results in epsilon^-1 -2 -2*ln(2)

for xmaple 16.01. The console version does not add the wrong term "-2".

Apparently it works here: 

How is it possible to let multiple cores compute a loop faster?

For exaple:

for i = 1 to 1000 do

*computation(i)*

end do

The goal is to let a quad core cpu split the 1000 independant computations in 4 packages of 250 each to speed up the computation by the factor 4 so that core1 computes i from 1 to 250, core2 from 251 to 500 and so on, at the same time. Is this possible?

A triangle is given.The points

Hi, i have the following question: i've been asked to investigate the following family of functions:

f(x,y)=(be^a(x)^2)+y^2

the question is: How does the shape of each curve depend of a and b.

Thank you

Hello every one,

I want to plot two parameters against each other from a system of ode.

The system is

restart:

with(plots):with(LinearAlgebra):

Eq1:=diff(f(eta),eta$3)+f(eta)*diff(f(eta),eta$2)-diff(f(eta),eta$1)^2-M^2*diff(f(eta),eta$1)+M^2*b+b^2=0;

Eq2:=diff(g(eta),eta$3)+f(eta)*diff(g(eta),eta$2)+(Lambda-2*diff(f(eta),eta$1)-M^2)*diff(g(eta),eta$1)+diff(f(eta),eta$2)*g(eta)=0;

N:=10: M:=0.1:

bc:=f(0)=0,D(f)(0...

Dear friends,

I ran into another problem while using Maple to do residue calculus. The following call

residue(1/x^(1/3)/(x^2+2*x*cos(phi)+1), x=-exp(I*phi));

returns zero -- it does not recognize the residue. On the other hand, if I do a subsitution like this

subs(x=-exp(I*phi), 1/x^(1/3)/(x^2+2*x*cos(phi)+1));

followed by

convert(%, trig); simplify(%);

then I get a divide by zero error, which shows that the...

Hello all,

I recently helped someone with a contour integration problem, you may find my calculation at the following link. It occurred to me to test this integral with Maple and Mathematica.

For example,

int(1/x^(1/3)/(x^2+2*x*cos(Pi/7)+1), x=0..infinity);

produces an unusable output from Mathematica. Maple is a little better,...

I have a procedure which accepts arguments of a (created by myself) type which are records, like so:

Subs:=proc(eqn::seq(equation),elemt::Element,$);
...

Here "Element" is  type I have defined; it is a record with certain fields present.

My question: will this work with option remember? I have the procedure sort-of working without the remember option, but I need to make it work recursively (the Element record can have fields which contain names of other records of type Element...

How to find the maximum of sqrt((x-1)*(y-x))+sqrt((7-y)*(1-x))+sqrt((x-y)*(y-7)) for x=-2..3,
y=0..11 with Maple?
Here are  a few unsuccessful attempts.
> Optimization:-Maximize(sqrt((x-1)*(y-x))+sqrt((7-y)*(1-x))+sqrt((x-y)*(y-7)),
 x = -2 .. 3, y = 0 .. 11);
Error, (in Optimization:-NLPSolve) complex value encountered
> maximize(sqrt((x-1)*(y-x))+sqrt((7-y)*(1-x))+sqrt((x-y)*(y-7)), x = -2 .. 3, y = 0 .. 11);

How to solve the inequality 3^((x+3)/(5*x-2))-4 >= 5*3^((9*x-7)/(5*x-2)) with Maple?
An exact and explicit solution is required.

Hi,

I'm trying to solve system of linear and nonlinear equations with inequalities and it looks like this:

    SX := solve(
                   [
                       seq(diff(EX,WX[k+1])=0, k = 0..m), # these are linear
 ...

use the formula provided in

http://en.wikipedia.org/wiki/Hermite_polynomials

and run in Maple

Restart;
with(SumTools):
Hn := n!*Summation(((-1)^(n/2-l))/((2*l)!*(n/2-l)!)*((2*x)^(2*l)),l=0..n/2);
genfun := Summation(Hn/n!*z^n,n=0..infinity);

but result is not exp(2*x*t - t^2)

1. I use your previous reply on V_G derive  on other characteristic function, but most are undefined

or complicated solution or can not evaluate, why?

for example

charc := 1+i*X/(i*X-1);
int(exp(-I*X*u)*charc, X = -infinity .. infinity);

it got this complicated thing
piecewise(Im(1/i) = 0, undefined, int(exp(-I*X*u)*(1+i*X/(i*X-1)), X = -infinity .. infinity, method = _UNEVAL))

Density := int(exp(-I*X*u)*charc, X = -infinity .. infinity);

How do i show that i am a student before my liscence expires.