run

[farzadhass]

in part this code
set.seed(140616)
result <- simulate_tournament(100000)

Final players

finalteams <- sort(table(apply(result[1:2,], 2, function(x) {paste(sort(team_data$name[x]), collapse=", ")})),
decreasing = TRUE)
this is section unable to run
in your opinion what do i do to solve that

[ekstroem]

It's running on my end (after moving library("ggplot2") up in the file. Have you tried to knit the full file?

[farzadhass]

You mean we should put this command before that? yes i do that

[ekstroem]

I mean to open the file in, say, RStudio, and hit knit. Then it should be done in around 10 minutes. That works right away here without giving any error messages. What is the error message you see?