2

現時点で私の問題は次のとおりです。特定の年に共同プロジェクトに参加しているアクターのペアを表す有向 1 モード エッジリストがあります。これは次のようになります。

projektleader   projectpartner  year
A               B               2005
A               C               2000
B               A               2002
...             ...             ...

今、特定の年のサブセットのみが必要です。すべてのアクターがその年に活動するわけではないため、サブセットの次元は異なります。次のネットワーク分析では、加重および有向隣接行列が必要なので、[ネットワーク パッケージ] のオプションを使用して作成します。最初にネットワーク オブジェクトとしてロードし、次に隣接行列に変換します。

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")

結果の行列は、次のようになります。

     A    B    C    E    ...
A    0    1    1    0
B    1    0    0    0
...

ここまでは順調ですね。私の問題は次のとおりです。私が計画しているさらなる分析のために、同じ次元と順序を持つ毎年の隣接行列が必要です。つまり、最初のデータセットのすべてのアクターは、対応する年のマトリックスの行名と列名でなければなりませんが、マトリックスには、この特定の年の観測されたペアのみが含まれている必要があります。私の問題が明確であることを願っています。どんな種類の建設的な解決策にも感謝します。

私のアイデア ATM は次のとおりです。初期データセットと縮小されたデータセットのマトリックスを作成します。次に、そこにあるすべてのマトリックス値をゼロに設定します。次に、縮小された行列と何らかの形で一致させ、正しい行と列に正しい値を入力します。残念ながら、これがどのように可能になるかはわかりません。

この問題を解決する方法を知っている人はいますか?

4

1 に答える 1