請(qǐng)問(wèn)在for (i in 1: length(unique(mynet$SOURCE)) ){
E(net)[map(unique(mynet$SOURCE),function(x) {
get.edge.ids(net,vp = c(unique(mynet$SOURCE)[i],x))
})%>% unlist()]$color <- allcolour[i]
} 的時(shí)候報(bào)這個(gè)錯(cuò)誤
Error in get.edge.ids(net, vp = c(unique(mynet$SOURCE)[i], x)) :
At type_indexededgelist.c:1201 : Cannot get edge ids, invalid vertex id, Invalid vertex id
這樣該怎么解決呢?
細(xì)胞間通訊教程|| cellphonedb 及其可視化細(xì)胞配受體通識(shí)以及常見(jiàn)細(xì)胞分泌信號(hào)通路[http://www.reibang.com/p/df4721d29a91]CellChat:細(xì)胞間相互作用分析利器[https:/...