Mercurial > repos > eschen42 > w4mclassfilter
comparison w4mclassfilter_wrapper.R @ 1:0c312f3a4a17 draft
planemo upload
| author | eschen42 |
|---|---|
| date | Wed, 10 May 2017 02:49:44 -0400 |
| parents | 9549cc9e8ec6 |
| children | ae791fe4fbe9 |
comparison
equal
deleted
inserted
replaced
| 0:9549cc9e8ec6 | 1:0c312f3a4a17 |
|---|---|
| 58 } ## flgF | 58 } ## flgF |
| 59 | 59 |
| 60 | 60 |
| 61 ## log file | 61 ## log file |
| 62 ##--------- | 62 ##--------- |
| 63 | |
| 64 information <- as.character(argVc["information"]) | |
| 65 | |
| 66 #sink(information) | |
| 67 | 63 |
| 68 my_print <- function(x, ...) { cat(c(x, ...))} | 64 my_print <- function(x, ...) { cat(c(x, ...))} |
| 69 | 65 |
| 70 my_print("\nStart of the '", modNamC, "' Galaxy module call: ", | 66 my_print("\nStart of the '", modNamC, "' Galaxy module call: ", |
| 71 format(Sys.time(), "%a %d %b %Y %X"), "\n", sep="") | 67 format(Sys.time(), "%a %d %b %Y %X"), "\n", sep="") |