Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

Let f:R-> Rm a linear function i need help about a proc about matrix of the linear map Df(x),

our input will be n,m and f

such that,f:R2->R3 ,f(x,y,z)->(x+y,y+2z,x+y+z) and i wish resulting output with derivative matrix with respect to the standard bases in R2 and R3

Though Maple provides routines to express integers or floating in different
integer bases the output looks not as nice as I want to have it.

And for example it does not work as expected using the 'simple ways' (while
for hex there is no simple way for floats):

  Digits:=16; # for all the following

  x:=frac(evalf(Pi)):
  x:= x* SFloat(1,-14);
              ...

This post gives equation of stability region of a Runge-Kutta ODE solver (Dormand-Prince45) as implicit domain equation and ODE-IVP.

Contents are:

  • Runge-Kutta solver is implemented
  • Solver is applied to test equation and growth factor is obtained
  • Stability regions are defined by separating hyperplane (GF=growth factor=1)
  • Stability regions are plotted by bruteforce approach (implicitplot)
  • Boundary of stability regions...

Hi,

i try to use your code (i mean other way )   that give to me but it doesnot work. it give x[c] and y[r] at label.

i have maple 14 .

could you please help what is the problem?

last answer is wrtten by

It can be done with the labels option (see ?plot/options

Hi,

I have a problem with plot using maple. I want to plot x_c agaist y_r 

However, i have no idea how to make at label that   y_r  . In other word, i want to make r under y and ignore dash (-) that between y and r

and the same idea for x_c.

could you please help me in this plot label problem?

 

 

0 = 0, -(1/16)*cos(l1)*cos(l2)*cos(l3)*cos(l4)*(-Pi*x3+4*cos(Pi*t)) = 0, -(1/16)*cos(l1)*cos(l2)*cos(l3)*cos(l4)*(-Pi*x2+4*sin(Pi*t)) = 0, (1/16)*cos(l1)*cos(l2)*cos(l3)*cos(l4) = 0, 0 = 0, -(1/8)*cos(l1)*cos(l3)*cos(l4)*(-Pi*x3+4*cos(Pi*t)) = 0, -(1/8)*cos(l1)*cos(l2)*cos(l4)*(-Pi*x2+4*sin(Pi*t)) = 0, (1/8)*cos(l1)*cos(l2)*cos(l3) = 0

 

After I ran solve({eq1, eq2, eq3, eq4, eq5, eq6, eq7, eq8}, {l1, l2, l3, l4, t, x1, x2, x3}, AllSolutions); I got...

Hello.

I was thinking about how I have used Maple for making animations. Thinking about it, I remembered an animation that I made to motivate the students of a calculus course. With this animation, I was searching to show the students the power of Maple.

I would like to see other animations for getting new and interesting ideas to show the students.

If you want to upload some animations, we could do a funny post with many animations.

Visualizing_the_SVD_.mw

Hola ev1:

I like to shorten the size of the command, through setoptions3d function. But it seems that it does not interact with ApplyLinearTransformPlot function.
How to get to label the vectors?

Gracias

> restart;

> with(plots);

BridgeHeight := 40;

BridgeFromCenter := 20;

BridgeToEdge := 35;

BridgeWidth := BridgeToEdge+BridgeFromCenter;

BridgeFromTheWater := 15;

BridgeLines := 10;

SpaceBetweenLines := 2*BridgeToEdge/BridgeLines;

 

LineStart := BridgeWidth;

CountLines := 0;

LineWidth := BridgeWidth;

while BridgeLines > CountLines do

CountLines := CountLines+1;

If i have the line:

S:=Sum( 1/16^k))*(4/(8*k+1)-2/ (8*k+4)-1/ (8*k+5)-1/ (8*k+6)), k=0..m);

 

and i want to establish the first m for which |Pi-Sm|<= 10^(-8)

when putting it into a while loop i get the error message that it cannot determine whether the expression is true or false:

while (Pi-S <= 10^(-8)) do

od;

 

etc,

 

what am i doing wrong here?

with(Optimization); nx := Maximize(abs(.5539395590*x^2+1.130864333*x+.9891410756-exp(x)), {-1. <= x, x <= 1.})

give [0.443368608590448687e-1, [x = 1.]]

but I know that it is not the maximum because:

abs(.5539395590*.56^2+1.130864333*.56+.9891410756-exp(.56))=0.045468048

with(Optimization); nx := maximize(abs((29.83428688*x-57.16914857)/(x-2.196093020)-exp(x)), x = 5.0 .. 6.0, location)

 

if we plot this function we see that the solution exists.

with(Optimization); nx := maximize(abs(.5547114632*x^2+1.130478381*x+.9883691714-exp(x)), x = -1 .. 1, location)

nx := 0.4568872387e-1, {[{x = 1.002012310}, 0.4568872387e-1]}

but 1.002 isn't in -1..1

I have a set of functions and parameters, I am computing Jacobian to those functions. I get a matrix rectangular in dimensions. So, determine Jacobian of sub-matrices(formed by removing one column for each sub-matrix) and equating them to zero.

> T := Matrix([[0], [4*t], [0]]); X := Matrix([[x1], [x2], [x3]]); R := Matrix([[1, 0, 0], [0, cos(pi*t), -sin(pi*t)], [0, sin(pi*t), cos(pi*t)]]);

> c1 := x1^2+x2^2-1/4-(1/4)*sin(l1); c2 := x3-sin(l2); c3 := t-1/2-(1/2)*sin(l3);>

In the help, a structure block diagram is given under the DynamicSystems[SystemConnect] command for the explaination of the use for the general connection,

that's intuitive and gives clear connections among every structure block,

so, I wonder whether there is a method to build that diagram or similar fig using the GraphTheory package,

that will be amazing,

is there a method? I want to know how to get it.

First 1743 1744 1745 1746 1747 1748 1749 Last Page 1745 of 2224