V
> dcast(melt(DT, measure.vars = c("C", "D"), variable.name = "X"), A + X ~ B, value.var = "value")
A X b1 b2
1: a C c1 c2
2: a D d1 d2
Size: a a a
V
> dcast(melt(DT, measure.vars = c("C", "D"), variable.name = "X"), A + X ~ B, value.var = "value")
A X b1 b2
1: a C c1 c2
2: a D d1 d2
V
Ю
AM
AM
А
А
А
А
ЕТ
ЕТ
Ю
Ю
Ю
S
S
IT
Ю
IT