Mercurial > repos > peterjc > venn_list
annotate tools/venn_list/venn_list.py @ 4:991342eca214 draft
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
author | peterjc |
---|---|
date | Wed, 29 Apr 2015 11:00:41 -0400 |
parents | |
children | ea68a1a4c1d9 |
rev | line source |
---|---|
4
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
1 #!/usr/bin/env python |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
2 """Plot up to 3-way Venn Diagram using R limma vennDiagram (via rpy) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
3 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
4 This script is copyright 2010 by Peter Cock, The James Hutton Institute |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
5 (formerly SCRI), UK. All rights reserved. |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
6 See accompanying text file for licence details (MIT/BSD style). |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
7 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
8 This is version 0.0.8 of the script. |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
9 """ |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
10 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
11 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
12 import sys |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
13 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
14 def sys_exit(msg, error_level=1): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
15 """Print error message to stdout and quit with given error level.""" |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
16 sys.stderr.write("%s\n" % msg) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
17 sys.exit(error_level) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
18 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
19 try: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
20 import rpy |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
21 except ImportError: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
22 sys_exit("Requires the Python library rpy (to call R)") |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
23 except RuntimeError, e: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
24 sys_exit("The Python library rpy is not availble for the current R version\n\n%s" % e) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
25 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
26 try: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
27 rpy.r.library("limma") |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
28 except: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
29 sys_exit("Requires the R library limma (for vennDiagram function)") |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
30 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
31 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
32 if len(sys.argv)-1 not in [7, 10, 13]: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
33 sys_exit("Expected 7, 10 or 13 arguments (for 1, 2 or 3 sets), not %i" % (len(sys.argv)-1)) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
34 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
35 all_file, all_type, all_label = sys.argv[1:4] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
36 set_data = [] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
37 if len(sys.argv)-1 >= 7: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
38 set_data.append(tuple(sys.argv[4:7])) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
39 if len(sys.argv)-1 >= 10: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
40 set_data.append(tuple(sys.argv[7:10])) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
41 if len(sys.argv)-1 >= 13: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
42 set_data.append(tuple(sys.argv[10:13])) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
43 pdf_file = sys.argv[-1] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
44 n = len(set_data) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
45 print "Doing %i-way Venn Diagram" % n |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
46 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
47 def load_ids(filename, filetype): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
48 if filetype=="tabular": |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
49 for line in open(filename): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
50 line = line.rstrip("\n") |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
51 if line and not line.startswith("#"): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
52 yield line.split("\t",1)[0] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
53 elif filetype=="fasta": |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
54 for line in open(filename): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
55 if line.startswith(">"): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
56 yield line[1:].rstrip("\n").split(None,1)[0] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
57 elif filetype.startswith("fastq"): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
58 #Use the Galaxy library not Biopython to cope with CS |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
59 from galaxy_utils.sequence.fastq import fastqReader |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
60 handle = open(filename, "rU") |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
61 for record in fastqReader(handle): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
62 #The [1:] is because the fastaReader leaves the @ on the identifer. |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
63 yield record.identifier.split()[0][1:] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
64 handle.close() |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
65 elif filetype=="sff": |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
66 try: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
67 from Bio.SeqIO import index |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
68 except ImportError: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
69 sys_exit("Require Biopython 1.54 or later (to read SFF files)") |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
70 #This will read the SFF index block if present (very fast) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
71 for name in index(filename, "sff"): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
72 yield name |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
73 else: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
74 sys_exit("Unexpected file type %s" % filetype) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
75 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
76 def load_ids_whitelist(filename, filetype, whitelist): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
77 for name in load_ids(filename, filetype): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
78 if name in whitelist: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
79 yield name |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
80 else: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
81 sys_exit("Unexpected ID %s in %s file %s" % (name, filetype, filename)) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
82 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
83 if all_file in ["", "-", '""', '"-"']: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
84 #Load without white list |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
85 sets = [set(load_ids(f,t)) for (f,t,c) in set_data] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
86 #Take union |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
87 all = set() |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
88 for s in sets: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
89 all.update(s) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
90 print "Inferred total of %i IDs" % len(all) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
91 else: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
92 all = set(load_ids(all_file, all_type)) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
93 print "Total of %i IDs" % len(all) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
94 sets = [set(load_ids_whitelist(f,t,all)) for (f,t,c) in set_data] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
95 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
96 for s, (f,t,c) in zip(sets, set_data): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
97 print "%i in %s" % (len(s), c) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
98 |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
99 #Now call R library to draw simple Venn diagram |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
100 try: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
101 #Create dummy Venn diagram counts object for three groups |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
102 cols = 'c("%s")' % '","'.join("Set%i" % (i+1) for i in range(n)) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
103 rpy.r('groups <- cbind(%s)' % ','.join(['1']*n)) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
104 rpy.r('colnames(groups) <- %s' % cols) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
105 rpy.r('vc <- vennCounts(groups)') |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
106 #Populate the 2^n classes with real counts |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
107 #Don't make any assumptions about the class order |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
108 #print rpy.r('vc') |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
109 for index, row in enumerate(rpy.r('vc[,%s]' % cols)): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
110 if isinstance(row, int) or isinstance(row, float): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
111 #Hack for rpy being too clever for single element row |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
112 row = [row] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
113 names = all |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
114 for wanted, s in zip(row, sets): |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
115 if wanted: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
116 names = names.intersection(s) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
117 else: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
118 names = names.difference(s) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
119 rpy.r('vc[%i,"Counts"] <- %i' % (index+1, len(names))) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
120 #print rpy.r('vc') |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
121 if n == 1: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
122 #Single circle, don't need to add (Total XXX) line |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
123 names = [c for (t,f,c) in set_data] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
124 else: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
125 names = ["%s\n(Total %i)" % (c, len(s)) for s, (f,t,c) in zip(sets, set_data)] |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
126 rpy.r.assign("names", names) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
127 rpy.r.assign("colors", ["red","green","blue"][:n]) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
128 rpy.r.pdf(pdf_file, 8, 8) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
129 rpy.r("""vennDiagram(vc, include="both", names=names, |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
130 main="%s", sub="(Total %i)", |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
131 circle.col=colors) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
132 """ % (all_label, len(all))) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
133 rpy.r.dev_off() |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
134 except Exception, exc: |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
135 sys_exit( "%s" %str( exc ) ) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
136 rpy.r.quit( save="no" ) |
991342eca214
Uploaded v0.0.8a, declare Biopython dependency via Tool Shed
peterjc
parents:
diff
changeset
|
137 print "Done" |