Focal Attraction with Rotation

This Demonstration uses Mathematica's NDSolve to plot trajectories of the Markus–Wilson model of focal attraction on a rotating medium. This dynamical system is parameterized by four positive parameters, , , , and , which correspond to physical parameters of the model: describes the rotational speed, quantifies the radial drift in the model (the default is zero, i.e., no drift), is the magnitude of the focal attraction whose source is at in Euclidean coordinates, where is the size of the rotating disk. To see how the trajectory develops through time (and hopefully its asymptotic behavior), autorun through the parameter. For large this may result in slow rendering of the smoothed curve.
The following equations govern the time evolution of this system:
The solution may not converge rapidly enough to be meaningful for all parameter combinations, in which case warnings will arise. We have attempted to remove most of the offending parameter combinations. However, the parameter space is complicated and one also does not want to remove too much of the content.



  • [Snapshot]
  • [Snapshot]
  • [Snapshot]
  • [Snapshot]


For a more detailed discussion of this model please see http://arxiv.org/abs/0801.4500. This paper by Jorge Sotomayor describes this model and some possible improvements that might allow one to better understand the parameter space. The idea for this model was taken from H. K. Wilson, Ordinary Differential Equations, Reading, MA.: Addison–Wesley, 1971. One may also refer to Jorge Sotomayor, Liçoes de Equaçoes Diferenciais Ordinárias, Rio de Janeiro: IMPA, 1979 (in Portuguese).
    • Share:

Embed Interactive Demonstration New!

Just copy and paste this snippet of JavaScript code into your website or blog to put the live Demonstration on your site. More details »

Files require Wolfram CDF Player or Mathematica.

Mathematica »
The #1 tool for creating Demonstrations
and anything technical.
Wolfram|Alpha »
Explore anything with the first
computational knowledge engine.
MathWorld »
The web's most extensive
mathematics resource.
Course Assistant Apps »
An app for every course—
right in the palm of your hand.
Wolfram Blog »
Read our views on math,
science, and technology.
Computable Document Format »
The format that makes Demonstrations
(and any information) easy to share and
interact with.
STEM Initiative »
Programs & resources for
educators, schools & students.
Computerbasedmath.org »
Join the initiative for modernizing
math education.
Step-by-Step Solutions »
Walk through homework problems one step at a time, with hints to help along the way.
Wolfram Problem Generator »
Unlimited random practice problems and answers with built-in step-by-step solutions. Practice online or make a printable study sheet.
Wolfram Language »
Knowledge-based programming for everyone.
Powered by Wolfram Mathematica © 2018 Wolfram Demonstrations Project & Contributors  |  Terms of Use  |  Privacy Policy  |  RSS Give us your feedback
Note: To run this Demonstration you need Mathematica 7+ or the free Mathematica Player 7EX
Download or upgrade to Mathematica Player 7EX
I already have Mathematica Player or Mathematica 7+