Guest User

Untitled

a guest
Jul 20th, 2018
94
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.67 KB | None | 0 0
  1. date Messi Ronaldo # 2018 players
  2. 01/01/18 756 871
  3. 01/01/18 660 743
  4. 01/01/18 523 453
  5. 01/01/18 412 654
  6. 01/01/18 488 568
  7. 01/01/18 515 345
  8.  
  9. date Lahm Xavi # 2014 players
  10. 01/01/18 756 871
  11. 01/01/18 660 743
  12. 01/01/18 523 453
  13. 01/01/18 412 654
  14. 01/01/18 488 568
  15. 01/01/18 515 345
  16.  
  17. List = NULL
  18. for (i in 1:length(levels(wikiHitsWC2018$article))){
  19. data <- zoo(cbind(data_wideWC2018[i], data_wideWC2014[,1:119]),time.points)
  20. impact <- CausalImpact(data, pre.period, post.period,model.args =
  21. list(nseasons = 7, season.duration = 1))
  22. List[[i]] <- impact
  23. }
Add Comment
Please, Sign In to add comment