我是新手,非常感谢您的建议
我想制作共现矩阵,并点击下面的链接
但我不明白为什么 AA 的值在下面的 matirx 中是 10 应该是 4 不是吗?因为有四个A
dat <- read.table(text='film tag1 tag2 tag3
1 AAA
2 ACF
3 BDC',标题=T)
crossprod(as.matrix(mtabulate(as.data.frame(t(dat[, -1])))))
( ) ACFBD
10 1 1 0 0
C 1 2 1 1 1
F 1 1 1 0 0
乙 0 1 0 1 1
D 0 1 0 1 1