循环用于制表数据帧中的变量

Question

我有一个df和n变量。 我想遍历变量的一个子集并产生一个频率表。

例如，给出以下df：

id a b c d 
1 0 1 0 1 
2 1 0 1 0 
3 0 1 0 1 

我试图做没有成功如下：

varlist <- c("a", "c") 

for (i in varlist){ 
    print(table(df$i)) 
       } 

Answer 1

（首先，你的矩阵df转化为数据帧:)

df <- setNames(as.data.frame(df), letters[1:4]) 

$没有与变量一起工作。你必须使用[[代替：

for (i in varlist){ 
    print(table(df[[i]])) 
} 

但是，对于您的问题更容易解决方案是lapply：

lapply(df[varlist], table) 

---

从Extract帮助页面：

的主要区别在于$不允许计算指标，而[[呢。