git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/tRanslatome@121673 bc3139a8-67e5-0310-9ffc-ced21a209358
... | ... |
@@ -364,8 +364,7 @@ comparisonBetweenTwoLists <- function(go1,go2,ontology,direction) { |
364 | 364 |
for (i in 1:nrow(go1)) { |
365 | 365 |
mat <- NULL |
366 | 366 |
for (j in 1:nrow(go2)) { |
367 |
- sim <- goSim(go1[i, 1], go2[j, 1], |
|
368 |
- organism="human", measure="Wang", ont = ontology) |
|
367 |
+ sim <- goSim(go1[i, 1], go2[j, 1], measure="Wang") |
|
369 | 368 |
mat <- rbind(mat, c(go1[i, 1],go1[i, 2],go2[j, 1],go2[j, 2],sim)) |
370 | 369 |
} |
371 | 370 |
|