I have this set of four equations and five constants, how I will shoot for x5 to find the unique solution

I assumme x5= pi/2 as initial guess but no solution

any body can help?

I am writing a textbook in biomedical engineering and using Maple 14 for generating figures.  In many of the graphs, my axis labels have subscripts or superscripts.  For example in a 2D plot statement I type   labels=[x,f[0](x)] which gives a subscript 0.   However, both x and f₀(x) appear in italics.  How can I have them appear as normal...i.e. without italics? The labelfont command does not seem to have an instruction to remove the italics.  Can you assist me?

I would like to solve {x^2+y^2+z^2 = 3, x+y+z = 3} over the reals. Clearly x=1,y=1,z=1 is a solution.

Maple seems to have a hard time with this. I have tried using with(RealDomain) and various commands.

The last solution  is getting closer to the real number answer if i substitute z = 1, but then i get the strange answer { 1=1, x=1,y=1}

I tried using wolfram and it showed me the correct answer.

Rest assured, I am a strong maple fan. I sometimes use wolfram for quick and dirty solutions.

Also is there a way to turn off "with(RealDomain)", switch back to the default domain, without using 'restart'. 

Is there any way i can define a value to a variable together with an angle? 

I am looking to do something like this:

the example is from Mathcad, but i was hoping there was some way to do it in Maple also?

I want to write a code for solving following PDE with Cauchy data.
Equation:  (y-u(x,y))*(diff(u(x,y), x))+(u(x,y)-x)*(diff(u(x, y), y)) =x-y
Cauchy Data: u(x,y)=0 on xy=1.

THE CODE:
restart;
PDE := (y-u(x,y))*(diff(u(x,y), x))+(u(x,y)-x)*(diff(u(x, y), y)) =x-y;ic:=u(x, 1/x)=0;
ans := pdsolve({PDE,ic});
pdetest(ans, PDE);

Maple doesn' t give a solution.Why?

"Error, (in PDEtools:-Library:-NormalizeBoundaryConditions) unexpected occurrence of the variables {x} in the 2nd operand of u(x, 1/x) in the given initial conditions"

I

How to get the number of parameters of an operator/procedure? Like this.

How do I move a circle around a sphere?

See attached:  WA61_circle_sphere_post.mw

Circle shares surface area of sphere, how can circle be moved independently around sphere?

I would like to retain the patchwork of the sphere to resemble latitude/longitude lines.

Thanks in advance

Les

I am using the LinearAlgebra package to do dynamics between a rotating Cartesian coordinate system and a fixed Cartesian coordinate system. The VectorCalculus package is not what I need. 

Since I can't seem to get my test worksheet to paste into this post, I will manually enter an "approximation" to it. I assume that the notation [x, y, z] represents a column vector. I also assume that x represents the cross product operator from the operator pallete. 

I just want to get any one of the three ways of doing a vector cross product (see below) to simply display in math notation as R x V. What I get from the three methods below for an unevaluated cross product is "ugly".

Any help or advice will be greatly appreciated.

> restart

> with(LinearAlgebra):

> R := Vector(3, [x, y, z])

                                                 R := [x, y, z]

> V := Vector(3, [u, v, w])

                                                 V := [u, v, w]

>R x V

                                                [-vz + wy, uz - wx, -uy + vx]

>'R x V'

                                               Typesetting:-delayCrossProduct(R,V)

>CrossProduct(R, V)

                                               [-vz + wy, uz - wx, -uy + vx]

>'CrossProduct(R,V)'

                                               LinearAlgebra:-CrossProduct(R,V)

> R &x V

                                               [-vz + wy, uz - wx, -uy + vx]

'R &x V'

                                               LinearAlgebra:-&x(R,V)

Can any one disprove maple answer in the attached document?
If not, what is the conclusion?
 

Download s_is_complex.mw

s_is_complex.mw

Is there any way to solve sin(x)=0 with solutions x=k*pi in Maple?

Many thanks!

Hey, guys. Can you help me one more time about the non-homogeneous differential equation, the function is shown below:

ODE:

y''(x)-0.00003019*y(x)^0.337=[9.542*10^(-13)]*x  ;    0<=x<=2945

BCs:

y(0)=0; y'(2945)=0; 

Actually, the right part is applied bending moment due to own weight. it is very small, but I don't think I may neglect it.  The exact solution is the best answer for me, the numerical solution is also available for me.  Can you show your code of Maple? Thank you for your any help in advance.   Sincerely, I appreciate it so so so much!!!

I use the convert(real_number, string) Maple 18 function and get the following :

tmp:=convert(0.0141,string); # I get ".141e-1"  What I really want is : "0.0141"

Is there any other way to convert a real number and leave it in its original form ?

Thanks.

I have a expression with polylog functions.I want to simplifying to Pi's constans.I tired with:

1. simplify
2. convert

but seems dosen't work:

simplify(sum((sin(k)/k)^7, k = 0 .. infinity))

#1+(1/128*I)*polylog(7, exp(7*I))-(7/128*I)*polylog(7, exp(5*I))+(21/128*I)*polylog(7, exp(3*I))-
(35/128*I)*polylog(7, exp(I))+(35/128*I)*polylog(7, exp(-I))-(21/128*I)*polylog(7, exp(-3*I))+
(7/128*I)*polylog(7, exp(-5*I))-(1/128*I)*polylog(7, exp(-7*I))

 Mathematica give me:

How to do it in Maple?

My problem is fitting two complex-valued functions f and g:
|f(x,a,b,c)-g(x)|^2 < epsilon 
I want to find best approximation for a, b and c where parameters are real.
Can you suggest the method to solve this problem?
I have the analytic form of the functions f and g.

I have the following function involving 2 piecewise constructs:

ftotal := -1.70678763408500*10^6*dpp[f]*piecewise(t < 0, 0, 0 <= t and t <= t1, 1-cos(t*Pi/t1), t1 < t, 2)-3.41357526817000*10^6*corrFac*piecewise(t < 0, 0, 0 <= t and t <= t1, 1/2-(1/2)*cos(2*t*Pi/t1), t1 < t, 0)+3.51914976100000*10^8;

(This is a result from a prior calculation in Maple; I did not create this construct orginally). The condition blocks are the same for both piecewise functions so this can be simplified to one piecewise function. Per the Help this can be achieved using convert:

convert(ftotal,piecewise,t);

but I get this error:

Error, (in PiecewiseTools:-Convert) unable to compare 0 and t1

Since I pasted everything into a new sheet I know that t has no assigned value. Same is true for t1 (and specifically I need this for general t and t1). The conversion to Heaviside works; but converting from that back to piecewise fails with the same error.

Is there any way I can achieve the desired result other than doing it by hand?

Sample sheet is attached. I originally ran into this in Maple 2016 but verified the same issue is present in Maple 2017.

Thanks,

M.D.

piecewise.mw