在igraph网络绘图中修改顶点形状时出现non-numeric参数错误的原因

问题概述 #

你在使用igraph绘制有向网络时，尝试将所有顶点的默认形状从circle改为square时触发了如下错误：

Error in y1 - y2 : non-numeric argument to binary operator

你已经验证布局矩阵l的数值类型正常（is.numeric(l)返回TRUE），且仅修改部分顶点形状（如V(net)[c(2,4,7,8,9)]$shape <- "square"）时可以正常运行，希望了解错误的根本原因。

已验证的可行解决方案 #

你找到的部分修改顶点形状的方法是有效的，完整可运行代码示例如下：

# 获取节点和边数据
nodes <- getNodes(site = site, datapath = pathdata)
links <- getEdges(site = site, datapath = pathdata)

# 创建网络对象
net <- graph_from_data_frame(d=links, vertices=nodes, directed=T)

# 设置布局矩阵
l <- matrix(c(as.numeric(nodes$X), as.numeric(nodes$Y)),ncol=2)

# 保留默认形状为circle，仅修改指定节点为square
V(net)$shape <- "circle" 
V(net)[c(2, 4, 7, 8, 9)]$shape <- "square"

# 绘图
plot(net, layout=l)

错误原因分析 #

这个错误的根源在于你的nodes数据框中可能存在名为shape的列，且该列的类型不是字符型：

• 当你使用graph_from_data_frame()创建网络对象时，igraph会自动将顶点数据框中的所有列作为顶点属性导入。如果nodes里已经有一个shape列，且它的类型是数值型、因子型或其他非字符型，那么全局赋值V(net)$shape <- "square"时，会导致属性内部类型混乱；
• 绘图时，igraph需要基于形状属性计算顶点的显示参数，类型混乱会触发数值运算错误（也就是你看到的y1 - y2非数值参数错误）。

而仅修改部分顶点的shape属性时，igraph会自动将整个shape属性列的类型转换为字符型，此时类型统一，所以可以正常绘图。

验证与额外排查/解决步骤 #

你可以通过以下命令验证推测：

# 检查nodes数据框是否存在shape列
colnames(nodes)

# 查看shape列的类型
class(nodes$shape)

如果确实存在非字符型的shape列，可通过以下方式解决：

• 方法1：创建网络前删除该列

  nodes <- nodes[, !colnames(nodes) %in% "shape"]
  net <- graph_from_data_frame(d=links, vertices=nodes, directed=T)
  V(net)$shape <- "square"
  

• 方法2：创建网络后统一属性类型

  net <- graph_from_data_frame(d=links, vertices=nodes, directed=T)
  V(net)$shape <- as.character(V(net)$shape) # 先转换为字符型
  V(net)$shape <- "square" # 再全局赋值
  

内容的提问来源于stack exchange，提问作者D. de Jonge