git-svn-id: https://hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/MotifDb@86079 bc3139a8-67e5-0310-9ffc-ced21a209358
... | ... |
@@ -13,7 +13,9 @@ run = function (dataDir) |
13 | 13 |
matrices <- normalizeMatrices (matrices) |
14 | 14 |
matrices <- renameMatrices (matrices, tbl.md) |
15 | 15 |
|
16 |
- serializedFile <- "demo.RData" |
|
16 |
+ serializedFile <- file.path(getwd(), dataDir, "demo.RData") |
|
17 |
+ printf("writing %s to %s", "demo.RData", dataDir) |
|
18 |
+ |
|
17 | 19 |
save (matrices, tbl.md, file=serializedFile) |
18 | 20 |
printf("saved %d matrices to %s", length(matrices), serializedFile) |
19 | 21 |
printf("next step: copy %s to <packageRoot>/MotifDb/inst/extdata, rebuild package", serializedFile) |