Я пытаюсь выполнить тестирование chisquare для всех столбцов в R

Мои данные:

dependent <- c(1,0,1)
Salutation <- c("MR","MR","MR")
Gender <- c("MALE","MALE","MALE")
Profession <- c("BUSINESS","OTHER","BUSINESS")
Region <- c("South","West","Midwest")
CUST_RES_CITY <- c("MUMBAI","BANGALORE","BANGALORE")
Vertical_New <- c("AGENCY 1","AGENCY 1","AGENCY 2")
VehicleMake  <-c ("SUZUKI","HONDA","VOLKS") 
model<- c("SWIFT","MOBILIO","POLO")
Segment <- c("5 to 10 Lacs","10 to 30 Lacs","5 to 10 Lacs")


factor.cs <- data.frame(dependent, Salutation ,Gender ,Profession ,Region, CUST_RES_CITY,Vertical_New,VehicleMake ,model,Segment)

Раньше у меня была эта штука, которая проводила проверку хи-квадрат и возвращала из нее статистику.

corr.factor <- factor.cs %>%
summarise_each(funs(chisq.test(., 
                               factor.cs[,dependent])$statistic), -one_of(dependent))

Теперь, когда summarise_each изменено на summarise_at, _all и т. д., Я попытался изменить код

corr.factor <- factor.cs %>%  
 summarise_all(funs(chisq.test(., factor.cs$dependent)$statistic))
 %>% select(-c("dependent"))

Я получаю эту ошибку:

Error in summarise_impl(.data, dots) : 
  Evaluation error: 'x' and 'y' must have at least 2 levels