teams <- paste("Team", LETTERS[1:8])
# Implicit: defaults to previous_stage()
trn <- tournament(teams) |>
swiss("open", rounds = 3) |>
single_elim("playoffs", take = top_n(4))
# Explicit: useful for branching
trn <- tournament(teams) |>
round_robin("groups") |>
single_elim("finals", from = previous_stage(), take = top_n(2))
Run the code above in your browser using DataLab