Small error in code for Chapter 6.4

[marcelbaumgartner]

Hello, I am using your amazing book for my teaching. Using R 4.4.1 and the latest library, I had to replace this code list(snowball = snowball_rs, smart = smart_rs, stopwords-iso = stopwords_iso_rs) %>% map_dfr(show_best, "rmse", .id = "name") %>%

by

list(snowball = snowball_rs, smart = smart_rs, stopwords-iso = stopwords_iso_rs) %>% map_dfr(show_best, metric = "rmse", .id = "name") %>%

The function map_dfr now needs clarification regarding the metric used in show_best().