Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

Is there a document with all elementairy plottools commands to find?

i must construct a numberline and lines to e4xplain with a arrow and text under it.

with(Finance):
with(Statistics):
X:=RandomVariable(Binomial(nn, pp));
Drift(X);

How to listplot two vectors on the same graph?

That means having two lines.

f1 := -2*x1 - x2;
f2 := -x1 - 4*x2;
g1 := 2*x1 + 3*x2 - 6;
g2 := -x1;
g3 := -x2;
penalty := lambda1*Max(f1-M,0)+lambda2*Max(f2-M,0)+(M^2)*(max(g1,0) + max(g2,0) + max(g3,0));
M := 1;
k := 1;
s := 1;
lambda1 := 0.5;
lambda2 := 0.5;
with(Optimization):
Minimize(subs(lambda2=0.5, subs(lambda1=0.5, subs(M=1, penalty))));

correct answer for these parameters should be below, however, Minimize got error

when lambda1 = 0.5, lambda2 = 0.5
(x1, x2) = 1.551123, 0.965918
f(x1, x2) = (–4.068164, –5.414795);

in maple 12 or 15

assume 

result := Vector(10);

for i from 1 to 10 do

        result[i] := i;

od;

how to plot it against i?

after tried plot(result(x), x=1..10);

Hi all. I am using Maple 18.

1. How can I make maple NOT plot discontinuties with a vertical line? For example, plotting y=tan(x) displays vertical lines. Is there a setting to turn this off permanently?

2. When I type y=sin(x-Pi/2) and press enter, y = -cos(x) is displayed in blue. I am sure they are both the same thing, but I would like to see the expression that I typed, not an alternate expression that Maple wants to display.

3. Why do some expressions require a ; at the end, whilst others don't? Ie. y = sin(x) and y = 1+sin(x) do not, but y=2*sin(x) results in a "Warning, inserted missing semicolon at end of statement"

4. Is there a section on Mapleprimes(this site) where new users can ask questions? I would like to browse it to see what sort of problems other new Maples users have encountered. I am sure that my above questions may have been asked a few times over the years by newbies like myself.

Thanks in advance. :)

hi maple-friends !

for my work i have to solve a system of differential equations numerically - no problem with maple :-)

my problem: how can i get the resulting data of the numeric solutions in a file ?

(for example to use them with gnuplot)

what i have to do exactly ? i know just about writedata and readdata commands...

can anyone send me an example with a few comments ?

greetings,  kreso

 

 

With this contribution we opened a breach in the proper use of the program applied Thermodynamics.

 

Introducción_a_la_Termodinámica.mw     (in spanish)

 

 

 

How can I know the solution is correct??

 

Here is the code:

s := solve(sin(x^2) = 1/2);
test := subs(x = s[1], sin(x^2) = 1/2);

 

 

I am trying to produce a worksheet that will give me the two roots of a quadratic equation.

This is what I have:

Maple Worksheet

 

As you can see, It's not giving me the right answers. What do I do?

Thanks,

Paul

 

I see a document with maple graphics in it, but i don't see the maple code in the document.

Has the author protected his code ?
I like to see the maple code used for the document ..how to read this maple code?

Note: try to find answer on the Maple site , but no idea where to find thisinformation on how to set up a document..frustrating.  
 

hi,

i obtained values for h(t) and u(t) and i wana obtaine s(t) , i don't konw how can i do it

 

for h(t) and u(t) ,

 

sol1 := dsolve([4.00000000000000*u(t)^2*h(t)*(diff(diff(h(t), t), t))-8.00000000000000*h(t)^2*(427.2460938*u(t)+385620.1174/u(t)-25671.38673)^2+16.0000000000000*u(t)*h(t)*(427.2460938*u(t)+385620.1174/u(t)-25671.38673)*(diff(h(t), t))+(16406.2500000000*(-29.8200000000000+u(t)))*h(t)^2*(427.2460938*u(t)+385620.1174/u(t)-25671.38673)+7171.87500000000*u(t)*h(t)*(diff(h(t), t))-16406.2500000000*h(t)^2*(30-u(t))*(427.2460938*u(t)+385620.1174/u(t)-25671.38673)+u(t)^2*h(t)-0.225000000000000e-1+0.225000000000000e-1*(.997494986604054+.106105802501554*sin(t-1.5))^2+4.00000000000000*(h(t)*(427.2460938*u(t)+385620.1174/u(t)-25671.38673)+u(t)*(diff(h(t), t)))^2 = 0, diff(u(t), t) = 427.2460938*u(t)+385620.1174/u(t)-25671.38673, h(1.44) = 0.145e-4, (D(h))(1.44) = .12093, u(1.44) = .62], numeric)

 

