das habe ich gemacht und das nachfolgende Ergebnis erhalten.
Code: Alles auswählen
> X <- residuals(mod2, type = "pearson")
> Residuen <- c(X)
> Residuen
1 2 3 4 5 6 7 8 9
0.19176322 0.16896981 0.16903164 -0.35440040 -0.63513154 -0.92130440 -0.84179340 -0.72745535 -0.67406463
10 11 12 13 14 15 16 17 18
-0.57061003 -0.77406869 -0.44097333 -0.13835164 0.21106889 -0.09469418 1.13193229 0.52360936 0.76854878
19 20
0.21355474 0.06560167
> durbinWatsonTest(Residuen)
[1] 0.4872335
Gruß
Tobi