Custom distribution
restart;
with(Statistics):
Density := 2*exp(-t^2)*sqrt(Pi);
Dist := int(Density, t);

a.

RealDist := Distribution(Dist(t-1));
Error, (in Statistics:-Distribution) unexpected argument(s): Pi(t)*(erf(t))(t)

b.

RealDist := Distribution(PDF = (t->2*exp(-t^2)*sqrt(Pi)), CDF = (t->Dist(t)), Mean = 1);

RealDist := Distribution(PDF = (t->2*exp(-t^2)*sqrt(Pi)), CDF = (t->Dist(t)));
X:=RandomVariable(RealDist(t-1));

I'd like to be able to get a quicker low accuracy computation of the argument of the complex-valued JacobiTheta1 function.

I only need as much accuracy as to get a decent plot, which means... I don't know... about 1e-3 relative accuracy?

If I can get a formula or approach that is "evalhf'able" then I can construct a procedure which does this action and writes results inplace to a float[8] Matrix.

The naive approach in the code below takes about 6min...

Hi all, I am having two simultaneous equations , i dont know how to solve these two equations, any one help to solve these equations..

Im knowing the approximate/accurate answer for the equations,
These are the values for my equations

alpha=1.53222, beta= -0.555345, kappa= -0.399943,

need_help.mw

Thank you

Find all the positive integers ,such that

Hello,

I'm trying to plot the function (5*x)/(x^2-4) highlighting all of its characteristics (maxima, minima, convexity, concavity...). I would like to plot this function in different colors in accordance with the different intervals of concavity and convexity. In order to do this, I have tried to use the piecewise function, as shown on another question (http://www.mapleprimes.com/posts/43593-Piecewise--Color). However, I feel I haven't understood quite well how it works, as I can't figure out how to write the intervals... I don't know if I should show you my attempt, but I think it's quite ridiculous (I just have tried to adapt it to the example shown on the question I have read).

Thank you very much for your attention!

Have a nice day!

Skyblue

a.
charc := 1/exp(-(1/4)*i^2*X^2);
Density := int(exp(-I*X*u)*charc, X = -infinity .. infinity);

b.
charc := 1/(i*X/(exp(i*X)-1))^n;
Density := int(exp(-I*X*u)*charc, X = -infinity .. infinity);

c.
Density := int(exp(-I*X*u)/(((-1+exp(i*X)+p)/(p*exp(i*X)))^y*(1/exp(i*X))^n), X = -infinity .. infinity);

d.
Density := int(exp(-I*X*u)/(ln(exp(i*X))/(exp(i*X)-1))^n, X = -infinity .. infinity);

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

Would you please send me the numerical laplace inversion code of "de Hoog" 1982?

i use previous post link to derive again for weibull, the final integration seems can not be integrated,

any things need to notice?

Weibull
WeibullDist := (η/rho)*((x/rho)^(η-1))*exp(-((x/rho)^η));
WeibullDist := 1-summation((η/rho)*((x/rho)^(η-1))*exp(-((x/rho)^η)),x=0..k-1);
WeibullDist := int((η*z)*(((k-1)*z)^(η-1))*exp(-(((k-1)*z)^η)),z=0..1/rho);
WeibullDist := int((η*z)*(((k-1)*z)^(η-1))*exp(-(((k-1)*z)^η)),z=0..1/rho);

svp. Je suis débutant en Maple et je souhaite que vous m'aidiez à réaliser une courbe avec maple étant donné un ensemble de points, et non pas une fonction. Comment faire? merci.

Dear friends, 

I used Maple 13 previously, now am trying to install Maple 16 (Windows 7, 64bit, 2GB RAM), installation is ok. 

But when I start using the Maple, then I am getting an error message 'Waiting for Kernel Connection' and then Kernel connection not found. 

I disabled the windows firewall, and then reinstalled Maple  16, and again I got the same error.

what can I do now? how to cross that? its urgent for me. 

can someone write code to replicate this in maple.

Begin with a square and draw an octagon inside it, as pictured. Now draw a regular 16-sided polygon inside the octagon, like so

i'm guessing it'll use the polygonplot comand

expand(convert(simplify(GammaDensity, size),exp)),size)

www.stat.rice.edu/~dobelman/textfiles/DistributionsHandbook.pdf

i use the derivation of gamma in above book to derive density again, but fail

GammaDist := int((lambda^k)*(z^(k-1))*(exp(-lambda*z))/(k-1)!, z=0..t);
GammaDensity := diff(GammaDist, t);

GammaDensity := (b^a)*(x^(a-1))*exp(-x*b)/GAMMA(a);

Hi every one

I was wondering whether is it possible to make a subzone plot with in a zone or not?

some thing like this

 Thanks

Dear Maple users

I know how to plot surfaces in 3D. However now I have a special task: I want to plot a piece of a solid region in 3D, more precisely a transverse or logitudinal wave. I wonder if there is an easy way to do this in Maple? Any hint will be appreciated!

Regards,

Erik