if (FALSE) {
# Compare image pairs and summarize
pairs <- data.frame(
img1 = c("baseline/a.png", "baseline/b.png", "baseline/c.png"),
img2 = c("current/a.png", "current/b.png", "current/c.png")
)
results <- compare_images_batch(pairs)
summary(results)
# Get summary with more worst offenders
summary(results, n_worst = 10)
}
Run the code above in your browser using DataLab