## Not run: ------------------------------------
# # Manchester United colors
# (pal = epl.colors("man_united"))
# pie(rep(1, length(pal)), labels = sprintf("%d (%s)", seq_along(pal), pal), col = pal)
#
# # Tottenham colors
# (pal = epl.colors("tottenham"))
# pie(rep(1, length(pal)), labels = sprintf("%d (%s)", seq_along(pal), pal), col = pal)
## ---------------------------------------------
Run the code above in your browser using DataLab