Browse code

removed all explicit repo paths

git-svn-id: https://hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/MotifDb@75382 bc3139a8-67e5-0310-9ffc-ced21a209358

p.shannon authored on 05/04/2013 20:36:31
Showing5 changed files

... ...
@@ -4,10 +4,7 @@ library (org.Hs.eg.db)
4 4
 #------------------------------------------------------------------------------------------------------------------------
5 5
 printf <- function(...) print(noquote(sprintf(...)))
6 6
 #------------------------------------------------------------------------------------------------------------------------
7
-kDataDir <- "~/s/data/public/TFBS"
8
-kDataDir <- "/shared/silo_researcher/Morgan_M/BioC/MotifDb"
9
-#------------------------------------------------------------------------------------------------------------------------
10
-run = function (dataDir=kDataDir)
7
+run = function (dataDir)
11 8
 {
12 9
   dataDir <- file.path(dataDir, "hPDI")
13 10
 
... ...
@@ -4,7 +4,7 @@ library (RUnit)
4 4
 #------------------------------------------------------------------------------------------------------------------------
5 5
 source("import.R")
6 6
 #------------------------------------------------------------------------------------------------------------------------
7
-run.tests = function (dataDir=kDataDir)
7
+run.tests = function (dataDir)
8 8
 {
9 9
   dataDir <- file.path(dataDir, "hPDI")
10 10
   #freshStart ()
... ...
@@ -7,10 +7,7 @@ library (org.Mm.eg.db)
7 7
 #------------------------------------------------------------------------------------------------------------------------
8 8
 printf <- function(...) print(noquote(sprintf(...)))
9 9
 #------------------------------------------------------------------------------------------------------------------------
10
-kDataDir <- "~/s/data/public/TFBS"
11
-kDataDir <- "/shared/silo_researcher/Morgan_M/BioC/MotifDb"
12
-#------------------------------------------------------------------------------------------------------------------------
13
-run = function (dataDir=kDataDir)
10
+run = function (dataDir)
14 11
 {
15 12
   dataDir <- file.path(dataDir, "jaspar")
16 13
   tbl.rmat = readRawMatrices (dataDir)
... ...
@@ -5,10 +5,7 @@ library (org.Mm.eg.db)
5 5
 #------------------------------------------------------------------------------------------------------------------------
6 6
 printf <- function(...) print(noquote(sprintf(...)))
7 7
 #------------------------------------------------------------------------------------------------------------------------
8
-kDataDir <- "~/s/data/public/TFBS"
9
-kDataDir <- "/shared/silo_researcher/Morgan_M/BioC/MotifDb"
10
-#------------------------------------------------------------------------------------------------------------------------
11
-run = function (dataDir=kDataDir)
8
+run = function (dataDir)
12 9
 {
13 10
   dataDir <- file.path(dataDir, "stamlab")
14 11
   rawMatrixList <- readRawMatrices (dataDir)
... ...
@@ -6,7 +6,7 @@ library (RUnit)
6 6
 #------------------------------------------------------------------------------------------------------------------------
7 7
 source("import.R")
8 8
 #------------------------------------------------------------------------------------------------------------------------
9
-run.tests = function (dataDir=kDataDir)
9
+run.tests = function (dataDir)
10 10
 {
11 11
   dataDir <- file.path(dataDir, "stamlab")
12 12
   x.rawMatrixList <<- test.readRawMatrices (dataDir)