Batman と Star Wars の違い

動画では 2 つのセットを比較しました。ここでは、複数のセットから成る 2 つのテーマを比較します。

まずは themes を結合する必要があります。そのためには、先に sets を経由することを思い出してください。コンソールには、動画で使った inventory_parts_joined テーブルがすでに用意されています。

inventory_parts_joined <- inventories %>%
  inner_join(inventory_parts, by = c("id" = "inventory_id")) %>%
  arrange(desc(quantity)) %>%
  select(-id, -version)

themes を結合するには、最初に inventory_parts_joined と sets テーブルを結合します。
次に、その最初の結合結果を themes テーブルと結合し、suffix 引数で各 name がどのテーブル由来か分かるようにします（"_set" または "_theme"）。