and s(t) is , s(t)=1/r*d/dt(u(t)*h(t))

 

thanks.

Code was computed on two different PC:
1) Win 8.1, Maple 17.02 x64
2) Win 8.1, Maple 18.01 x64

In brief:

n:=3: 
Grid:-Seq('f(i)', i = 1 .. n):

works well in Maple 17.02 but gives an error in Maple 18.01. Why?

However,

(j -> Grid:-Seq('f(i)', i = 1 .. j))(n):

works well for both Maple versions.

according to examples from Maple help page
http://www.maplesoft.com/support/help/Maple/view.aspx?path=Grid%2fSeq
we have to pass exactly 'f(i)' (not just f(i)) into Grid:-Seq(...). Why?

Why doesn't Digits:=30: work properly for Grid:-Seq(...)?

For details see attached file. Output was produced in Maple 17.02. In Maple 18.01 the output will differ.


restart; n := 3; f1 := proc (i) options operator, arrow; evalf(sqrt(i)) end proc; f2 := proc (i) options operator, arrow; evalf(sqrt(i+1)) end proc; f3 := proc (i) options operator, arrow; evalf(i*Pi) end proc; g1 := proc (f, n) local za, zb, zc, str; str := sprintf("g1(%a,n)", f); za := seq(f(i), i = 1 .. n); zb := Grid:-Seq(f(i), i = 1 .. n); zc := (proc (j) options operator, arrow; Grid:-Seq(f(i), i = 1 .. j) end proc)(n); print("------------------------------"); print(cat("(a):   ", str), za); print(cat("(b):   ", str), zb); print(cat("(c):   ", str), zc); print("------------------------------") end proc; g2 := proc (f, n) local za, zb, zc, str; str := sprintf("g2(%a,n)", f); za := seq('f(i)', i = 1 .. n); zb := Grid:-Seq('f(i)', i = 1 .. n); zc := (proc (j) options operator, arrow; Grid:-Seq('f(i)', i = 1 .. j) end proc)(n); print("------------------------------"); print(cat("(a):   ", str), za); print(cat("(b):   ", str), zb); print(cat("(c):   ", str), zc); print("------------------------------") end proc

3

(1)

g1(f1, n);

"------------------------------"

 

"(a):   g1(f1,n)", 1., 1.414213562, 1.732050808

 

"(b):   g1(f1,n)", 1, 2^(1/2), 3^(1/2)

 

"(c):   g1(f1,n)", 1, 2^(1/2), 3^(1/2)

 

"------------------------------"

 

"------------------------------"

 

"(a):   g1(f2,n)", 1.414213562, 1.732050808, 2.

 

"(b):   g1(f2,n)", 1.414213562, 1.732050808, 2.000000000

 

"(c):   g1(f2,n)", 1.414213562, 1.732050808, 2.000000000

 

"------------------------------"

 

"------------------------------"

 

"(a):   g1(f3,n)", 3.141592654, 6.283185308, 9.424777962

 

"(b):   g1(f3,n)", 3.141592654, 6.283185308, 9.424777962

 

"(c):   g1(f3,n)", 3.141592654, 6.283185308, 9.424777962

 

"------------------------------"

 

"+++++++++++++++++++++++++++++++++++++++++++"

 

"------------------------------"

 

"(a):   g2(f1,n)", 1., 1.414213562, 1.732050808

 

"(b):   g2(f1,n)", 1., 1.414213562, 1.732050808

 

"(c):   g2(f1,n)", 1., 1.414213562, 1.732050808

 

"------------------------------"

 

"------------------------------"

 

"(a):   g2(f2,n)", 1.414213562, 1.732050808, 2.

 

"(b):   g2(f2,n)", 1.414213562, 1.732050808, 2.

 

"(c):   g2(f2,n)", 1.414213562, 1.732050808, 2.

 

"------------------------------"

 

"------------------------------"

 

"(a):   g2(f3,n)", 3.141592654, 6.283185308, 9.424777962

 

"(b):   g2(f3,n)", 3.141592654, 6.283185308, 9.424777962

 

"(c):   g2(f3,n)", 3.141592654, 6.283185308, 9.424777962

 

"------------------------------"

(2)

Digits := 30;

30

 

"------------------------------"

 

"(a):   g1(f1,n)", 1., 1.41421356237309504880168872421, 1.73205080756887729352744634151

 

