问问大伙,得到一个文档词频矩阵之后,怎么计算两两的余弦相似度,R里面有比较方便的实现吗

0
已邀请:
1

dj123jary 2016-08-11 回答

> library(coop)
> x <- matrix(rnorm(10*3), 10, 3)
> x
            [,1]       [,2]        [,3]
 [1,] -0.4498279  1.6169854  2.25597722
 [2,] -1.1618668  0.5295296 -2.44718893
 [3,]  1.5799922  0.5692471  0.54210600
 [4,]  1.4555268  1.1161297  0.71175616
 [5,] -0.2686107  0.2237898  0.68070911
 [6,] -0.2620662 -2.1139457  0.03815247
 [7,] -2.4806498  0.3981632  0.81967420
 [8,] -0.4603556  0.2328576  0.26239425
 [9,] -1.0359132 -0.4183951 -0.83718972
[10,] -1.9233996  0.8439721 -1.24656879
> cosine(x)
            [,1]        [,2]      [,3]
[1,]  1.00000000 -0.04595577 0.2835771
[2,] -0.04595577  1.00000000 0.2582956
[3,]  0.28357713  0.25829565 1.0000000

要回复问题请先登录注册