我目前的问题是以下。我有一个有向的1模式边沿列表,代表在特定年份中参与联合项目的成对演员,可能看起来像:
projektleader projectpartner year
A B 2005
A C 2000
B A 2002
... ... ...
Run Code Online (Sandbox Code Playgroud)
现在我只需要一个特定年份的子集。并非所有参与者都在这一年活跃,因此子集的规模有所不同。对于下面的网络分析,我需要一个加权有向的邻接矩阵,因此我使用[network package]的选项来创建它。我首先将其加载为网络对象,然后将其转换为邻接矩阵。
grants_00 <- subset(grants, (year_grant=2000), select = c(projectpartner, projectleader))
nw_00 <- network(grants_08to11[,1:2], matrix="edgelist", directed=TRUE)
grants_00.adj <- as.matrix(nw_00, matrix.type = "adjacency")
Run Code Online (Sandbox Code Playgroud)
结果矩阵看起来像
A B C E ...
A 0 1 1 0
B 1 0 0 0
...
Run Code Online (Sandbox Code Playgroud)
到目前为止,一切都很好。我的问题现在是:为了进行进一步的分析,我打算每年以相同的维度和顺序使用邻接矩阵。这意味着来自初始数据集的所有参与者必须是对应年份矩阵的行名和列名,但是矩阵只应包含该特定年份的观察对。我希望我的问题很清楚。我感谢任何建设性的解决方案。
我的想法是ATM:创建初始数据集和简化数据集的矩阵。然后,将所有矩阵值都设置为零。然后我以某种方式将其与简化后的矩阵匹配,并在正确的行和列中使用正确的值填充它。不幸的是,我不知道这怎么可能。
有谁知道如何解决这个问题?