Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- > r1 <- runif(1000, 0.0, 1.0)
- > r2 <- runif(1000, 0.0, 1.0)
- > dwtest(lm(r2 ~ r1 ))
- Durbin-Watson test
- data: lm(r2 ~ r1)
- DW = 1.9806, p-value = 0.3789
- alternative hypothesis: true autocorrelation is greater than 0
- >
- > r1 <- seq(0, 1000, by=1)
- > r2 <- seq(0, 1000, by=1)
- > dwtest(lm(r2 ~ r1 ))
- Durbin-Watson test
- data: lm(r2 ~ r1)
- DW = 2.2123, p-value = 0.8352
Add Comment
Please, Sign In to add comment