次のように定義されたデータフレームがあります(実際には200以上の変数があります):
class_level var1 var2
1 4 7
1 6 7
1 7 6
4 3 1
4 1 3
ここで、class_level は 1 または 4 のいずれかで、var1 と var2 の値は 1 ~ 7 で、調査からのリッカートのような応答レベルです。
クラスレベルごとに各変数のレベルごとのカウントを含むデータフレームが必要で、各変数の合計行は次のようになります。
class_level variable Levels Students
1 var1 1 10
1 var1 2 7
1 var1 3 28
1 var1 4 15
1 var1 5 54
1 var1 6 38
1 var1 7 16
1 var1 Total 168
4 var1 1 58
. . . .
. . . .
. . . .
4 var1 7 33
4 var1 Total 294
私は次のことを試しました:
df.m <- melt( df, id.vars=c("class_level"), na.rm=TRUE )
head(df.m)
# class_level variable value
#1 4 var1 4
#2 4 var1 6
#3 1 var1 7
#4 4 var1 3
#5 1 var1 5
#6 4 var1 6
df.c <- dcast( df.m, class_level+variable ~ value,
fun.aggregate=length,
subset=.(variable %in% c("var1","var2")),
margins=TRUE
)
head(df.c)
# class_level variable 1 2 3 4 5 6 7 (all)
#1 1 var1 1 1 8 24 56 101 32 223
#2 1 var2 2 4 4 22 49 79 56 216
#3 4 var1 4 5 11 38 91 114 76 339
#4 4 var2 2 6 11 35 73 98 106 331
df.o <- melt( df.c, id.vars=c("class_level","variable"),
variable.name="Levels", value.name="Students"
)
head(df.o)
# class_level variable Levels Students
#1 1 var1 1 1
#2 1 var2 1 2
#3 4 var1 1 4
#4 4 var2 1 2
#5 1 var1 2 1
#6 1 var2 2 4
ご覧のとおり、これにより各変数のレベルごとのカウントが生成されますが、行の合計は生成されません。最終データセット (df.o) で合計行を取得するにはどうすればよいですか。どんな助けでも大歓迎です。
デビッド