我有一个边缘列表，我想将其转换为加权图。我用下面的代码：
edgelist <- read.table(text = "
V1 v2 weights
A B 1
B C 8
C D 6
D E 9
C F 12
F G 15",header=T)
g<-graph_from_data_frame(edgelist)
g
它将权重作为边缘的属性。但是，当我想检查它是否加权时：
is_weighted(g)
它返回了我FALSE。如何将其更改为TRUE？