Я использовал следующий код, чтобы получить уникальные и перекрывающиеся клоны среди трех групп - «HD без стимула», «E C без стимуляции» и «ВИЧ без стимуляции».
Есть также 16 клонов, общих среди трех групп. Как я могу добавить это к этому графику?
m<-matrix(c(71,22,30,0,69,23,0,0,96), nrow=3, ncol=3, dimnames=list(c("HDno stim","ECno stim","HIVno stim"),c("HDno stim","ECno stim","HIVno stim")))
library(circlize)
grid.col=c(HDnostim="red",ECnostim ="green",HIVnostim ="blue")
chordDiagram((m), grid.col = grid.col)
circos.clear()