"(b):   g1(f1,n)", 1, 2^(1/2), 3^(1/2)

 

"(c):   g1(f1,n)", 1, 2^(1/2), 3^(1/2)

 

"------------------------------"

 

"------------------------------"

 

"(a):   g1(f2,n)", 1.41421356237309504880168872421, 1.73205080756887729352744634151, 2.

 

"(b):   g1(f2,n)", 1.414213562, 1.732050808, 2.000000000

 

"(c):   g1(f2,n)", 1.414213562, 1.732050808, 2.000000000

 

"------------------------------"

 

"------------------------------"

 

"(a):   g1(f3,n)", 3.14159265358979323846264338328, 6.28318530717958647692528676656, 9.42477796076937971538793014984

 

"(b):   g1(f3,n)", 3.14159265358979323846264338328, 6.283185308, 9.424777962

 

"(c):   g1(f3,n)", 3.14159265358979323846264338328, 6.283185308, 9.424777962

 

"------------------------------"

 

"+++++++++++++++++++++++++++++++++++++++++++"

 

"------------------------------"

 

"(a):   g2(f1,n)", 1., 1.41421356237309504880168872421, 1.73205080756887729352744634151

 

"(b):   g2(f1,n)", 1., 1.414213562, 1.732050808

 

"(c):   g2(f1,n)", 1., 1.414213562, 1.732050808

 

"------------------------------"

 

"------------------------------"

 

"(a):   g2(f2,n)", 1.41421356237309504880168872421, 1.73205080756887729352744634151, 2.

 

"(b):   g2(f2,n)", 1.414213562, 1.732050808, 2.

 

"(c):   g2(f2,n)", 1.414213562, 1.732050808, 2.

 

"------------------------------"

 

"------------------------------"

 

"(a):   g2(f3,n)", 3.14159265358979323846264338328, 6.28318530717958647692528676656, 9.42477796076937971538793014984

 

"(b):   g2(f3,n)", 3.141592654, 6.283185308, 9.424777962

 

"(c):   g2(f3,n)", 3.141592654, 6.283185308, 9.424777962

 

"------------------------------"

(3)

``

NULL


Download Grid[Seq].mw

Hello guys...

please help me to solve these equation.I have some equation with some boundary condition.

Why can't I have good results for it?
q3:=-0.1080877976e-1:
q2:=0.04351279185:
q1:=-0.7037638761e-1:
q0:=0.05575044494:
c:=3:

eq := q3*m^6+q2*m^4+q1*m^2+q0;
rishe := solve(eq = 0, m);
a := 1/(2*c); rho := a/`#msub(mi("t"),mn("1"))`;
f0 := evalf(cosh(abs(rishe[1])*xi));
f1 := evalf(cosh(abs(Re(rishe[3]))*xi)*cos(abs(Im(rishe[3]))*xi));
f2 := evalf(sinh(abs(Re(rishe[3]))*xi)*sin(abs(Im(rishe[3]))*xi));
pin := C0*k0*f0+C1*f1+C2*f2;
ppin := diff(pin, xi); pis := C0*f0+(k1*C1+C2*k2)*f1+(C2*k1-k2*C1)*f2;
pin1 := evalf(subs(xi = a, pin));
pin2 := evalf(subs(xi = -a, pin));
pin3 := evalf(subs(xi = a, ppin));
pin4 := evalf(subs(xi = -a, ppin));
pis1 := evalf(subs(xi = a, pis));
pis2 := evalf(subs(xi = -a, pis));
hal := solve({pin1 = sigma01xx, pin2 = sigma01xx, pin3 = 0, pin4 = 0, pis1 = sigma01xy, pis2 = sigma01xy}, {C0, C1, C2, k0, k1, k2});
how can I have a good result with this method?
please help me to solve this multi equations multi variable.

I have a big expression with multiple terms. The expression is kind of :

expr = a*ln(u) + b*ln(u) + a*ln(v)+b*ln(v)

I want to factor ln(u) and ln(v) to get (a+b)*ln(u) + (a+b)*ln(v)

I tried factor(expr,ln(u)) but I get the error :
Error, (in factor) 2nd argument, ln(2*da+(4*da^2+4*d^2-4*da*Sigma[a]+Sigma[a]^2+Delta[b]^2)^(1/2)-Sigma[a]), is not a valid algebraic extension.

I tried without Delta[b] and Sigma[a] : deltab and sigmaa but it didn't work either.

Do you have an idea how to factor the many ln ?

Thanks,
Mathieu

First 1359 1360 1361 1362 1363 1364 1365 Last Page 1361 of 2248