Agregação de cada tema

Anteriormente, você combinava tabelas para comparar temas. Antes de fazer essa comparação, você desejará agregar os dados para saber mais sobre as peças que fazem parte de cada tema, bem como as cores dessas peças.

A tabela que você criou anteriormente foi pré-carregada para você como inventory_sets_themes. Ele foi filtrado para cada tema, e os objetos foram salvos como batman e star_wars.

inventory_sets_themes <- inventory_parts_joined %>%

  inner_join(sets, by = "set_num") %>%

  inner_join(themes, by = c("theme_id" = "id"), suffix = c("_set", "_theme"))




batman <- inventory_sets_themes %>%

  filter(name_theme == "Batman")


star_wars <- inventory_sets_themes %>%

  filter(name_theme == "Star Wars")