Items tagged with plot

Feed

Hi everyone,

I am making a model of the solar system (not to scale) in Maple for a school project. I need to add an animation to make the planets move on the orbits I have for each of them. How do I do this?

I uploaded pictures on a Photobucket account of how I've done it so far to help. This is my first time using Maple so I know that I probably did some things inefficiently. 

Photobucket URL: http://i1070.photobucket.com/albums/u492/nmsnyder007/Capture1_zpsfmitm0ou.jpg

Thanks :)

I want to plot a simple power function in diferent pieces by using diferent range and  for different values of parameter a[i] at i=0,1,2 define in the attached sheet.

plot_at_different_intervals.mw

On Y axis: (Each set represents a car and each set has 10 values for different position of same car)

[[761, 768, 776, 784, 793, 803, 813, 823, 833, 842], [723, 725, 728, 731, 734, 738, 743, 749, 756, 764], [516, 516, 516, 517, 519, 522, 526, 531, 536, 541], [382, 384, 386, 389, 393, 398, 404, 411, 419, 427], [78, 86, 95, 105, 115, 125, 135, 144, 154, 164], [751, 760, 770, 780, 790, 799, 809, 819, 829, 839], [773, 783, 793, 803, 812, 822, 831, 840, 850, 859], [160, 170, 180, 189, 199, 209, 219, 229, 239, 249],.....]

On X axis: (time for 1 to 10)

[1,2,3,4,5,6,7,8,9,10] for each of above sets. 

In each set for example, 1 corresponds to 761, 2 to 768 and so on until 10 to 842, then onto next set. The number of sets I will generate can be between 50-500. And I need to have all of the same graph. This data will tell me under the conditions I set how one car's position effects other cars. 

I also have relative velocity values in same format:

[[7, 7, 8, 8, 9, 10, 10, 10, 10, 9], [1, 2, 3, 3, 3, 4, 5, 6, 7, 8], [0, 0, 0, 1, 2, 3, 4, 5, 5, 5], [1, 2, 2, 3, 4, 5, 6, 7, 8, 8], [8, 8, 9, 10, 10, 10, 10, 9, 10, 10], [8, 9, 10, 10, 10, 9, 10, 10, 10, 10], [10, 10, 10, 10, 9, 10, 9, 9, 10, 9], [9, 10, 10, 9, 10, 10, 10, 10, 10, 10], [8, 8, 9, 9, 9, 10, 9, 9, 9, 9], [8, 9, 10, 9, 10, 9, 10, 9, 10, 9], [9, 10, 9, 9, 10, 10, 10, 10, 10, 10], [7, 7, 8, 9, 10, 10, 9, 9, 10, 10], [10, 10, 10, 9, 9, 10, 9, 10, 10, 10],...]

I will also need to graph this. 

Please Help!
 

I have to plot 10 squares each one inscribed into each other. After the first one, which is a square with a side of 10m, each following square has got each edges wich are distant from the previous edges (side of the previous square)/4 metres, on the

 

sides of the previous square

How can i draw it?


 

Hi,

I'm struggling to solve a problem with the Maple 2015 worksheet interface. I have a very dense 2D plot, with lots of oscillations, that was generated using Maple 2015 on Windows 10. Substantial parts of the plot are missing; it looks like the tips of the oscillations being clipped out. If I load the same worksheet into Maple 18 on Windows 7 then the plot looks fine (i.e. nothing is clipped). I've dug through the options in Maple 2015 and nothing I try seems to fix the problem. Any advice would be greatly appreciated.

Many thanks,
David

 

I expected plot with an undefined name to do nothing, but,

plot(asdf);

actually plots y=x!

I have to first plot the some point like (-1,4), (0,3), (1,4) etc. and then I wish to know how I can connect them with a line. 

HI,

I would like to plot the ODE system in phase transition (3d)

I try this

var:={x1(t),x2(t),x3(t)}:
dsys:={diff(x1(t),t)=x1(t), diff(x2(t),t)=x2(t), diff(x3(t),t)=x3(t)};
   / d                  d                  d               \ 
  { --- x1(t) = x1(t), --- x2(t) = x2(t), --- x3(t) = x3(t) }
   \ dt                 dt                 dt              / 
res:=dsolve(dsys);
  {x1(t) = _C3 exp(t), x2(t) = _C2 exp(t), x3(t) = _C1 exp(t)}
plot3d(res,x1(t)=0..1,x2(t)=0..1,axes=boxed,font=[1,1,18],view=[0..0.6,0..1,-5..0]);

 

Hi all,

I am attempting to construct a randomized questions using algorithms and the sketch question type.

I have defined my variables algorithmically.  The sketch question type only allows a static answer, and hence I am trying to modify the code.  

As you can see below the code (part.1.answer...) is looking for points located at (7,0) and (0,-7).  I would like to replace the 7 with variable $xint and -7 with variable $yint, but it seems the @-symbols are some form of termination point that won't allow variables to carry-into the expression.

