daily pastebin goal
55%
SHARE
TWEET

Untitled

a guest Aug 21st, 2017 56 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. dummy <- df(y, x, a, b, who)
  2.    
  3. who <- c("Joseph", "Kim", "Billy")
  4.    
  5. function() {
  6. ols.reg.Billy <- lm(y ~ x + a + b, data = dummy[dummy$who == "Billy"])
  7. dw.Billy <- dwtest(ols.reg.Billy)
  8.  
  9. output.Billy <- list(ols.reg.Billy, dw.Billy)
  10. return(output.Billy)
  11. }
RAW Paste Data
Top