What does the following code return? infusion.table = matrix…

What does the following code return? infusion.table = matrix(c(13, 3, 4, 9), nrow = 2, ncol = 2, byrow = T) dimnames(infusion.table) = list(“Outcome” = c(“Cured”, “Uncured”),                                                                 “Drug” = c(“Fecal Infusion”, “Vancomycin”)) fisher.test(infusion.table)