new file: cell2loc.py
[GalaxyCodeBases.git] / perl / etc / justonce / sperm / venn.R.txt
blob9ee24c7ab37c2cc47147ef13e9a93781dbca477e
1 require(VennDiagram)
3 venn.plot <- draw.triple.venn(
4          area1 = 323687,
5          area2 = 350200,
6          area3 = 330813,
7          n12 = 45830,
8          n23 = 43168,
9          n13 = 41163,
10          n123 = 7207,
11          category = c("MDA_23", "MDA_24", "MDA_28"),
12          fill = c("blue", "red", "green"),
13          lty = "blank",
14          cex = 2,
15          cat.cex = 2,
16          #cat.col = c("blue", "red", "green"),
17          fontfamily = rep("Arial", 7),
18          cat.fontfamily = rep("Arial", 3),
19          rotation.degree = 30,
20          ind = FALSE
21          );
22 tiff(filename = "Venn_diagram_MDA.tiff", compression = "lzw",width = 2049, height = 2049, units = "px", pointsize = 40);
23 grid.draw(venn.plot);
24 dev.off();
31 venn.plot <- draw.triple.venn(
32          area1 = 839728,
33          area2 = 791549,
34          area3 = 784082,
35          n12 = 97598,
36          n23 = 95852,
37          n13 = 102159,
38          n123 = 36960,
39          category = c("MALBAC_01", "MALBAC_02", "MALBAC_03"),
40          fill = c("blue", "red", "green"),
41          lty = "blank",
42          cex = 2,
43          cat.cex = 2,
44          #cat.col = c("blue", "red", "green"),
45          fontfamily = rep("Arial", 7),
46          cat.fontfamily = rep("Arial", 3),
47          rotation.degree = 30,
48          ind = FALSE,
49          cat.default.pos='outer'
50          );
51 tiff(filename = "Venn_diagram_MALBAC.tiff", compression = "lzw",width = 2049, height = 2049, units = "px", pointsize = 40);
52 grid.draw(venn.plot);
53 dev.off();