Preben Alsholm

13728 Reputation

22 Badges

20 years, 246 days

MaplePrimes Activity


These are replies submitted by Preben Alsholm

Your description of the problem is not simple enough for me to understand. I suggest that you post the code.

You may have noticed that nothing is plotted in the left half plane.

x^(1/3) is the principal value of the complex cube root. To get the one intended use surd(x,3) instead:

dfieldplot(diff(y(x), x) = sin(x*y(x))+3*x^2+surd(x,3)+4*y(x)^2+5*y(x), y(x), x = -5 .. 5, y = -5 .. 5, title = `tangent field`, color = black);

You may have noticed that nothing is plotted in the left half plane.

x^(1/3) is the principal value of the complex cube root. To get the one intended use surd(x,3) instead:

dfieldplot(diff(y(x), x) = sin(x*y(x))+3*x^2+surd(x,3)+4*y(x)^2+5*y(x), y(x), x = -5 .. 5, y = -5 .. 5, title = `tangent field`, color = black);

The equation I called E1, i.e.

diff(y(x), x) = sqrt(1-y(x)^2)/sqrt(1+x^2);

does not satisfy the usual requirements for uniqueness of solutions at points (x0, 1) or (x0, -1) for any x0.

Uniqueness of solutions at (x0, y0) is guranteed for the ode y' = f(x, y) with y(x0) = y0, if f and its partial derivative wrt. y are continuous in a neighborhood of (x0, y0).

These requirements are not satisfied for E1 for any point (x0, 1) or (x0, -1) since the partial derivative wrt. y of 

sqrt(1-y^2)/sqrt(1+x^2)

doesn't even exist at any such point.

Now the requirements are sufficient (not necessary), but there are in fact infinitely many solutions passing through any point (x0, 1), and the same holds for (x0,-1).

Your original equation E gives rise to two odes, which I called E1 and E2. Solutions to E1 has nondecreasing solutions and solutions to E2 have nonincreasing solutions. This allows for infinitely many oscillating solutions all starting with y(0) = 0.

 

The equation I called E1, i.e.

diff(y(x), x) = sqrt(1-y(x)^2)/sqrt(1+x^2);

does not satisfy the usual requirements for uniqueness of solutions at points (x0, 1) or (x0, -1) for any x0.

Uniqueness of solutions at (x0, y0) is guranteed for the ode y' = f(x, y) with y(x0) = y0, if f and its partial derivative wrt. y are continuous in a neighborhood of (x0, y0).

These requirements are not satisfied for E1 for any point (x0, 1) or (x0, -1) since the partial derivative wrt. y of 

sqrt(1-y^2)/sqrt(1+x^2)

doesn't even exist at any such point.

Now the requirements are sufficient (not necessary), but there are in fact infinitely many solutions passing through any point (x0, 1), and the same holds for (x0,-1).

Your original equation E gives rise to two odes, which I called E1 and E2. Solutions to E1 has nondecreasing solutions and solutions to E2 have nonincreasing solutions. This allows for infinitely many oscillating solutions all starting with y(0) = 0.

 

@BSchor You may try

sin(N*Pi) assuming N::integer;

and also sin(N*Pi);

The procedure sin knows how to handle Pi, try

showstat(sin);

I don't believe simplify is involved.

Another point, try

sum(k^2,k=1..N);
eval(%,N=3/2);
add(k^2,k=1..3/2);
sum(k^2,k=1..3/2);

You see that sum tries to find a general formula in the first case. That formula makes sense even for values of N that are not integers.

Or you could use `assuming`:

sum(sin(2*Pi*i/N), i = 1 .. N) assuming N::posint;
sum(sin(2*Pi*i/N)^2, i = 1 .. N) assuming N::posint;

You should try the version I suggested, where I did assume that your equation is 2nd order.

You cannot use D(epsilon) as D is differentiation of functions (procedures) in Maple. Thus D(sin) is cos.

D[1] means differentiation wrt. the first variable. Thus, if

f:= (x,y)-> x^2+3*y^3;

then D[1](f)(1,2)  is the partial derivative of f wrt. x and evaluated at the point (1,2).

You should try the version I suggested, where I did assume that your equation is 2nd order.

You cannot use D(epsilon) as D is differentiation of functions (procedures) in Maple. Thus D(sin) is cos.

D[1] means differentiation wrt. the first variable. Thus, if

f:= (x,y)-> x^2+3*y^3;

then D[1](f)(1,2)  is the partial derivative of f wrt. x and evaluated at the point (1,2).

In 1d-math input the right hand side of

2*(x^2+y^2)^2=25(x^2-y^2);

evaluates to 25, since it means the constant function 25 applied to the argument x^2-y^2.

Therefore the x-range needs to be larger to complete the picture:

plots:-implicitplot(2*(x^2+y^2)^2=25*(x^2-y^2),x=-4..4,y=-2..2,gridrefine=2);

 

In 1d-math input the right hand side of

2*(x^2+y^2)^2=25(x^2-y^2);

evaluates to 25, since it means the constant function 25 applied to the argument x^2-y^2.

Therefore the x-range needs to be larger to complete the picture:

plots:-implicitplot(2*(x^2+y^2)^2=25*(x^2-y^2),x=-4..4,y=-2..2,gridrefine=2);

 

@mattfred I rather doubt that you can get NextZero without upgrading. But there are other ways of finding zeros.

@mattfred I rather doubt that you can get NextZero without upgrading. But there are other ways of finding zeros.

@mattfred NextZero was not part of RootFinding in Maple 10, but was included in Maple 11 and later.

@mattfred NextZero was not part of RootFinding in Maple 10, but was included in Maple 11 and later.

First 214 215 216 217 218 219 220 Last Page 216 of 230