as.data.frame(table(f1$Fresh.email.date, f1$Country, f1$Company.Size, f1$Vertical, f1$X1st.Follow.up, f1$X2nd.Follow.up, f1$X3rd.Follow.up))...
并在形成此数据帧时删除带有0计数的freq
我们可以使用count
或group_by
n()
library(dplyr)
f1 %>%
group_by_at(nm1) %>%
summarise(n = n())
哪里,
nm1 <- c("Country", "Company.Size", "Vertical", "X1st.Follow.up",
"X2nd.Follow.up", "X3rd.Follow.up")