Looking for ideas??  I do not want to change to multiple choice.

 

Thanks,

 

mode=Inline@
id=0@
name=Graph a linear relation in Ax+By=C form@
comment=<p>&nbsp;</p>


@
editing=useHTML@
solution=@
algorithm=$b=range(1,6,2);
$c=range($b,20,$b);
$a=$b*3;
$zero=0;
$xint=$c/$a;
$yint=$c/$b;@
customCss=@
appliedThemes=@
uid=316f7dda-d8bc-479f-a3e4-9703a1846072@
privacy=10@
allowRepublish=false@
description=@
difficulty=0.0@
modifiedIn=11.10@
modifiedBy=a0c70480-e1aa-418d-9980-0347cddc1087@
school=7f01c0fb-116a-4f9d-bafc-e91de0b62105@
attributeAuthor=true@
numberOfAttempts=1@
numberOfAttemptsLeft=1@
numberOfTryAnother=0@
numberOfTryAnotherLeft=0@
question=<p><span style="font-size:16px;">Graph &nbsp;<math xmlns="http://www.w3.org/1998/Math/MathML"><mrow> <mn>$a</mn> <mspace width="5px"></mspace> <mi mathvariant="italic">x</mi> <mo>+</mo> <mi mathvariant="italic">&nbsp;</mi> <mn>$b</mn> <mspace width="5px"></mspace> <mi mathvariant="italic">y&nbsp;</mi> <mo>=</mo> <mn>$c</mn> </mrow></math>&nbsp; on the grid below.</span></p>

<p>&nbsp;</p>

<p><span>&nbsp;</span></p>

<1>

<p><span>&nbsp;</span>&nbsp;</p>


@
weighting=1@
numbering=alpha@
part.1.grid=true@
part.1.comment=<p>&nbsp;</p>


@
part.1.editing=useHTML@
part.1.attributeAuthor=false@
part.1.options="visible_buttons":"createline:1, delete"@
part.1.givenCurves={"sketchElements":[{"elementType":"topGroup","parents":[],"attributes":{"name":"Top-level Group"},"gradingOptions":{},"id":"topGroup"}]}@
part.1.modifiedIn=11.10@
part.1.numberOfAttempts=1@
part.1.allowRepublish=false@
part.1.numberOfTryAnotherLeft=0@
part.1.numberOfAttemptsLeft=1@
part.1.mode=Html5sketch@
part.1.numberOfTryAnother=0@
part.1.answer={"sketchElements":[{"elementType":"topGroup","parents":["jxgBoard1L160"],"attributes":{"name":"Top-level Group"},"gradingOptions":{},"id":"topGroup"},{"elementType":"point","parents":[7,0],"attributes":{"name":"B"},"gradingOptions":{},"id":"jxgBoard1P158"},{"elementType":"point","parents":[0,-7],"attributes":{"name":"C"},"gradingOptions":{},"id":"jxgBoard1P159"},{"elementType":"line","parents":["jxgBoard1P158","jxgBoard1P159"],"attributes":{"name":"aq"},"gradingOptions":{},"id":"jxgBoard1L160"}]}@
part.1.gradingCode=op(1,[Grading:-GradePlot($ANSWER, $RESPONSE, $PLOTVIEW)]);@
part.1.axes=-10,10,-10,10@
part.1.difficulty=0.0@
part.1.ticks=4,5,4,5@
part.1.name=responseNaN@

I am trying to find a way to adjust the size of a plot output component in Maple by right click (because the output(s) were copy & paste) and it is difficult to go back to plot command to set the size.

Thanks,

TQ.mw

Can any one help for finding the solution of these differntial equations and then plotting the graph for differnt values of M

(FILE ATTACHED)
 

eqn1 := (R/(R-theta(eta))+Omega)*(diff(f(eta), `$`(eta, 3)))+f(eta)*(diff(f(eta), `$`(eta, 2)))+R*(diff(f(eta), `$`(eta, 2)))*(diff(theta(eta), eta))/(R-theta(eta))^2+Omega*(diff(g(eta), eta))+lambda*theta(eta)*Cos(alpha)-M*(diff(f(eta), eta))^2 = 0; eqn2 := (R/(R-theta(eta))+(1/2)*Omega)*(diff(g(eta), `$`(eta, 2)))-2*Omega*(2*g(eta)+diff(f(eta), `$`(eta, 2)))+(diff(f(eta), eta))*g(eta)+(diff(g(eta), eta))*f(eta)+R*(diff(g(eta), eta))*(diff(theta(eta), eta))/(R-theta(eta))^2 = 0; eqn3 := (1+`&epsilon;`*theta(eta))*(diff(theta(eta), `$`(eta, 2)))+`&epsilon;`*(diff(theta(eta), eta))^2+Pr*(f(eta)*(diff(theta(eta), eta))-(diff(f(eta), eta))*theta(eta))+Q*theta(eta)+L*exp(-eta) = 0

