I really like this package:

http://www.maplesoft.com/applications/view.aspx?SID=1671

But it seems to be impossible to intersect more than two areas:

restart;
with(InequalityGraphics);
inequalityplot(sin(x)+4*y>8 and x*y>1 and y<3-x,x=-2..4,y=-2..4,feasiblepoints=30);

It works if I leave out a condition:

inequalityplot(sin(x)+4*y>8 and x*y>1,x=-2..4,y=-2..4,feasiblepoints=30);

1. How do I 
2. Write a maple program to calculate the probability that k cards in 3-dimensonal set game (out of 27 cards) contain a set for k=3…9.

      3  randomly generate 12 cards in 4-dimensonal set game, either find a set or report “no set”.

I selected the whole document and expanded the document blocks. There near the top of the document were nine copies of "plots[interactive]()" all in a row. Deleting them fixed the problem. Seldom is a fix so easy. Many thanks.

Hi,

My data are 3 numbers that evolve in time: it makes a matrix n*3, where n is the number of occurences in time. I want to apply automaticaly a calculation (solution of a polynomial) n times on my data. How do I do that?

Thanks in advance,

Florent

Hi, I have the following problem with Maple 12:

all the decimals in plots (tickmarks) are displayed with a comma (e.g. 0,5).

Is it possible to replace the comma by the  point (i.e. 0,5 -> 0.5 ) ?

Unfortunately I cant see appropriate setting in the Maple help.

However the problem is rather serious: some journals (e.g. Phys Rev D)

require the tickmarks to be written without commas (the

This is my code:

> F := a*c;
                              a c
> K := (a*c)^2;
                             a^2  c^2
> simplify(%);
    ...

Hi all,

I want to get the general solution of the Laplace equation with boundary conditions below:

sys[1] := [diff(A(r, theta), r, r)+(diff(A(r, theta), r))/r+(diff(A(r, theta), theta, theta))/r^2 =0, D[2](A)(r, theta0) = 0, D[2](A)(r, theta0+beta) = 0, D[1](A)(R1, theta) = 0, A(R2,theta)=f(theta)];

pdsolve(sys[1]); do not give me the solution

Thank you to help to obtain the general solution and how (the method) to obtain this solution with Maple

the integral int(1/(1-2*r*cos(x)+r^2)^p,x=0..Pi/4), where 0<r<1 and p>1/2, or to find its asymptotics in r as r->1-?     

Thanks in advance.

In this series of blog posts, I have picked on Baseball win-loss records already.  Looking for other sources of things that might or might not be random, I decided to look at lottery draws.  Since I live in Canada, the obvious lottery to look at is the national Lotto 6/49.

A lotto 6/49 draw consists of drawing 6 numbered balls from...

How can I solve the following differential equation?

with plots

Eq[1]:=diff(f(eta),eta$3)+g(eta);

Eq[2] := (diff(g(eta), `$`(eta, 2)))/Pr+f(eta)*(diff(g(eta), eta));

BCs := [f(0), (D(f))(0), (diff(f(eta), `$`(eta, 2)))(2), g(0)-1, g(2)]

pars := {Pr = 1}

for i to 2 do eq[i] := subs(pars, Eq[i]) end do

eqs := eq[1], eq[2]

vars := f(eta), g(eta)

bcs := op(subs(pars, BCs))

sol := dsolve({bcs, eqs}, {vars}, type = numeric, output = array...

Can I solve the following two coupled differential equations instead of the previous one in Maple 13?

 with plots

Eq[1]:=3*f(eta)*(diff(f(eta), `$`(eta, 2)))-2*(diff(f(eta), eta))^2+3*g(eta)

Eq[2]:=(diff(g(eta), `$`(eta, 2)))/Pr+f(eta)*(diff(g(eta), eta))

BCs := [f(0), (D(f))(0), g(0)-1, g(25)]

pars := {Pr = 1}

for i to 2 do eq[i] := subs(pars, Eq[i]) end do

eqs := eq[1], eq[2]

vars := f(eta), g(eta)

No that way I could have chosen infinity at 10 or lower values also. f ' will go from 0 to 0 through positive values only. But how can I claim then that my solution is infinity independent. Because if I change the value of infinity whole solution changes.

Moreover at 15.6 the value of f ' is sufficiently close to 0 but value of g (0) is about 0.15 which is far greater than 0. g (0) goes to zero at about eta=25.

So  can I get rid of the problem?  

Is it possible to use Maple 13 to illustrate synthetic division?