"nba.draft" <-
structure(list(Team = structure(c(5, 2, 8, 4, 6, 3, 11, 1, 12,
9, 13, 7, 10), .Label = c("Atlanta", "Chicago", "Cleveland",
"Denver", "Golden State", "Houston", "L.A. Clippers", "Memphis",
"Miami", "Milwaukee", "New York", "Phoenix", "Washington"), class = "factor"),
Record = structure(c(1, 1, 2, 3, 4, 5, 6, 7, 8, 8, 9, 10,
11), .Label = c("21-61", "23-59", "27-55", "28-54", "29-53",
"30-52", "33-49", "36-46", "37-45", "39-43", "41-41"), class = "factor"),
Balls = c(225, 225, 157, 120, 89, 64, 44, 29, 15, 14, 7,
6, 5)), .Names = c("Team", "Record", "Balls"), row.names = c("1",
"2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13"
), class = "data.frame")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.