Bibliometrix 包：如何将 link 共引参考文献簇恢复为原始施引文献？

Question

我已经使用 R 包 bibliometrix 完成了共引分析，如本例所示：

library(bibliometrix)
data(scientometrics, package = "bibliometrixData")
M <- scientometrics
NetMatrix <- biblioNetwork(M, analysis = "co-citation", network = "references", sep = "; ")

net=networkPlot(NetMatrix, n = 30, Title = "Co-Citation Network", type = "fruchterman", size=T,
                remove.multiple=FALSE, labelsize=0.7,edgesize = 5)

有3个communities/clusters:

plot(net$graph)

可以通过多种方式访问每个集群中的共同被引参考文献（即节点），例如：

net$cluster_obj[1] #cluster 1
net$cluster_obj[2] #cluster 2
net$cluster_obj[3] #cluster 3

从每个集群中得到的列出的引文名称总共是在 NetMatrix 中找到的列名和行名，该矩阵的单元格表示共同引用这对参考文献的原始文档的数量。在这种情况下，NetMatrix 是 [A'] x [A] 的结果，其中 A 的行引用原始引用文档 (rownames(M))，A 的列引用这些文档的引用 (M$CR或名称(net$nodeDegree)).

我的问题：有没有办法 link/refer 这些集群中的共同引用参考文献回到引用它们的原始文档（在 M 数据框中），以便我可以检索分别在簇 1、2 和 3 中共同引用参考文献的原始文档的 M$TI 或 rownames(M) 列表？

Answer 1

是的，你可以，但它需要一点或 'acrobatics':

首先提取集群的引用并做一些清理：

library(dplyr)
library(stringr)
cluster1 <- tibble(ref = net$cluster_obj[1] %>% unlist() %>% toupper(),
                   ID = seq(1:length(ref))) %>% mutate(part = str_extract(ref, "^\D+") %>% str_trim(),
                                                       part2 = str_extract(ref,"(\d)+"),
                                                       reference = paste0(part,", ",part2)) %>% 
  select(ID, reference, ref)

现在您已准备好进行搜索的参考资料。我将使用第一个参考文献进行示例搜索：

sample <-M %>% filter(grepl(cluster1$reference[1], CR))

您可以遍历 cluster1 table 中的引用并将结果放入公共数据帧中。

Bibliometrix 包：如何将 link 共引参考文献簇恢复为原始施引文献？

Bibliometrix package: how to link co-citation reference clusters back to original citing documents?

r

matrix

social-networking

bibliography