MaplePrimes Questions

I have a list L:=[[0,0,0], [1,0,0], [1,1,0], [0,1,0], [0,0,1], [1,0,1], [1,1,1], [0,1,1]] (8 vertices of a cube). How can I select four vertices of the list to make a regular tetrahedron?

Hello,

I am experiencing some trouble with the function Minimize of the Optimization package. I have some trouble understanding what Maple is doing with nice functions already.

f := (x-2)^2+1;
                                 2    
                          (x - 2)  + 1
Minimize(f, {x >= -2, x <= 2});
             [1., [x = HFloat(1.9999999999999998)]]
Minimize(f(x), {x >= -2, x <= 2});
                    [1., [x = HFloat(2.0)]]
g := proc (x) options operator, arrow; (x-2)^2+1 end proc;
            2    
x -> (x - 2)  + 1
Minimize(g, {x >= -2, x <= 2});
Error, (in Optimization:-NLPSolve) constraints must be specified as a set or list of  procedures
Minimize(g(x), {x >= -2, x <= 2});
             [1., [x = HFloat(1.9999999999999998)]]

Hello there!

I have just an elemental question. Given an equation as input, how could I write a procedure to know the variables involved in that equation? 

For example, my input is 2x+3y=0, and I would like to have the output  {x,y}.

Thanks in avance for the help!

I have the equations of a trajectory:

I am trying to study a solution so I can learn how to do this. I know the graph should look like this:

But I don't know how to plot x(t) and y(t) as a graph of y vs x.

 

This seems like it should be easy but I've never done this before. Please help!

Hi all,

I am attempting to have the piecewise function

Render using either mathML or Letex in maple, using the syntax:

f := piecewise(-Pi <= x and x < 0, 1, 0 <= x and x < Pi, 0);

la := latex(f);

mml := MathML[ExportPresentation](f);

 

Unfortunately, as you will notice the latex produces some really annoying "and" words amongst the code.  While the MathML produces some equally annoying "&wedge;", and symbols, amongst the code.

Any help would be appreciated.

 

Mark

Hello,

I have a question about the Import of .txt file:

I can import the following .txt, but everytime I want to convert in a matrix or something else, maple chrashes. 

I need some parts (smaller matrices) of this data (for example: all values from coloumn 200-400 and row 100-600)

I hope somebody can help me

Thanks 
Martin

-Validierung-Stahl-AI-.txt

 

 

Hey 

i want to solve these 3 eqations 

21000 = ((10/1000)/60)*4181*983*(x-y)

H = -((10/1000)/60)*4181*ln(1-((x-y)/(x-40)))

H = 124+102'ln(x-40)+(7+2*ln(x-40))

 

with the result of:

H,x,y

 

how do i do that?

 

Thanks

Hi everyone, I am trying to plot field lines but I face problem in plotting field plot. kindly help me if anyone can do it. Find the code in the attached file. Thank you.

Field_lines.mw

tomleslie 2300Mohsen 20 @Carl Love @Markiyan Hirnyk @maple fan 175 @asa12 405  @Adri van der Meer 1253 

restart;

f:=5*x^3-5*x+1;

5*x^3-5*x+1

(1)

s:=[solve(f)]; evalf(%);  # All the roots are real

[(1/30)*(-2700+(300*I)*219^(1/2))^(1/3)+10/(-2700+(300*I)*219^(1/2))^(1/3), -(1/60)*(-2700+(300*I)*219^(1/2))^(1/3)-5/(-2700+(300*I)*219^(1/2))^(1/3)+((1/2)*I)*3^(1/2)*((1/30)*(-2700+(300*I)*219^(1/2))^(1/3)-10/(-2700+(300*I)*219^(1/2))^(1/3)), -(1/60)*(-2700+(300*I)*219^(1/2))^(1/3)-5/(-2700+(300*I)*219^(1/2))^(1/3)-((1/2)*I)*3^(1/2)*((1/30)*(-2700+(300*I)*219^(1/2))^(1/3)-10/(-2700+(300*I)*219^(1/2))^(1/3))]

 

[.8788850663-0.2e-9*I, -1.088033915-0.2598076212e-9*I, .2091488484+0.2598076212e-9*I]

(2)

max(s);  # ?

Error, (in simpl/max) complex argument to max/min: (1/30)*(-2700+(300*I)*219^(1/2))^(1/3)+10/(-2700+(300*I)*219^(1/2))^(1/3)

 

type(s,list(realcons)); # Wrong, the type realcons should not be purely syntactic; or is it?

false

(3)

R:=convert(s,RootOf):

max(R);  #  For nested RootOfs fails

