如何为R中dataframe中每一列获取dataframe中所有变量的计数信息？

# 创建一个示例dataframe
df <- data.frame(
  var1 = c(1, 2, 3, 4, 5),
  var2 = c("A", "B", "A", "B", "C"),
  var3 = c(TRUE, FALSE, TRUE, FALSE, TRUE)
)

# 使用summary()函数获取计数信息
summary(df)

# 创建一个空的dataframe用于存储计数信息
count_df <- data.frame()

# 遍历每一列，获取计数信息并存储到count_df中
for (col in names(df)) {
  counts <- table(df[[col]])
  count_df <- rbind(count_df, counts)
}

# 打印计数信息的dataframe
print(count_df)