j-hagedorn / trilogy

Reference datasets for folktale motifs, tale types, and annotated texts
Other
5 stars 2 forks source link

Clean motif IDs #52

Closed j-hagedorn closed 3 months ago

j-hagedorn commented 5 months ago

Clean patterns from atu_seq$motif found using:

un <-
  atu_seq %>% 
  select(motif) %>%
  distinct() %>%
  anti_join(tmi, by = c("motif" = "id"))

Clean patterns from aft$atu_id found using:

un <-
  aft %>%
  select(atu_id) %>%
  distinct() %>%
  anti_join(atu_seq %>% select(atu_id) %>% distinct(), by = "atu_id")