(defun source () (format t "
Source: Wood, L. A. (1972). Modulus of natural rubber cross-linked by dicumyl peroxide. I. Experimental observations.  J Res. Nat. Bur. Stand. 76A, 51-59.
The data are also in Rice, J, Mathematical Statistics and Data Analysis.  Wadsworth, p. 506.

MNR[y] = modulus of natural rubber
Temp = temperature (C)
DP = Dicumyl Peroxide ~%"))

(let* ((names '("Temp" "DP" "MNR[y]"))
       (data (transpose (split-list '(
-50 .48 3.20
-50 .95 3.54
-50 1.90 4.85
-50 2.86 6.24
-50 3.81 7.80
-50 4.76 7.60
-50 6.66 10.60
-50 7.62 12.80
-50 9.52 17.30
-50 14.3 19.20
-50 19 29.15
-50 23.8 35.9
-25 .48 3.06
-25 .95 3.57
-25 1.90 5.01
-25 2.86 6.57
-25 3.81 8.14
-25 4.76 8.37
-25 6.66 11.61
-25 7.62 13.92
-25 9.52 18.20
-25 14.3 22.09
-25 19 32.53
-25 23.8 38.50
0 .48 2.92
0 .95 3.59
0 1.90 5.16
0 2.86 6.91
0 3.81 8.47
0 4.76 9.14
0 6.66 12.62
0 7.62 15.04
0 9.52 19.00
0 14.3 24.97
0 19 35.91
0 23.8 41.1
25 .48 2.77
25 .95 3.62
25 1.90 5.32
25 2.86 7.24
25 3.81 8.81
25 4.76 9.91
25 6.66 13.62
25 7.62 16.17
25 9.52 19.90
25 14.3 27.86
25 19 39.30
25 23.8 43.70
50 .48 2.63
50 .95 3.65
50 1.90 5.47
50 2.86 7.57
50 3.81 9.15
50 4.76 10.68
50 6.66 14.63
50 7.62 17.29
50 9.52 20.80
50 14.3 30.75
50 19 42.68
50 23.8 46.3
75 .48 2.49
75 .95 3.67
75 1.90 5.63
75 2.86 7.91
75 3.81 9.49
75 4.76 11.45
75 6.66 15.64
75 7.62 18.41
75 9.52 21.6
75 14.3 33.64
75 19 46.06
75 23.8 48.9
100 .48 2.35
100 .95 3.7
100 1.90 5.78
100 2.86 8.24
100 3.81 9.82
100 4.76 12.22
100 6.66 16.65
100 7.62 19.53
100 9.52 22.50
100 14.3 36.52
100 19 49.45
100 23.8 51.5
) 3))))

(source)
(make-reg :data data :data-names names
   :menu "RubberMod"))