Items tagged with maple maple Tagged Items Feed

We received an interesting and timely submission to the Maple Application Center this morning that I think people might be interested in.  It's called:

The Comet 67P/Churyumov-Gerasimenko, Rosetta & Philae, by Dr. Ahmed Baroudy. From the abstract:

Our plan is rather a modest one since all we want is to get , by calculations, specific data concerning the comet and its lander.
We shall take a simplified model and consider the comet as a perfect solid sphere to which we can apply Newton's laws.

We want to find:

I- the acceleration on the comet surface ,
II- its radius,
III- its density,
IV- the velocity of Philae just after the 1st bounce off the comet (it has bounced twice),
V- the time for Philae to reach altitude of 1000 m above the comet .

We shall compare our findings with the already known data to see how close our simplified mathematical model findings are to the duck-shaped comet already known results.
It turned out that our calculations for a sphere shaped comet are very close to the already known data.

Click on the link above if you want to take a look.

 

eithne

Hey, how is can i see all the steps in maple? I would specially like to know it for differential equations.

For example we could use this one:

dl := 3*(diff(y(t), t, t))+6*(diff(y(t), t))+4*y(t) = 0 

hello . i have a Partial differential equation i need some help with 

 

This is how it goes 

Updates are now available for both Maple 18 and MapleSim 6.4. 

Maple 18.02 contains improvements to many areas, including:

  • Rendering of 2-D plots
  • Help pages and examples
  • Interactive components
  • MATLAB 2014a support
  • Math engine: Laplace transforms, complex floats, simplify
  • Matrix import
  • Context menus
  • Typesetting
  • Memory management
  • OpenMaple API
  • Physics (details in comments)

To get this update, you can use Tools>Check for Updates from within Maple, or visit Maple 18.02 Downloads. (But depending on when you read this, Check for Updates may not have kicked in yet. If it doesn't find anything, wait until tomorrow morning and try again.)

For those users who haven't upgraded to MapleSim 7 yet, MapleSim 6.4.01 includes:

  • Efficiency improvements to the simulation engine, taking advantage of enhancements in Maple 18.02
  • Improvements to C code generation for model export
  • Improved handling of indexed variables when generating Modelica code

In MapleSim, use  Help>Check for Updates or visit MapleSim 6.4.02 Update. Note that MapleSim 6.4.02 is compatible with Maple 18.02.  Upgrade your Maple 18 installation to Maple 18.02 before installing this MapleSim update.

eithne

Hello,

I have a question: Why gives Maple no result for:

expr2 := sin(k*(t-tau))*sin(k*tau);
Int(simplify(expr2, symbolic), tau = 0 .. t);

It is possible with Wolfram Alpha: http://www.wolframalpha.com/input/?i=Int%28sin%28sqrt%28k%2Fm%29*%28t-tau%29%29*sin%28sqrt%28k%2Fm%29*tau%29%2C+tau+%3D+0+..+t%29

 

Thanks!

I'm trying to find the partial sum of the function. Now I need to plot the first couple partial sums onto 1 graph.

I'm not really sure how to input the plot function. I was able to graph it by inputting each partial sum function but I would prefer an easier solution.

Hi every body:

i will earn the cofficients of q(T),q(T)^2 and (diff(q(T), T, T)) with commonds maple,how?


eq := 324.6463527*(diff(q(T), T, T))+4.012505275*10^11*q(T)+3.589858529*10^12*q(T)^2 = 0;

As stated, contourplot3d is not displaying contours. Even in the Maple Help examples the contours are not displayed in the help screen.

In this example:

contourplot3d(-5*x/(x^2+y^2+1), x = -3 .. 3, y = -3 .. 3, filledregions = true);

which is directly from Maple Help, the surface is plotted (with boxed axes), but no contours appear.

When I try

contourplot3d(-5*x/(x^2+y^2+1), x = -3 .. 3, y = -3 .. 3);

the plot shows nothing except boxed axes.

I've also tried

plot3d(-5*x/(x^2+y^2+1), x = -3 .. 3, y = -3 .. 3, contours=6);

and the surface shows but without countours. Furthermore, the Maple scripts that worked previously in earlier versions (showing contours via plot3d) now do not show contours in Maple 18. This occurs on both Win 7 and Win 8 laptops.

Thanks!

 

i am solving 3 ODE with boundary condition.. with boundary condition

 

b.mw

Maple Worksheet - Error

Failed to load the worksheet /maplenet/convert/b.mw .

Download b.mw

 

then i got this error

Error, (in dsolve/numeric/bvp) initial Newton iteration is not converging

i dont know where i need to change.. could you help me..

 

Hello everyone!

Does anyone have an idea about the keyboard shortcut for right-clicking with a mouse? Strangely enough the standard context-menu key won't work in maple. Neither does shift+F10. I tried remapping this function to other keyboard keys but without any success so far...

Couldn't find anything about it in the manuals, maple help, google, etc.. It's such a frequent action, I just can't believe there is not a quicker alternative to grabbing the mouse, pointing it to what you are editing and right-clicking...

Many thanks in advance!!! :)

