I have two datasets that I want to join on book  column. However, the book names are a bit different from the first dataset. It seems there is no clear pattern, but the only condition would be this: the book names in df1 is a subset of the book names df2. Would you have any suggestion to join them?
df1 <- tribble(
  ~book, ~sales, 
  "a",   100,
  "bakora",    60,
  "c",  40,
)
df2 <- tribble(
  ~book, ~sales, 
  "a.com",   100,
  "bakorade",    60,
  "c.zi",    60,
)
 
    