orders <- data.frame(id = 1:3, value = c(10, 20, 30))
customers <- data.frame(id = c(1, 2, 4), name = c("A", "B", "D"))
result <- left_join_spy(orders, customers, by = "id")
# Access the diagnostic report
attr(result, "join_report")
# Silent mode for pipelines
result2 <- left_join_spy(orders, customers, by = "id", .quiet = TRUE)
last_report() # Access diagnostics afterward
Run the code above in your browser using DataLab