2.9. Hare and Lynx Population Dynamics#
2.9.1. Summary#
This notebook provides an introduction to nonlinear dynamics using a well-known model for the preditor-prey interaction of Snowshoe Hare and Canadian Lynx. Topics include limit cycles, the existence of multiple steady states, and simple phase plane analysis using nullclines. This notebook can be displayed as a slide presentation.
2.9.2. Introduction#
Snowshoe hare (Lepus americanus) are the primary food for the Canadian lynx (Lynx canadensis) in the Northern boreal forests of North America. When hare are abundant, Lynx will eat hare about two every three days almost to the complete exclusion of other foods. As a consequence, the population dynamics of the two species are closely linked.
Canadian Lynx |
Snowshoe Hare |
---|---|
kdee64 (Keith Williams) CC BY 2.0, via Wikimedia Commons |
D. Gordon E. Robertson CC BY-SA 3.0, via Wikimedia Commons |
It has been known for over a century that the populations of the two species vary dramatically in cycles of 8 to 11 year duration. This chart, for example, shows pelt-trading data taken from the Hudson’s Bay Company (from MacLulich, 1937. See important notes on this data in Stenseth, 1997)
(CNX OpenStax CC BY 4.0, via Wikimedia Commons)
The actual cause of the cycling is still a matter of scientific inquiry. Hypotheses include the inherent instability of the preditor-prey dynamics, the dynamics of a more complex food web, and the role of climate (see Zhang, 2007). The discussion in this notebook addresses the preditor-prey dynamics.
2.9.3. Historical Data#
A digitized version of the historical data is available from D. R. Hundley at Whitman College. The following cell reads the data from the url, imports it into a pandas dataframe, and creates a plot.
import pandas as pd
url = 'http://people.whitman.edu/~hundledr/courses/M250F03/LynxHare.txt'
df = pd.read_csv(url, delim_whitespace=True, header=None)
df.columns = ["Year", "Hare", "Lynx"]
df.plot(x="Year", figsize=(10, 6), grid=True, ylabel="Population (thousands)", title="Lynx and Hare Populations in Canada (1845-1903)")
<Axes: title={'center': 'Lynx and Hare Populations in Canada (1845-1903)'}, xlabel='Year', ylabel='Population (thousands)'>
2.9.4. Population Dynamics#
2.9.4.1. Model Equations#
The model equatons describe the time rate of change of the population densities of hare (\(H\)) and lynx (\(L\)). Each is the difference between the birth and death rate. The death rate of hare is coupled to the population density of lynx. The birth rate of lynx is a simple multiple of the death rate of hare.
2.9.4.2. Parameter Values#
Parameter |
Symbol |
Value |
---|---|---|
Lynx/Hare Predation Rate |
\(a\) |
3.2 |
Lynx/Hare Conversion |
\(b\) |
0.6 |
Lynx/Hare Michaelis Constant |
\(c\) |
50 |
Lynx Death Rate |
\(d\) |
0.56 |
Hare Carrying Capacity |
\(k\) |
125 |
Hare Reproduction Rate |
\(r\) |
1.6 |
Activities:
What are the units of the model parameters?
What happens to the hare population if there are no predictors, i.e., \(L=0\)? In other words, what are the steady-states of the system.
What happens to the lynx population if there is no food, i.e., \(H=0\)?
These exploratory questions, which we can/should answer with pencil and paper, help us build intutition about the model.
2.9.5. Simulation using the scipy.integrate.solve_ivp()#
2.9.5.1. Step 1. Initialization#
The SciPy
library includes functions for integrating differential equations. Of these, the function odeint
provides an easy-to-use general purpose algorithm well suited to this type of problem.
import numpy as np
import matplotlib.pyplot as plt
from scipy.integrate import solve_ivp
2.9.5.2. Step 2. Establish Parameter Values#
Set global default values for the parameters
# default parameter values
a = 3.2
b = 0.6
c = 50
d = 0.56
k = 125
r = 1.6
2.9.5.3. Step 3. Write function for the RHS of the Differential Equations#
deriv
is a function that returns a two element list containting values for the derivatives of \(H\) and \(L\). The first argument is a two element list with values of \(H\) and \(L\), followed by the current time \(t\).
# differential equations
def deriv(t, y):
H, L = y
dH = r*H*(1 - H/k) - a*H*L/(c + H)
dL = b*a*H*L/(c + H) - d*L
return [dH, dL]
2.9.5.4. Step 4. Choose Time Grid, Initial Conditions, and Integrate#
# perform simulation
t = np.linspace(0, 70, 500) # time grid
IC = [20, 20] # H, L initial conditions
soln = solve_ivp(deriv, [min(t), max(t)], IC, t_eval=t) # compute solution
df = pd.DataFrame({"Year": soln.t, "Hare": soln.y[0, :], "Lynx": soln.y[1, :]}) # create dataframe
2.9.5.5. Step 5. Visualize and Analyze the Solution#
For this choice of parameters and initial conditions, the Hare/Lynx population exhibits sustained oscillations.
df.plot(x="Year", grid=True, title="Hare/Lynx Population Dynamics", ylabel="Population (thousands)")
<Axes: title={'center': 'Hare/Lynx Population Dynamics'}, xlabel='Year', ylabel='Population (thousands)'>
2.9.6. Phase Plane#
simulate_hare_lynx
consolidates all of the above steps into a single function that returns a DataFrame holding the results of a simulation. The only required argument is an initial condition for the hare and lynx populations. All other parameters, including the desired time grid, are optional arguments.
def simulate_hare_lynx(IC,
t=np.linspace(0, 70, 701), a=3.2, b=0.6, c=50, d=0.56, k=125, r=1.6):
def deriv(t, y):
H, L = y
dH = r*H*(1 - H/k) - a*H*L/(c + H)
dL = b*a*H*L/(c + H) - d*L
return [dH, dL]
soln = solve_ivp(deriv, [min(t), max(t)], IC, t_eval=t)
return pd.DataFrame({"Time": soln.t, "Hare": soln.y[0, :], "Lynx": soln.y[1, :]})
IC = [20, 20]
df = simulate_hare_lynx(IC)
df.plot(x="Time", grid=True, ylabel="Population (thousands)", title="Hare/Lynx Population Dynamics", xlabel="Time (years)")
<Axes: title={'center': 'Hare/Lynx Population Dynamics'}, xlabel='Time (years)', ylabel='Population (thousands)'>
ax = df.plot(x="Hare", y="Lynx", grid=True, xlabel="Hare Population (thousands)", ylabel="Lynx Population (thousands)")
plt.legend(["Population Dynamics"], loc="upper right")
ax.plot(df.loc[0, "Hare"], df.loc[0, "Lynx"], "b.", ms=20)
[<matplotlib.lines.Line2D at 0x135424580>]
2.9.7. Nullclines: Finding Steady States#
Nullclines are the points in the phase plane where the derivatives are equal to zero.
The nullclines for hare are where
The nullclines for Lynx are where
For convenience, we create a function to plots the nullclines and steady states that occur where the nullclines intersect.
def plot_nullclines(a=3.2, b=0.6, c=50, d=0.56, k=125, r=1.6):
# nullcline dH/dt = 0
Hp = np.linspace(0, k)
Lp = (r/a)*(c + Hp)*(1 - Hp/k)
plt.plot(Hp, Lp, 'b')
# nullcline dL/dt = 0
Hd = c*d/(a*b - d)
plt.plot([Hd, Hd], plt.ylim(), 'r', lw=3)
# additional nullclines
plt.plot([0, 0], plt.ylim(), 'b', lw=3)
plt.plot(plt.xlim(), [0, 0], 'r', lw=3)
# steady states
Hss = c*d/(a*b - d)
Lss = r*(1 - Hss/k)*(c + Hss)/a
plt.plot([0, k, Hss], [0, 0, Lss], 'rs', ms=8)
# format plot
plt.ylim(0, 130)
plt.xlim(0, 150)
plt.xlabel('Hare Population (thousands)',fontsize=18)
plt.ylabel('Lynx Population (thousands)',fontsize=18)
plt.legend(['dH/dt = 0','dL/dt = 0'],fontsize=18)
plt.grid(True)
Here’s a plot of the nullclines for the default parameter values. The steady states correspond to
No Hare, and no Lynx.
Hare population at the carry capacity of the environment, and no Lynx
Coexistence of Hare and Lynx.
plot_nullclines()
Visualization of the nullclines give us some insight into how the Hare and Lynx populations depend on the model parameters. Here we look at how the nullclines depend on the Hare/Lynx predation rate \(a\).
from ipywidgets import interact
# You may need to install ipywidgets using one of the following commands:
# conda install -c conda-forge ipywidgets (in the terminal)
# OR
# !pip install ipywidgets (on Colab)
def sim(a=3.2):
plot_nullclines(a=a)
interact(sim, a=(1.25, 4, 0.01))
<function __main__.sim(a=3.2)>
2.9.8. Interactive Simulation#
An additional function is created to encapsulate the entire process of solving the model and displaying the solution. The function takes arguments specifing the initial values of \(H\) and \(L\), and a value of the parameter \(a\). These argument
def hare_lynx(H=20, L=20, a=3.2):
df = simulate_hare_lynx([H, L], a=a)
fig, ax = plt.subplots(1, 2, figsize=(12, 5))
df.plot(x="Time", ax=ax[0], ylim=(0, 130), grid=True, xlabel="Time (years)", ylabel="Population (thousands)")
ax = df.plot(x="Hare", y="Lynx", ax=ax[1], ylim=(0, 130), grid=True)
plot_nullclines(a=a)
ax.plot(df.loc[0, "Hare"], df.loc[0, "Lynx"], 'b.', ms=20)
Use the a
slider to adjust values of the Hare/Lynx interaction. Can you indentify stable and unstable steady states?
from ipywidgets import interact
interact(hare_lynx, H = (0, 140, 0.1), L =(0, 140, 0.1), a=(1.25, 4.0, 0.002));
2.9.9. Stability of a Steady State#
2.9.9.1. 1. Unstable Focus#
Any displacement from an unstable focus leads to a trajectory that spirals away from the steady state.
hare_lynx(H=20, L=20, a=4)
2.9.9.2. 2. Stable Focus#
Small displacements from a stable focus results in trajectories that spiral back towards the steady state.
hare_lynx(H=20, L=20, a=1.9)
2.9.9.3. 3. Stable and Unstable Nodes#
Displacements from a steady state either move towards (stable) or away from (unstable) nodes without the spiral structure of a focus.
hare_lynx(H=20, L=20, a=1.4)
2.9.10. Summary#
Hope you enjoyed this brief introduction to the modeling of a small food web. This is a fascinating field with many important and unanswered questions. Recent examples in the research literature are here and here.
What you should learn from this notebook:
How to simulate small systems of nonlinear ODEs.
How to plot trajectories in a phase plane.
How to plot the nullclines of two differential equations with constant parameters.
Solve systems for multiple steady states.
Recognize limit cycles, steady-states, stable and unstable foci, stable and unstable nodes.
2.9.11. Suggested Exercise#
Explore the impact of the parameter \(a\) on the nature of the solution. \(a\) is proporational to the success of the Lynx hunting the Hare.
What happens when the value is low? high? Can you see the transitions from conditions when the Lynx done’t survive, the emergence of a stable coexistence steady-state, and finally the emergence of a stable limit cycle?
For each of the three steady-states (intersections of nullclines), calculate and interpret the eigenvalues. Next, perform a sensntivity analysis of the eigenvalues when varying \(a\), similar to previous examples. Does this match the interactive analysis above?