我有一个csv文件，其结构如下：
id Author Contribution Coauthors
1 Anders B. 0.111111111 9
1 Blatt I. 0.111111111 9
1 Chung S.S. 0.111111111 9
1 Clark A.M. 0.111111111 9
1 Fakhoury T.A. 0.111111111 9
1 Halvorsen M.B. 0.111111111 9
1 Laine D. 0.111111111 9
1 Lawson B. 0.111111111 9
1 Nagaraddi V. 0.111111111 9
1 Hogan R.E. 0.111111111 9
2 Isaksson A. 0.5 2
2 Kaulich F. 0.5 2
2 Foster-McGregor N. 0.5 2
3 Van Houte M. 0 0
4 van de Meerendonk A. 1 1
4 Koning P. 1 1
其中id =纸张唯一标识符。
我想在R中创建一个加权邻接矩阵，其中每个作者之间的链接按以下方式加权：
Weight i,j = SUM for all id of [link i,j (0,1) / (Number coauthors of each id -1)]