delete.edges在igraph中不起作用

Question

我想删除链接到节点＆＃39; 1＆＃39;的所有边缘。但函数delete.edges不起作用：

g<-graph.full(n=10, directed = TRUE, loops = FALSE)
g <- delete.edges(g,c(2,1,3,1,4,1,5,1,6,1))
plot(g)

查看图表时，没有任何变化！有什么问题？