(对于以下内容,我可以使用R data.frame或R data.table.两者都可以.)
我有以下data.table:
library(data.table)
dt = data.table(V1=c("dog", "dog", "cat", "cat", "cat", "bird","bird","bird","bird"),
V2=rep(42, 9), V3=c(1, 2, 4, 5, 7, 1, 2, 5, 8))
> print(dt)
V1 V2 V3
1: dog 42 1
2: dog 42 2
3: cat 42 4
4: cat 42 5
5: cat 42 7
6: bird 42 1
7: bird 42 2
8: bird 42 5
9: bird 42 8
Run Code Online (Sandbox Code Playgroud)
列V3包含从1到8的整数.我的目标是在给定列中的唯一类别的情况下,使用每个组合"对"的计数填充8乘8的零矩阵V1
因此,对于组合对dog,cat和bird是:
dog: (1, 2)
cat: …Run Code Online (Sandbox Code Playgroud)