Is there an R function for finding differences in ChiSqr results

Question

Here is an example contingency table using R

group = c("A","B","C","D","E")
Fail = c(424, 357, 324, 339, 160)
Pa