One of my post graduate students chose the theme "Discrete Wavelet analysis of medical signals with Maple" for her thesis. I test, is it possible to support such reearch be Maplesoft &  what may be the form of such support, if it is possible?

  • here is an exercise I got from a text book                                                                                                              calculate the first 10 terms of the following sequence :                                                                                              

u[0]=1                                                                                                                                                             u[n+1]=1/2(u[n]+2/u[n]) n>=0                                                                                                                          

  • estimate the differences u[3]-sqrt(2) , u[4]-sqrt(2), u[5]-sqrt(2), and u[6]-sqrt(2) with a precision of 50 numbers                                    
  • what can we conjecture about the sequence ?
  • how to prove that conjecture with MAPLE ?

 

This is pretty similar to my last question. but I found this maple code on a website that is suppose to find a vertex coloring of a graph G. The output is is supposed to be a list for example like [3, table([y = 1, k = 2, c = 2, m = 3, h = 1, x = 1] where the first part (in this case 3) is the number of colors and 1,2,3 in the second part are the colors to which each vertex is assigned.  However, no matter what graph I run this on I get everything equal to 1. such as [1, table([y = 1, k = 1, c = 1, m = 1, h = 1, x = 1])]. Why is this happening?  
color:=proc(G)
  local i, j, C, U, V, total_used;
  V:=Vertices(G); total_used:=1;
  C[V[1]]:=1;
  for i from 2 to nops(V) do
    C[V[i]]:=0;
  end do;
  for i from 2 to nops(V) do
    U:={};
      for j from 1 to nops(neighbors(V[i], G)) do
      U:=U union C[neighbors(V[i], G)[j]];
       end do;
    j:=1;
    while member(j, U) do
      j:=j+1;
     end do;
    C[V[i]]:=j;
    if j>total_used then
      total_used:=j;
    end if;
   end do;
  [total_used, eval(C)];
end:

So the pseudocode I'm trying to translate into maple is for the greedy vertex coloring algorithm.

The pseudo code is:

Initialize:
1. for i = 1 to n do
2. f[i] := 0 (: no color assigned yet to vertex i :)
3. end(for)
Main loop:
4. for i = 1 to n do
5. let f[i] be the smallest positive integer
which is not in the set {f(j) : j ∈ adj[i]}
6. end(for)
7 return f

 

The closest I've gotten though is:

greedy := proc (G)

local i, j, n, k, L::list;

description "Take simple graph G and return a coloring of the vertices with at most Delta(G)+1 colors";

n := nops(Vertices(G));
L := [seq(x, i = 1 .. n)];
L := subsop(1 = c(1), L);
j := 1;
for i from 2 to n do
L[Vertices(G)[i]] := c(0)
end do;

for i from 2 to n do
   for k to i do
        if member(Vertices(G)[i], Neighbors(G, Vertices(G)[k])) then j := j+1
       end if; 
   end do;
L[Vertices(G)[i]] := c(j)
end do;
return L;
end proc;

Basically my procedure is returning more than delta+1 colors for most graphs, how can I edit it to fix this? I'm guessing the problem is somewhere in my nested loops. Also, I cannot use commands like greedycolor or isvertexcolorable. Thanks.

 

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