# Data for pupEnv covariate model

list(

S = 25,

R = structure(.Data=c(
1,0,0,
0,1,0,
0,0,1), .Dim=c(3,3)),

substr=c(1,1,3,2,2,4,5,4,2,4,2,3,5,1,4,2,2,2,2,1,2,4,4,4,3),

dds = structure(.Data=c(
-7.48,-1.80544,-1.24,-27.48,-0.15044,-0.24,-120.48,-1.56944,-0.24,-115.48,1.35056,-0.24,-139.48,0.81456,0.26,-136.48,-1.84844,1.76,34.52,-2.63644,-0.24,1354.52,1.32756,-0.24,228.52,-1.95644,-1.24,-128.48,-1.62844,1.26,-131.48,-0.63444,2.26,-84.48,-0.68644,1.76,-135.48,2.14656,0.76,289.52,1.51256,-1.74,-12.48,-1.74644,-2.24,-111.48,-1.93344,-2.24,-138.48,1.21056,1.76,-130.48,-0.20544,1.76,-154.48,6.68456,0.26,-30.48,-1.07144,-1.74,-103.48,1.82956,2.26,-123.48,1.20856,-0.24,-123.48,1.20856,-0.24,72.52,-1.46444,-1.24,-24.48,0.04356,-0.74), .Dim=c(25,3))

)