0
これは私のコードで、Rパッケージのvenneulerを使って3セットのvennダイアグラムを作成し、各サークルと交差点(上下の遺伝子を表す)に2行のデータを挿入するコードです。私はこの解決策を見つけるのにしばらく時間がかかったので、あなたと共有します。3セットvennguerとダイアグラム
library(venneuler)
MyVenn <- venneuler(c(A=2,B=2,C=2,"A&B"=0.8,"A&C"=0.7,"B&C"=0.8,"A&B&C"=0))
MyVenn$labels <- c("","","")
MyVenn$diameters<-c(0.4,0.4,0.4)
plot(MyVenn, col="grey80", border = "black")
text(0.35,0.6,"181\n161", cex = 1.5) #A
text(0.65,0.6,"27\n14", cex = 1.5) #B
text(0.4997455,0.325,"0\n0", cex = 1.5) #C
text(0.5,0.6,"0\n0", cex = 1.5) #AB,
text(0.59,0.45,"0\n0", cex = 1.5) #BC
text(0.4,0.45,"0\n0", cex = 1.5) #AC
text(0.5,0.5,"0\n0", cex = 1.5) #ABC
そしてこれは(それは500×500として保存される)のように、それがどのように見えるかです:
円の外にラベルを追加する方法けれども、私は知らない、提案、修正、改善は歓迎されている
あなたが前に行ったよう
なぜ「テキスト」でラベルを追加しないのですか? –