Hi,

Does maple have the ability to create probability trees / branch plots? (representing a sample space).  I would like to represent a problem more elegantly while learning how to use the software.  For example, a sample space that can be represented could be a coin toss.

Recently, my research team at the University of Waterloo was approached by Mark Ideson, the skip for the Canadian Paralympic men’s curling team, about developing a curling end-effector, a device to give wheelchair curlers greater control over their shots. A gold medalist and multi-medal winner at the Paralympics, Mark has a passion to see wheelchair curling performance improve and entrusted us to assist him in this objective. We previously worked with Mark and his team on a research project to model the wheelchair curling shot and help optimize their performance on the ice. The end-effector project was the next step in our partnership.

The use of technology in the sports world is increasing rapidly, allowing us to better understand athletic performance. We are able to gather new types of data that, when coupled with advanced engineering tools, allow us to perform more in-depth analysis of the human body as it pertains to specific movements and tasks. As a result, we can refine motions and improve equipment to help athletes maximize their abilities and performance. As a professor of Systems Design Engineering at the University of Waterloo, I have overseen several studies on the motor function of Paralympic athletes. My team focuses on modelling the interactions between athletes and their equipment to maximize athletic performance, and we rely heavily on Maple and MapleSim in our research and project development.

The end-effector project was led by my UW students Borna Ghannadi and Conor Jansen. The objective was to design a device that attaches to the end of the curler’s stick and provides greater command over the stone by pulling it back prior to release.  Our team modeled the end effector in Maple and built an initial prototype, which has undergone several trials and adjustments since then. The device is now on its 7^th iteration, which we felt appropriate to name the Mark 7, in recognition of Mark’s inspiration for the project. The device has been a challenge, but we have steadily made improvements with Mark’s input and it is close to being a finished product.

Currently, wheelchair curlers use a device that keeps the stone static before it’s thrown. Having the ability to pull back on the stone and break the friction prior to release will provide great benefit to the curlers. As a curler, if you can only push forward and the ice conditions aren’t perfect, you’re throwing at a different speed every time. If you can pull the stone back and then go forward, you’ve broken that friction and your shot is far more repeatable. This should make the game much more interesting.

For our team, the objective was to design a mechanism that not only allowed curlers to pull back on the stone, but also had a release option with no triggers on the curler’s hand. The device we developed screws on to the end of the curler’s stick, and is designed to rest firmly on the curling handle. Once the curler selects their shot, they can position the stone accordingly, slide the stone backward and then forward, and watch the device gently separate from the stone.

For our research, the increased speed and accuracy of MapleSim’s multibody dynamic simulations, made possible by the underlying symbolic modelling engine, Maple, allowed us to spend more time on system design and optimization. MapleSim combines principles of mechanics with linear graph theory to produce unified representations of the system topology and modelling coordinates. The system equations are automatically generated symbolically, which enables us to view and share the equations prior to a numerical solution of the highly-optimized simulation code.

The Mark 7 is an invention that could have significant ramifications in the curling world. Shooting accuracy across wheelchair curling is currently around 60-62%, and if new technology like the Mark 7 is adopted, that number could grow to 70 or 75%. Improved accuracy will make the game more enjoyable and competitive. Having the ability to pull back on the stone prior to release will eliminate some instability for the curlers, which can help level the playing field for everyone involved. Given the work we have been doing with Mark’s team on performance improvements, it was extremely satisfying for us to see them win the bronze medal in South Korea. We hope that our research and partnership with the team can produce gold medals in the years to come.

Hi guys,

I have got serious problem with solving this system of ODE, where psi is equal to 10*sqrt(da) and uB,E,kL,uc are constants:

firstly I have to find missing initial condition using shooting method and calculate cA(z=2) using Runge-Kutta 4th order then. And plot following concentration profile for cA and dA. So far, I have dealt with first diff eq 2nd order dividing by two diff eq of 1st order using mentioned constants so I got these ones:

  dy[1]:=y2(z);
  dy[2]:=1.000000000*sqrt(y1(z))-6.000000000*y2(z)-10.00000000*y3(z);   
  dy[3]:=-0.8333333333e-2*sqrt(y1(z))-0.8333333333e-1*y3(z);
 

I understand I need a condition da(z=0) that I should obtain using shooting method, but I do not know how to do it in spite of I understand it in theoretical way. And same problem I have with RK4th order. Anybody here with a hint, please? 

