DEMSdata=list(N = 44, Obs= c(10, 0, 2, 9, 4, 2, 1, 1, 1, 1,
0, 1, 2, 2, 1, 2, 0, 4, 4, 2, 2, 2, 3, 2, 2, 1, 0, 4, 0, 0,
1, 1, 1, 1, 3, 5, 3, 0, 0, 1, 0, 0, 3, 1),
Exp = c(1.54, 0.7, 1.13,1.51, 1.79, 0.8, 2.86, 3.09, 1.36, 0.26,
1.41, 1.79, 0.99, 1.86, 0.82, 1.09, 0.55, 1.83, 2.6, 3.85,
1.15, 3.16, 2.21, 1.77, 2.27, 1.54, 1.83, 1.96, 0.75, 0.7,
0.52, 2.23, 0.73, 1.94, 1.34, 3.08, 1.63, 1.31, 1.59, 1.64,
1.22, 1.06, 2.78, 1.61),
Distance = c(0.2, 0.3, 0.45, 0.45, 0.61, 0.64, 0.73, 0.82, 0.85, 0.9,
 0.92, 1, 1.04, 1.13, 1.14, 1.22, 1.28, 1.3, 1.39, 1.56,
 1.6, 1.71, 1.71, 1.77, 1.92, 2.06, 2.1, 2.14, 2.28, 2.69,
 2.76, 3.67, 3.71, 4.36, 4.52, 4.55, 4.83, 5.35, 5.45, 5.91,
 6.04, 6.4, 6.74, 6.86),
Carstairs = c(7.86, 6.55, 6.21, 4.86, 3.96, 4.27, 4.61, 2.69, 5.61,
2.57,3.78, 3.79, 5.32, 2.61, 5.3, -0.97, 2.63, 1.59, -0.32, -0.15,
-1.16, 0.32, -0.83, -1.86, 1.66, -1, -2.17, -2.05, -1.45, -3.39,
-3.31, -1.67, -3.25, -2.01, -1.54, -0.08, -2.48, -3.2, -1.92, -2.33,
-3.27, -1.97, -2.19, -1.23))