如何使用R(Venndiagram包)为维恩图中的每个圆圈指定名称

时间:2013-10-20 21:58:43

标签: r venn-diagram

我会为维恩图中的每个圆圈指定一个名称。我试图更改类别中的选项,但似乎这是我可以使用的唯一设置。我附上我的代码,请问错误的部分在哪里?

         goterm3 = c(1,2,3,4,5,6)
         goterm2 =c(2,2,3,4,3,5)
        goterm1=c(4,5,3,2,4,3,2,4)
      int12 = intersect(goterm1, goterm2)
    int13 = intersect(goterm1, goterm3)
    int23 = intersect(goterm2, goterm3) 
    intall = intersect(int12, goterm3)
    require(VennDiagram)

      venn.plot =  draw.triple.venn(length(goterm1), length(goterm2), length(goterm3),
       length(int12), length(int23), length(int13),length(intall),
 category = rep("ORG1, ORG2,Org",3) ,rotation = 1, reverse = FALSE, euler.d =    FALSE,
      scaled = FALSE, lwd = rep(2, 3), lty = rep("solid", 3),
      col = rep("black", 3), fill = c("blue", "red", "green"),
      alpha = rep(0.5, 3),
     label.col = rep("black", 7), cex = rep(1, 7), fontface = rep("plain", 7),
      fontfamily = rep("serif", 7), cat.pos = c(0, 0, 180),
      cat.dist = c(0.05, 0.05, 0.025), cat.col = rep("black", 3),
      cat.cex = rep(1, 3), cat.fontface = rep("plain", 3),
      cat.fontfamily = rep("serif", 3),
      cat.just = list(c(0.5, 1), c(0.5, 1), c(0.5, 0)), cat.default.pos = "outer",
      cat.prompts = FALSE, rotation.degree = 0, rotation.centre = c(0.5, 0.5),
      ind = TRUE, sep.dist = 0.05, offset = 0)

1 个答案:

答案 0 :(得分:1)

这就是我得到的,它与你的类别具有相同的标签(在我解开类别的字符串值之后:

  category = c("ORG1", "ORG2","Org") # no rep needed and proper quotes 

enter image description here