df1 <- df2 <- data.frame(cars = 1:3)
attr(df2$cars, "map") <- data.frame(levels = 1:3,
labels = c("Volvo", "Saab", "Opel"))
df1 <- add_attr(df1, df2)
df1$cars
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.