R中igraph网络顶点的颜色托盘

我正在用igraph1在R中绘制网络图。该网络有1380个节点和大约150k条边。以下是igraph的摘要：

IGRAPH UN-- 1380 159718 -- 
+ attr: name (v/c), rels (v/n), label (v/n), degree (v/n), btw (v/n), color (v/c), rels (e/n)

我正在尝试添加一个颜色渐变，根据节点的中心性为节点着色。我尝试了几种不同版本的代码，首先是：

如果我改用

rainbow

函数，效果很好：

V(g_yearly)$color <- rainbow(V(g_yearly)$btw,start=3/6,end=4/6)

---

V（g_year）$color我认为问题在于这一行：

# assign palette to nodes
V(g_yearly)$color <- palette(fine [as.numeric(cut(V(g_yearly)$btw,breaks=fine))]

（在没有可复制示例的情况下未测试。）
在错误回溯中，您有第2行调色板（调色板）。
我想，如果覆盖变量，请尝试：pale我也有同样的问题，但发现了问题。当你这样做的时候

palette <- colorRampPalette(c('blue','green'))

好吧，这是一个不幸的打字错误，但我想这只是在我的帖子里。不管怎样，我反复检查了一遍，结果是一样的。在你调用的“示例”链接中有代码，但没有数据。所以这不是真的。。。。举个例子，我来看看是否可以共享一段数据。这是一个联合研究项目的一部分，数据是我的，但我不能全部分享。你是怎么得到回溯的？！？
# assign palette to nodes
V(g_yearly)$color <- palette(fine [as.numeric(cut(V(g_yearly)$btw,breaks=fine))]

V(g_yearly)$color <- palette(fine)[ as.numeric( cut(V(g_yearly)$btw, breaks=fine)]   

palette <- colorRampPalette(c('blue','green'))

palette <- colorRampPalette(c('blue','green'))