(R/(R-theta(eta))+Omega)*(diff(diff(diff(f(eta), eta), eta), eta))+f(eta)*(diff(diff(f(eta), eta), eta))+R*(diff(diff(f(eta), eta), eta))*(diff(theta(eta), eta))/(R-theta(eta))^2+Omega*(diff(g(eta), eta))+lambda*theta(eta)*Cos(alpha)-M*(diff(f(eta), eta))^2 = 0

 

(R/(R-theta(eta))+(1/2)*Omega)*(diff(diff(g(eta), eta), eta))-2*Omega*(2*g(eta)+diff(diff(f(eta), eta), eta))+(diff(f(eta), eta))*g(eta)+(diff(g(eta), eta))*f(eta)+R*(diff(g(eta), eta))*(diff(theta(eta), eta))/(R-theta(eta))^2 = 0

 

(1+epsilon*theta(eta))*(diff(diff(theta(eta), eta), eta))+epsilon*(diff(theta(eta), eta))^2+Pr*(f(eta)*(diff(theta(eta), eta))-(diff(f(eta), eta))*theta(eta))+Q*theta(eta)+L*exp(-eta) = 0

(1)

Omega := 2.; M := .5; R := 5; lambda := 20; `&epsilon;` := .2; Pr := 1; Q := .5; L := .5; W := .5; n := .1; alpha := (1/6)*Pi

bc := f(0) = W, (D(f))(0) = 0, (D(f))(infinity) = 0, (D(theta))(0) = -1, theta(infinity) = 0, g(0) = -n*(DD(f))(0), g(infinity) = 0

f(0) = W, (D(f))(0) = 0, (D(f))(N) = 0, (D(theta))(0) = -1, theta(N) = 0, g(0) = -n*(DD(f))(0), g(N) = 0

(2)

``


 

Download TQ.mw

 

A lemniscate is a polar curve of the form r^2=a^2*cos(2*theta) or r^2=a^2*sin(2*theta). I have just started using Maple and I wrote the following commands: 

> with(plots):
> polarplot(2*sqrt(cos(2*t)), axiscoordinates = cartesian, angularunit = radian, color = "Black");
 

But I am getting the following graph 

which is not satisfactory since some points are missing. I know that using the square root may have caused this, but I am not sure as to how should I resolve this issue. I used plus/minus symbol before the expression 2(cos(2t))^(0.5) but there was an error and the discontinuity still persisits. Kindly help me in plotting this curve. 

Thank you.

I have two figures that's generated in Maple (by plot), then pasted them to a worksheet, which I would like to export them to PDF format with exactly the same as it seems on Maple, meaning that these two figures need to be on the same row.

However, in the exported PDF, these two figures are always in two rows: see Fig_1.mw and Fig_1.pdf 

What I tried was: to really resize these two figures into very small size, and the export works, however, I also need three figures or four figures in one row. See Fig_2.mw and Fig_2.pdf

So there is actually two questions:

1. Can I specify some parameters in Maple such that the exported PDF is exactly 'what I see is what I get'?

2. If #1 is impossible, where can I get the information on: width of the exported PDF, how to specify the precise size of plot command etc

Thanks,

 

 

I tryed this, because i thought i might be abel to shade this new piecewise function later on, but i dont know how to tell maple that there is 2 y-axes values in the interval from (2;3):

so it failed. 

pleace help regards Niklas.

 

Hi

 

I have a system of equations (4) which I would like to plot in regards to a fifth variable. Is there a good way to do this. Some of the solutions would end up as negative values, which is not an option I am interested in having.

 

C__A is my variable, and the other variables I would like to solve are tau,C__B,C__C,C__D. Im specifically interested in tau with regards to C__A. I hope this makes sense :)

regards

 

C__A := .75;
                              0.75


a := tau = (C__A0-C__A)/(-r__A);
                                  0.75                      
    tau = - ------------------------------------------------
                                              2             
            -0.00900 C__B + 0.03500000000 C__C  - 0.075 C__C
b := tau = (C__B0-C__B)/(-r__B);
                               2 - C__B              
          tau = - -----------------------------------
                                                    2
                  -0.00900 C__B + 0.03500000000 C__C 
c := tau = (C__C0-C__C)/(-r__C);
                                C__C                  
         tau = ---------------------------------------
                                        2             
               0.01800 C__B - 0.070 C__C  - 0.075 C__C
d := tau = (C__D0-C__D)/(-r__D);
                           13.33333333 C__D
                     tau = ----------------
                                 C__C      
sol := fsolve([a, b, c, d], {C__B = 1, C__C = .2, C__D = .2, tau = 50});

{C__B = 1.673672109, C__C = 0.2289836744, C__D = 0.4236721086, 

  tau = 24.66971264}

1 2 3 4 5 6 7 Last Page 2 of 184