hi.for linear coupling equation

dsys3 := {-72.49829200*(diff(f1(x), x, x))+0.8377580411e-2*(diff(f2(x), x))-8.873545400*10^9*(diff(f3(x), x))+2.114533515*10^18*f1(x), -878.8477313*(diff(f2(x), x, x))+1.590065471*10^20*f2(x)-7.353421206*10^(-26)*(diff(f3(x), x, x))+4.891459762*10^10*f3(x), 4.027667395*10^(-20)*(diff(f3(x), x, x, x, x))-0.6274394007e-2*(diff(f3(x), x, x))+8.873545401*10^9*(diff(f1(x), x))-7.352113720*10^(-26)*(diff(f2(x), x, x))+4.904509456*10^10*f2(x)+1.208381068*10^19*f3(x)-2.499990383*10^26*omega*(diff(f3(x), x, x))}

by assuming and to expand these functions(f1-f2-f3) in polynomial form(e.g. Chebyshev, power polynomials, Legendre and etc).:

f1(x):=(∑)H[i] *(e)^(lambda[i] *x); f2(x):=(∑)alpha[i]*H[i] *(e)^(lambda[i] *x);f3(x):=(∑)GAMMA[i]*H[i] *(e)^(lambda[i] *x)

how i detemine lambda[i] which are roots of the  characteristic equations?in other word how i can build characteristic relation for coupling equation?

2)how i can gain value for alpha[i] and GAMMA[i]

by using equation

Q1 := subs(x = 0, sum(H[i]*exp(lambda[i]*x), i = 1 .. 8)); Q2 := subs(x = L, sum(H[i]*exp(lambda[i]*x), i = 1 .. 8)); Q3 := subs(x = 0, sum(alpha[i]*H[i]*exp(lambda[i]*x), i = 1 .. 8)); Q4 := subs(x = L, sum(alpha[i]*H[i]*exp(lambda[i]*x), i = 1 .. 8)); Q5 := subs(x = 0, sum(GAMMA[i]*H[i]*exp(lambda[i]*x), i = 1 .. 8)); Q6 := subs(x = L, sum(GAMMA[i]*H[i]*exp(lambda[i]*x), i = 1 .. 8)); M := diff(sum(GAMMA[i]*H[i]*exp(lambda[i]*x), i = 1 .. 8), x); Q7 := subs(x = 0, M); Q8 := subs(x = L, M)

????

thanks...

chebyshev.mw

   1*  printf("degree = %f\n",a);

end proc

   2   printf("radian = %d\n",evalf(1/180*a*Pi))

When executing the following orders,

a:=0.006:

convert(a, symbol);

the result is .6e-2.

How to make Maple return the form 0.006, just as the original?

I downloaded Maple Player, and I don't know how can I use it resolve Maths problems. Kindly, could you explain to me the procedure I shall follow for the reason to use it?

How I can watch the direction of current in electric circuit?For example in AC also plot value on maplesim how do it do?(I need a solution with example arrow or animation).thank

Hello

I want to plot in semilog graph the attached function.where b from 1 to 5 and R from 1 to 100000(in logR)I tried with the plot builder but i think i am doing smthing wrong

Download re.mw

I want to obtain polynomial representation of my data:

with(Statistics):

X:=Vector([huge data package-X],datatype=float):

Y:=Vector([huge data package-Y],datatype=float):

NonlinearFit(c*t^2+b*t+a, X, Y, t)

but I can't see any result. What's the problem?

My worksheet: He_p=f(t).mw

How plot two functions of two variables to (2-dimension)?