There is my maple file (unfinished version of mine): maple-shoot_RK4.mw

Why Maple doesn't calculate this and only rewrites it??

with(inttrans);

invlaplace(exp((0.2500000000e-1-2.500000000*sqrt(0.116e-3+.8*p-3.2*10^(-10)/(p+0.2e-4)))*x)/p, p, t);
     
 

restart;
with(LinearAlgebra);
help("&x");
`&x` := proc (x, y) options operator, arrow; 2*x+3*y end proc;

`&x`(a, b);

[x[1], y[1]]+[x[2], y[2]];
                   [x[2] + x[1], y[2] + y[1]]
'&.':=proc(u,v)  eval([u[1]*v[1]-u[2]*v[2]],[u[1]*v[2]+u[2]*v[1]]  end proc:
Error, unable to match delimiters
Typesetting:-mambiguous(Typesetting:-mambiguous(primeampperiod

  primeAssignproc(ucommav)  evallpar(u(1)sdotv(1) - u(2)sdotv(2))

  comma(u(1)sdotv(2) + u(2)sdotv(1))  end proccolon,

  Typesetting:-merror("unable to match delimiters")))
&. ([x[1],y[1]],[x[2],y]]);
Error, unable to match delimiters
   Typesetting:-mambiguous(Typesetting:-mambiguous(

     ampperiod lpar(x(1)y(1))comma(x(2)commay)rsqbrparsemi,

     Typesetting:-merror("unable to match delimiters")))
f := proc (x1, y1, x2, y2) options operator, arrow; x1*x2-y1y2 end proc;
(x1, y1, x2, y2) -> x1 x2 - y1y2
f := proc (x1, y1, x2, y2) options operator, arrow; x1*x2-y1y2, x1*y2+y1*x2 end proc;
(x1, y1, x2, y2) -> x1 x2 - y1y2, x1 y2 + y1 x2

I am on a Mac and unable to login to MapleCloud. I can log in perfectly fine via the website in all browsers. Any solutions for this?

How to simplify

a*b=a*c

to b=c ?

Hi,

I try to simulate the sum of two dice, and display the frequencies of the apparitions (in order 2,3,..12). Is my approach good? can generalize the approch to several dices?

Thanks for your help

Simulation2Dés.mw

Hi every body:

How can I solve this equation with Trapezoidal Rule in Maple? 

u(x) = 1+int(x*t*u(t), t = 0 .. 1)

Tnx..

I have a procedure that changes the value of an input variable quite unexpectdly. Can anyone explain why? I have a very simplified example of this below.

restart;
with(LinearAlgebra):
switch := proc (V::Vector)
description "This procedure is supposed to take a Vector V and switch entries 1 and 2";
local W,a,b;
W:= V;
a:= W[1];
b:= W[2];
W[1 ] := b;  
W[2] :=a;
W
end proc;

V1:=Vector([1,3,5]);
V2:=switch(V1);
I have omitted the output for brevity's sake but all works well as expected.
However,
V1;

returns V2 not V1. Why is the procedure changing V1?
 

The problem occurs with matrices but not with lists.

Thanks.

Hello there,

for academic purposes I need to solve a pretty complex and substantial non-linear equation system. Here you can have a look at the equations:

kompletter_nachbau_v0.mw

The MAPLE Statement "fsolve" is not working here, though there is no error message. I know, that I can provide a framework for each variable to help fsolve find a solution. But for my usage this is not an appropriate task, since I'd like to do some simulations and variations with the input parameters.

Is there a way, so I can find a solution to my equation system?

It would be possible to make some adjustments to my equations, e.g. reducing the complexity of the equations and increasing the number of equations at the same time, if needed.

I would appreciate any advice!

Thanks in advance!

if V=(u(x,y,t),v(x,y,t),0) is vector field ( x,y space, t is time), how can find gradient of V in maple ?

iqt + aqxy + ibq (qq*x − q*qx) = 0. write this equation in maple

In the worksheet below I produce a sequence of frames for an animation by distributing the task into several threads.  The result has strange artifacts as we see in the sample.  The artifacts vary randomly from run to run.  Am I doing something wrong?

Download theads.mw

Hi all,

I have a data set (see .txt file attached) to be fit to the model function A*sin(B*x+C)+D. Calculating the parameters A, B, C, and D is easy enough, but is there a way to have Maple return their standard errors?

Data.txt