explain: Explain details of a tbl

# NOT RUN { if (require("dbplyr")) {  lahman_s <- lahman_sqlite() batting <- tbl(lahman_s, "Batting") batting %>% show_query() batting %>% explain()  # The batting database has indices on all ID variables: # SQLite automatically picks the most restrictive index batting %>% filter(lgID == "NL" & yearID == 2000L) %>% explain()  # OR's will use multiple indexes batting %>% filter(lgID == "NL" | yearID == 2000) %>% explain()  # Joins will use indexes in both tables teams <- tbl(lahman_s, "Teams") batting %>% left_join(teams, c("yearID", "teamID")) %>% explain() } # }