# Plotting basin boundary [duplicate]

This question already has an answer here:

How to plot the basin boundary in Mathematica?
I have been trying to do this using the system

y''[t] == -R y'[t] + (( Y - y[t])/(Sqrt[(X - x[t])^2 + (Y - y[t])^2 + d^2])^3
+ (Y - y[t])/(Sqrt[(X - x[t])^2 + (Y - y[t])^2 + d^2])^3
+ (Y - y[t])/(Sqrt[(X - x[t])^2 + (Y - y[t])^2 + d^2])^3)
- c y[t]

x''[t] == -R x'[t] + ((X - x[t])/(Sqrt[(X - x[t])^2 + (Y - y[t])^2 + d^2])^3
+ (X - x[t])/(Sqrt[(X - x[t])^2 + (Y - y[t])^2 + d^2])^3
+ (X - x[t])/(Sqrt[(X - x[t])^2 + (Y - y[t])^2 + d^2])^3)
- c x[t]


It is a magnetic pendulum swinging chaotically about 3 other magnets underneath. R,c,d are all constants,where r is air resistance, d is the vertical distance of the pendulum from the floor, c is the sping constant of the pendulum. X, X and X (Y,Y and Y) are the coordinates of the magnets.

But I have gotten nowhere.

## marked as duplicate by user9660, MarcoB, m_goldberg, Yves Klett, J. M. will be back soon♦Jul 7 '16 at 0:33

• I suggest you read the documentation of DSolve and NDSolve. – shrx Nov 22 '13 at 13:52
• @shrx he needs to provide X, Y, R, c, and d and boundary conditions, but otherwise that is code that would be supplied to the solvers. – rcollyer Nov 22 '13 at 13:59