diff --git a/src/optional/R/Makefile b/src/optional/R/Makefile new file mode 100644 index 00000000..bba213db --- /dev/null +++ b/src/optional/R/Makefile @@ -0,0 +1,11 @@ +all: + cd gnuparallel && md5sum DESCRIPTION NAMESPACE R/gnuparallel.R man/gnuparallel-package.Rd > MD5 + R CMD check --as-cran gnuparallel + R CMD build gnuparallel + R CMD INSTALL --build gnuparallel_0.1.tar.gz + R CMD check gnuparallel +labeling: + R CMD build labeling + R CMD INSTALL --build labeling_0.2.tar.gz + R CMD check labeling + diff --git a/src/optional/R/gnuparallel/MD5 b/src/optional/R/gnuparallel/MD5 index 5473615e..ad39efa5 100644 --- a/src/optional/R/gnuparallel/MD5 +++ b/src/optional/R/gnuparallel/MD5 @@ -1,4 +1,4 @@ c521738aeecfa8e237500f4a3263143e DESCRIPTION d008be14407ccaa1070b98ed7d91c123 NAMESPACE -57ae71c1e7b6c2ad3069230cccb19f59 R/gnuparallel.R -b0f1fb891f37499b06b41754b394f1ae man/gnuparallel-package.Rd +beb1ce7a813ec211acd651e66a397a7b R/gnuparallel.R +a6f75c33282b61a2efe54c70e8a52c39 man/gnuparallel-package.Rd diff --git a/src/optional/R/gnuparallel/R/gnuparallel.R b/src/optional/R/gnuparallel/R/gnuparallel.R index b26ea3f3..f68ed168 100644 --- a/src/optional/R/gnuparallel/R/gnuparallel.R +++ b/src/optional/R/gnuparallel/R/gnuparallel.R @@ -43,7 +43,7 @@ #' \code{\link{gnu.parallel.load.lines}} #' @examples #' library(gnuparallel) -#' system("parallel --header : --results foobar printf out{1}\\\\\\\\tout{2}\\\\\\\\nline2{1}\\\\\\\\t{2}\\\\\\\\n ::: letters a b c ::: numbers 4 5 6") +#' system("parallel --results foobar printf out{1}\\\\\\\\tout{2}\\\\\\\\nline2{1}\\\\\\\\t{2}\\\\\\\\n ::: a b c ::: 4 5 6") #' fn <- gnu.parallel.filenames("foobar") #' gnu.parallel.load(fn) #' gnu.parallel.load.lines(fn) @@ -54,7 +54,7 @@ c() #' Find the filenames in a results dir #' -#' @param resdir results dir from GNU Parallel's --results +#' @param resdir results dir from GNU Parallel's -{}-results #' @return filenametable with a column for each of GNU Parallel's input sources and a column for file name of both stdout and stderr #' @export gnu.parallel.filenames <- function(resdir) { diff --git a/src/optional/R/gnuparallel/man/gnu.parallel.filenames.Rd b/src/optional/R/gnuparallel/man/gnu.parallel.filenames.Rd index 27f7a40e..751cafd6 100644 --- a/src/optional/R/gnuparallel/man/gnu.parallel.filenames.Rd +++ b/src/optional/R/gnuparallel/man/gnu.parallel.filenames.Rd @@ -5,7 +5,7 @@ gnu.parallel.filenames(resdir) } \arguments{ - \item{resdir}{results dir from GNU Parallel's --results} + \item{resdir}{results dir from GNU Parallel's ---results} } \value{ filenametable with a column for each of GNU Parallel's input sources diff --git a/src/optional/R/gnuparallel/man/gnuparallel-package.Rd b/src/optional/R/gnuparallel/man/gnuparallel-package.Rd index 398119ca..c482d989 100644 --- a/src/optional/R/gnuparallel/man/gnuparallel-package.Rd +++ b/src/optional/R/gnuparallel/man/gnuparallel-package.Rd @@ -4,7 +4,7 @@ \alias{gnuparallel-package} \title{GNU Parallel} \description{ - Loading of GNU Parallel --results output + Loading of GNU Parallel -{}-results output } \details{ \tabular{ll}{ Package: \tab gnuparallel\cr Type: \tab @@ -15,7 +15,9 @@ } \examples{ library(gnuparallel) -system("parallel --header : --results foobar printf out{1}\\\\\\\\tout{2}\\\\\\\\nline2{1}\\\\\\\\t{2}\\\\\\\\n ::: letters a b c ::: numbers 4 5 6") +system(paste("parallel --header : --results foobar", + "printf out{let}\\\\\\\\\\\\\\\\tout{num}\\\\\\\\\\\\\\\\nline2{let}\\\\\\\\\\\\\\\\t{num}\\\\\\\\\\\\\\\\n", + "::: let a b c ::: num 4 5 6")) fn <- gnu.parallel.filenames("foobar") gnu.parallel.load(fn) gnu.parallel.load.lines(fn) diff --git a/src/optional/R/load-parallel-results.r b/src/optional/R/load-parallel-results.r index 2cd7e8a1..15f70586 100644 --- a/src/optional/R/load-parallel-results.r +++ b/src/optional/R/load-parallel-results.r @@ -20,7 +20,9 @@ ## LIBRARY FOR READING GNU PARALLEL RESULTS ## ## Example: -## parallel --results my/results/dir --header : 'printf "FOO={foo}\\tBAR={bar}\\n";paste <(seq {bar}) <(seq {bar} -1 1)' :::: <(echo foo; seq 100) <(echo bar; seq 10) +## parallel --results my/results/dir --header : \ +## 'printf "FOO={foo}\\tBAR={bar}\\n";paste <(seq {bar}) <(seq {bar} -1 1)' \ +## :::: <(echo foo; seq 100) <(echo bar; seq 10) ## ## dir="my/results/dir" ## filenametable <- load_parallel_results_filenames(dir);