speed up write function

[arvados.git] / sdk / R / man / Collection.Rd

diff --git a/sdk/R/man/Collection.Rd b/sdk/R/man/Collection.Rd
index 5fbf1c1a118afb87396bcfb60f9fbc16cfce1016..bb72cc1b3fe75e192f81c9c091c1a4d6f7a259df 100644 (file)
--- a/sdk/R/man/Collection.Rd
+++ b/sdk/R/man/Collection.Rd
@@ -32,12 +32,13 @@ readFile <- collection$readArvFile(arvadosFile, Ncol = 5, Nrow = 150, istable =
 ## ------------------------------------------------\r
 \r
 collection <- Collection$new(arv, collectionUUID)\r
-writeFile <- collection$writeFile("myoutput.csv", file, istable = NULL)             # csv\r
-writeFile <- collection$writeFile("myoutput.fasta", file, istable = NULL)           # fasta\r
-writeFile <- collection$writeFile("myoutputtable.txt", file, istable = "yes")       # txt table\r
-writeFile <- collection$writeFile("myoutputtext.txt", file, istable = "no")         # txt text\r
-writeFile <- collection$writeFile("myoutputbinary.dat", file)                       # binary\r
-writeFile <- collection$writeFile("myoutputxlsx.xlsx", file)                        # xlsx\r
+writeFile <- collection$writeFile(name = "myoutput.csv", file = file, fileFormat = "csv", istable = NULL, collectionUUID = collectionUUID)             # csv\r
+writeFile <- collection$writeFile(name = "myoutput.tsv", file = file, fileFormat = "tsv", istable = NULL, collectionUUID = collectionUUID)             # tsv\r
+writeFile <- collection$writeFile(name = "myoutput.fasta", file = file, fileFormat = "fasta", istable = NULL, collectionUUID = collectionUUID)         # fasta\r
+writeFile <- collection$writeFile(name = "myoutputtable.txt", file = file, fileFormat = "txt", istable = "yes", collectionUUID = collectionUUID)       # txt table\r
+writeFile <- collection$writeFile(name = "myoutputtext.txt", file = file, fileFormat = "txt", istable = "no", collectionUUID = collectionUUID)         # txt text\r
+writeFile <- collection$writeFile(name = "myoutputbinary.dat", file = file, fileFormat = "dat", collectionUUID = collectionUUID)                       # binary\r
+writeFile <- collection$writeFile(name = "myoutputxlsx.xlsx", file = file, fileFormat = "xlsx", collectionUUID = collectionUUID)                       # xlsx\r
 \r
 ## ------------------------------------------------\r
 ## Method `Collection$create`\r
@@ -216,7 +217,14 @@ readFile <- collection$readArvFile(arvadosFile, Ncol = 5, Nrow = 150, istable =
 \subsection{Method \code{writeFile()}}{\r
 Write file content\r
 \subsection{Usage}{\r
-\if{html}{\out{<div class="r">}}\preformatted{Collection$writeFile(name, file, istable = NULL, seqName = NULL)}\if{html}{\out{</div>}}\r
+\if{html}{\out{<div class="r">}}\preformatted{Collection$writeFile(\r
+  name,\r
+  file,\r
+  collectionUUID,\r
+  fileFormat,\r
+  istable = NULL,\r
+  seqName = NULL\r
+)}\if{html}{\out{</div>}}\r
 }\r
 \r
 \subsection{Arguments}{\r
@@ -233,12 +241,13 @@ Write file content
 \subsection{Examples}{\r
 \if{html}{\out{<div class="r example copy">}}\r
 \preformatted{collection <- Collection$new(arv, collectionUUID)\r
-writeFile <- collection$writeFile("myoutput.csv", file, istable = NULL)             # csv\r
-writeFile <- collection$writeFile("myoutput.fasta", file, istable = NULL)           # fasta\r
-writeFile <- collection$writeFile("myoutputtable.txt", file, istable = "yes")       # txt table\r
-writeFile <- collection$writeFile("myoutputtext.txt", file, istable = "no")         # txt text\r
-writeFile <- collection$writeFile("myoutputbinary.dat", file)                       # binary\r
-writeFile <- collection$writeFile("myoutputxlsx.xlsx", file)                        # xlsx\r
+writeFile <- collection$writeFile(name = "myoutput.csv", file = file, fileFormat = "csv", istable = NULL, collectionUUID = collectionUUID)             # csv\r
+writeFile <- collection$writeFile(name = "myoutput.tsv", file = file, fileFormat = "tsv", istable = NULL, collectionUUID = collectionUUID)             # tsv\r
+writeFile <- collection$writeFile(name = "myoutput.fasta", file = file, fileFormat = "fasta", istable = NULL, collectionUUID = collectionUUID)         # fasta\r
+writeFile <- collection$writeFile(name = "myoutputtable.txt", file = file, fileFormat = "txt", istable = "yes", collectionUUID = collectionUUID)       # txt table\r
+writeFile <- collection$writeFile(name = "myoutputtext.txt", file = file, fileFormat = "txt", istable = "no", collectionUUID = collectionUUID)         # txt text\r
+writeFile <- collection$writeFile(name = "myoutputbinary.dat", file = file, fileFormat = "dat", collectionUUID = collectionUUID)                       # binary\r
+writeFile <- collection$writeFile(name = "myoutputxlsx.xlsx", file = file, fileFormat = "xlsx", collectionUUID = collectionUUID)                       # xlsx\r
 }\r
 \if{html}{\out{</div>}}\r
 \r