## Not run: ------------------------------------
# # Colorado Rockies colors
# (pal = mlb.colors("rockies"))
# pie(rep(1, length(pal)), labels = sprintf("%d (%s)", seq_along(pal), pal), col = pal)
#
# # Seattle Mariners colors
# (pal = mlb.colors("mariners"))
# pie(rep(1, length(pal)), labels = sprintf("%d (%s)", seq_along(pal), pal), col = pal)
## ---------------------------------------------
Run the code above in your browser using DataLab