をr

Question

内のすべてのダミー変数の周波数を示し、私は私がすべてのダミー変数の頻度表を作成したいR. で新人と私は、この

ID Dummy_2008 Dummy_2009 Dummy_2010 Dummy_2011 Dummy_2012 Dummy_2013 
1 1   1   0   0   1   1 
2 0   0   1   1   0   1 
3 0   0   1   0   0   1 
4 0   1   1   0   0   1 
5 0   0   0   0   1   0 
6 0   0   0   1   0   0 

のようなデータを持っています私はテーブルを（）を使用することを知っているこの

  0 1 sum 
Dummy_2008 5 1 6 
Dummy_2009 4 2 6 
Dummy_2010 3 3 6 
Dummy_2011 4 2 6 
Dummy_2012 4 2 6 
Dummy_2013 2 4 6 

のように、各変数にどのようにトータル周波数を見てみたいが、私はこれだけの変数の時間を行うことができます。 私は多くの時間の重大なダミー変数を持っており、それらの傾向を見たいと思います。助けを

感謝

テレンス

Answer 1

はmtabulateとaddmargins

library(qdapTools) 
addmargins(as.matrix(mtabulate(df1[-1])),2) 
#   0 1 Sum 
#Dummy_2008 5 1 6 
#Dummy_2009 4 2 6 
#Dummy_2010 3 3 6 
#Dummy_2011 4 2 6 
#Dummy_2012 4 2 6 
#Dummy_2013 2 4 6 

Answer 2

result = as.data.frame(t(sapply(dat[,-1], table)))   
result$Sum = rowSums(result) 

      0 1 Sum 
Dummy_2008 5 1 6 
Dummy_2009 4 2 6 
Dummy_2010 3 3 6 
Dummy_2011 4 2 6 
Dummy_2012 4 2 6 
Dummy_2013 2 4 6 

説明：

sapplyは、データフレームの各列に関数を適用し、行列を返します。したがって、sapply(dat[,-1], table)は、各列（除外した最初の列を除く）に対して、tableの出力を持つ行列を返します。

元のデータフレームの列名が行であり、ダミー値が列であるように行列を転置する必要があるため、t（転置）関数を使用します。

マトリックスではなくデータフレームが必要なので、全体をas.data.frameにラップします。

次に、合計値を示す別の列が必要なので、rowSums関数を使用します。ここで