R中的连通气泡图

我有以下资料：

type <- c('a', 'b', 'c', 'a&b', 'a&c', 'b&c', 'a&b&c')
distribution <- c(.25, .1, .12, .18, .15, .05, .15)

---

type使用带有数据的
igraph
库，可以创建边和顶点来表示所需的绘图。这里有一个方法

library(igraph)
type <- c('a', 'b', 'c', 'a&b', 'a&c', 'b&c', 'a&b&c')
distribution <- c(.25, .1, .12, .18, .15, .05, .15)

mx <- strsplit(type,"&")
ei <- sapply(mx,length)>1
cx <- do.call(rbind, mapply(cbind, type[ei], mx[ei]))

gg <- graph.edgelist(cx, directed=FALSE)    

V(gg)[type]$size<-distribution *200
plot(gg)

库（igraph）
类型包请求通常被认为是离题的。最好包含一小部分您希望以这种方式可视化的数据，并重新表述您的问题。
igraph
package可能会有所帮助。是否有方法更改顶点周长的颜色<代码>列表.顶点.属性（gg）
返回“名称”“大小”“颜色”。但是，修改“color”属性只会更改填充。请尝试
V（gg）[type]$frame.color