Error, (in simpl/max) complex argument to max/min: (1/30)*RootOf(_Z^3+2700-300*RootOf(_Z^2+1, index = 1)*RootOf(_Z^2-73, index = 1)*RootOf(_Z^2-3, index = 1), index = 1)+10/RootOf(_Z^3+2700-300*RootOf(_Z^2+1, index = 1)*RootOf(_Z^2-73, index = 1)*RootOf(_Z^2-3, index = 1), index = 1)

 

sort(s): evalf(%);  # Wrong

[.8788850663-0.2e-9*I, .2091488484+0.2598076212e-9*I, -1.088033915-0.2598076212e-9*I]

(4)

 

Workaround

 

S:=[seq(RootOf(f,x,index=i),i=1..3)];

[RootOf(5*_Z^3-5*_Z+1, index = 1), RootOf(5*_Z^3-5*_Z+1, index = 2), RootOf(5*_Z^3-5*_Z+1, index = 3)]

(5)

evalf(S);

[.2091488484, .8788850662, -1.088033915]

(6)

min(S);max(S);  # OK

RootOf(5*_Z^3-5*_Z+1, index = 3)

 

RootOf(5*_Z^3-5*_Z+1, index = 2)

(7)

sort(S);   # Wrong!

[RootOf(5*_Z^3-5*_Z+1, index = 1), RootOf(5*_Z^3-5*_Z+1, index = 2), RootOf(5*_Z^3-5*_Z+1, index = 3)]

(8)

################################

r:=(sqrt(2)+I)^3 + (sqrt(2)-I)^3;

(2^(1/2)+I)^3+(2^(1/2)-I)^3

(9)

type(r,realcons);  # Purely syntactic?

false

(10)

type(expand(r),realcons);

true

(11)

max(r,13);  # Even for such a simple expression?

Error, (in simpl/max) complex argument to max/min: (2^(1/2)+I)^3+(2^(1/2)-I)^3

 

 


Download TryHarder.mw

So I've got a function and try to find an extrema (and there is one on the plot), but Maple gives me empty brackets.

First, earlier it gave me 2 x-coordinates with extrema (both empty), but now (after reloading) it gives one and empty.

Second, how do I set an interval, if I want to look for extrema from x=0 to x=1, for example? I tried extrema (V, {0,1}, x) and (V, {x=0, x=1}, x), but nothing seems to work.

2.mw

Hi everybody,

I use the Grid package to do intensive computations.

For some reason I'm ignorant about, the test case described in the Grid[Server][StartServer] 

 help page doesn't work with Maple 2015 (neither on Mac OS X, neither on Windows 7 ; here is the mw file run on MAC Os X)

Could someone explain me why (probably something I did not read with enough attention ... some license maybe) ?
Thanks in advance

GridServer.mw

I need to calculate sum w2(x,y),

v2 := proc (x, y) options operator, arrow; sin(x)*cos(y) end proc;
u2 := proc (x, y) options operator, arrow; 3*sin(x)-cos(y) end proc;
w2 := proc (x, y) options operator, arrow; diff(v2(x, y), x)-(diff(u2(x, y), y)) end proc;
L1 := proc (x, y) option inline; abs(w2(x, y)) end proc; CodeTools:-Usage(evalhf(add(add(abs(w2(x, y)), x = 0 .. 10), y = 0 .. 10)));
Error, (in CodeTools:-Usage) unable to evaluate built-in function `diff` in evalhf

 but it is error , how  can be rewritten properly?

 

I created the following plot

plot([BesselJ(0, x), BesselJ(1, x)], x = 0 .. 10, color = [red, blue]);
 

What I want to do mext is calculate all x values on this interval wherethe two paths intersect

 Calculate all x values on this interval where

I have a question as this:

Examples as following:(come from MAPLE‘s help ) 
with(LinearAlgebra);
Ax := <1.00004, 1.99987, -0.12e-3>;
b := <1., 2., 0.>;
Add(Ax, b, 1, -1);

result is this:[0.400000000000400e-4, -0.129999999999963e-3, -0.120000000000000e-3]'

I think result is :[0.400000000000400e-4, -0.13e-3, -0.120000000000000e-3]' 

Is this a bug of MAPLE?



 

I am trying to solve the function


f :=  sqrt(1-x2)
L := int(sqrt(1+(diff(f(x), x))2), x = 0 .. 5)

Maple is returning an answer with Pi:  (1/2)*Pi+I*ln(5+2*sqrt(6))

How do I convert this into a numerical format?  

 

First 868 869 870 871 872 873 874 Last Page 870 of 2427