การแสดงภาพข้อมูล Pokemon

library(dplyr)
library(trelliscopejs)

# Create a new data frame to use for plotting
pokemon2 <- pokemon %>%
  # Reduce the variables in the dataset
  select(pokemon, type_1, attack, generation_id, url_image) %>%
  mutate(
    # Respecify pokemon
    pokemon = cog(val = ___, default_label = ___),
    # Create panel variable
    panel = img_panel(___)
  )

# Create the display
trelliscope(pokemon2, ___)