restart;
approximate := exp(-2*t)+x*exp(-2*t)+(1/2)*exp(-2*t)*x^2+(1/6)*exp(-2*t)*x^3+(1/24)*exp(-2*t)*x^4+(1/120)*exp(-2*t)*x^5+(1/720)*exp(-2*t)*x^6+(1/5040)*exp(-2*t)*x^7+(1/40320)*exp(-2*t)*x^8+(1/362880)*exp(-2*t)*x^9+(1/3628800)*exp(-2*t)*x^10+(1/39916800)*exp(-2*t)*x^11+(1/479001600)*exp(-2*t)*x^12+(1/6227020800)*exp(-2*t)*x^13+(1/87178291200)*exp(-2*t)*x^14+(1/1307674368000)*exp(-2*t)*x^15+(1/20922789888000)*exp(-2*t)*x^16+(1/355687428096000)*exp(-2*t)*x^17+(1/6402373705728000)*exp(-2*t)*x^18+(1/121645100408832000)*exp(-2*t)*x^19+(1/2432902008176640000)*exp(-2*t)*x^20+(1/51090942171709440000)*exp(-2*t)*x^21;
apr := unapply(approximate, x, t);
Exact := (x, t)-> exp(x-2*t) ;
plot3d(exp(x-2*t)-approximate, x = 0 .. 5, t = 0 .. 5);

plot.mw

Suppose I have the parametric equations of a circle

x=cost

y=sint

where t runs from 0 to 2*pi. How can I show the orientation of this parametric curve on a plot?

I have run into a problem with a file I am preparing for a class. The file is in Document mode with one large section and a number of subsections. Input is 2-d input.

The first subsection behaves normally, input is there, output is there and so on.

The second section does not display the input. The input is still there, somewhere, as the sheet recalculates properly and I can also see there is input when looking at the file with an editor. But no show in Maple.

The third subsection does not show input either.

The fourth subsection is normal again and shows input.

Each of these sections is several screens long. The file actually is an older one where I am adding subsections. The first one (that works normal) is a new one. The original file (before I edited it to add a subsection) works fine still.

So I assume I inadvertently did something that causes this, even though the old subsections are not being edited. I do load Physics[Vectors] but cannot believe that does it. The original file also loads it.

The file was created in Maple 15 and that is where I edited this one. I opened it in Maple 2015 on a different computer, but the behaviour is identical.

Again, the input is there somewhere; the sheet recalculates corrrectly, but I cannot edit the input in the sections that do not show it (I guess that is not a surprise, but it excludes things like a white font color on a white background as there is nothing to select).

Does anyone have a hint how to unhide the input? I tried many things (menu, contextual menu, prefs,...) but no help. It is actually kind-of annoying.

FWIW, this is on Mac OS X, 10.10.5 Yosemite for Maple 2015.1. And 10.5.8 for Maple 15.

Thanks,

M.D.

I have a polynomial expression that I would like to cast into a specific form. The expression is

and I know that it can be simplified into a form involving squares of (A[Qi]-Pi). It is trivial to do this on paper; how can I convince Maple to do this.

The solution I came up with was to use mtaylor and expand about the forms I know to be there:

mtaylor((3),[A[Q1]=P1,A[0]=P2*rho/(rho+Q1),A[Q3]=P3],6);

which is what I want (close to, anyway). Now, I consider this to be a bit of a dirty trick that works here as the expression is simple and no higher-order terms are present so in fact the solution is exact. But, are there methods along simplify and friends that can do this? I have not been successfull with those...

This is a part of a much longer worksheet and part of a lecture, so I need Maple to be able to do this. The mtaylor trick works, but I would not want to miss an obvious approach that may work where mtaylor would get confused.

Thanks,

M.D.

test.mw

hi guys,

i have a first order differential equation and i want to plot it with odeplot in polar coordinates .

thanks in advance1.mw

Dear all,

I am trying to solve a differential equation like the one below:

f := y(x)+5*(diff(y(x), x))+2*x^3*(eval(diff(y(x), x), x = 0))+3*y(0)

however, because of having y(0) in the quation, I get the error below:

Error, (in dsolve) found the indeterminate function y with different arguments {y(0), y(x)}

does anyone know how I could solve this?

Suppose that I have the equation x=1. I want to manipluate it. For example, I want to multiply by 2. Then, Take the power of two. Next, take a cubic root. How can I do this in Maple?

Qu_in_maple.mw

How to compute the  n component of U[i] even to reach the exact solution?

Download Qu_in_maple.mwQu_in_maple.mw

How to find the  n component of U[i] even to reach the Exact solution cos(x)