vv

14077 Reputation

20 Badges

10 years, 70 days

MaplePrimes Activity


These are replies submitted by vv

@Markiyan Hirnyk 

For series (in a single variable) of a non-analytic function Maple uses "generalized series". Such series do not exist for several variables (or I don't know about them) so this is all that can be obtained.
E.g. what should be the series for (x-y)^(1/3) at x=0,y=0?

 

@Markiyan Hirnyk 

It works for me. Try a restart.

@Carl Love 

Ok, but it's still a bug. The function does not have discontinuities, so the option should be superfluous.
The antiderivative has a removable singularity at 0 so for Maple it remains to execute the subtraction (FTOC).
Note that f:=diff(sin(x^2)/x,x); also has a removable singularity at x=0 but int works ok.

@Markiyan Hirnyk 

Compare:

mseries(x^x*sin(y), [x=0,y=1], 3);
and
mtaylor(x^x*sin(y), [x=0,y=1], 3);

 

 

@Christopher2222 
Of course it works but the bug refers to the symbolic computation.

A curve (having 1 parameter) cannot substitute a surface parametrization which has 2 parameters.
I will not continue, I understood.

@one man 

It seems that you found a very serious BUG.

h:=foo(x) / erf(x)+a;
int(h,x);
     
a*x

This also happens if erf(x) is replaced by erf(x^(1/3))  etc.
For a=0 the integral remains unevaluated.

@one man 

If a parametrization is there, then please use it to plot the surface, instead of using implicitplot3d. As I said, it would be very useful but unfortunately I don't see it and I don't think it will be easy to obtain.

I think you ask too much from Maple, the PDF for sin(X) seems to be hard to compute.

Let's take a much simpler distribution where Maple also fails but which can be easily computed.

X := RandomVariable(Uniform(0, 4*Pi));

Maple says that the PDF for sin(X) is

f := piecewise(t < 0, 0, t = 0, 5/(4*Pi), t < 1, 1/(sqrt(-t^2+1)*Pi), 1 <= t, 0)

but the correct PDF is 2*f.

@one man 

You have parametrized two curves (red an green, lying on the surface), but you have not parametrized the surface.

@one man 

No need for other examples of animated curves, you already posted dozens.
If you can, show us a real (approximate) parametrization for this surface, this would be useful.

Then it's a bug at least in documentation.

@Axel Vogt 

@one man 

If you really want to help the OP, why don't you state clearly in the worksheet:
the parametization for this surface is given by ...
(in the worksheet there isn't any parametrization, the surface is ploted by implicitplot3d).

In this case, an exact parametrization is:

plot3d([
(2 + cos(t))^(1/4) * signum(cos(u))*sqrt(abs(cos(u))),
(2 + cos(t))^(1/4) * signum(sin(u))*sqrt(abs(sin(u))),
signum(sin(t))*sqrt(abs(sin(t)))],
t=-Pi..Pi, u=-Pi..Pi, style=surface);


 

#maximize(int(exp(-x^4), x = k .. 3*k), location);

Jk:=int(exp(-x^4), x = k .. 3*k):

 

 

k0:=solve(diff(Jk,k),k,explicit)[1];

k0 := (1/10)*(5^(1/2)*(5^(1/2)*ln(3)^(1/2))^(1/2))

(1)

F:=int(exp(-x^4),x):

F:=simplify(convert(F,hypergeom)):

J:=simplify(eval(F,x=3*k0)-eval(F,x=k0));

J := GAMMA(5/4, (1/80)*ln(3))-GAMMA(5/4, (81/80)*ln(3))

(2)

evalf(J);

.5128436618

(3)

evalf(eval(Jk,k=k0));

.5128436616

(4)

 

 

 

 

One must change the variable.

f:=Psi((2*x+1)/(2*x))-Psi((x+1)/(2*x)):

MultiSeries:-series(eval(f,x=-x), x = 0);

series(Pi*cos((1/2)*Pi/x)/sin((1/2)*Pi/x)+Pi*sin((1/2)*Pi/x)/cos((1/2)*Pi/x)-x-(5/2)*x^2-6*x^3-(55/4)*x^4-30*x^5+O(x^6),x,6)

(1)

MultiSeries:-series(eval(convert(%,polynom),x=-x),x);

series((-Pi*cos((1/2)*Pi/x)/sin((1/2)*Pi/x)-Pi*sin((1/2)*Pi/x)/cos((1/2)*Pi/x))+x-(5/2)*x^2+6*x^3-(55/4)*x^4+30*x^5+O(x^6),x,6)

(2)

 

I have not verified if it agrees with Mathematica in this case.

 

 

First 132 133 134 135 136 137 138 Last Page 134 of 177