systemPipeR
is a versatile workflow environment for data analysis that integrates R
with command-line (CL) software (H Backman and
Girke 2016). This platform allows scientists to analyze diverse
data types on personal or distributed computer systems. It ensures a
high level of reproducibility, scalability, and portability (Figure
@ref(fig:utilities)). Central to systemPipeR is a CL
interface (CLI) that adopts the Common Workflow Language (CWL, Crusoe et al. 2021). Using this CLI, users
can select the optimal R or CL software for each analysis step. The
platform supports end-to-end and partial execution of workflows, with
built-in restart capabilities. A workflow control container class
manages analysis tasks of varying complexity. Standardized processing
routines for metadata facilitate the handling of large numbers of input
samples and complex experimental designs. As a multipurpose workflow
management toolkit, systemPipeR enables users to run
existing workflows, customize them, or create entirely new ones while
leveraging widely adopted data structures within the Bioconductor
ecosystem. Another key aspect of systemPipeR is its ability
to generate reproducible scientific analysis and technical reports. For
result interpretation, it offers a range of graphics functionalities.
Additionally, an associated Shiny App provides various interactive
features for result exploration, and enhancing the user experience.
Important functionalities of systemPipeR. (A) Illustration of workflow design concepts, and (B) examples of visualization functionalities for NGS data.
The overall design of the systemPipeR workflow
management framework is illustrated in Figure
@ref(fig:sysargslistImage). A workflow project is initialized by
creating a standardized directory structure containing input data,
metadata (targets file), parameter files, and an R Markdown
(Rmd) document that defines the workflow and generates the final
analysis report. During workflow setup, these components are imported
into the central workflow control object, the SYSargsList
(SAL) S4 class, which manages step dependencies,
command-line arguments, and execution order. The workflow is then
executed stepwise with runWF, where input/output
relationships are resolved automatically and execution status is tracked
to enable monitoring and restart of interrupted runs. Upon completion,
systemPipeR generates scientific and technical reports from the Rmd
source as well as interactive workflow topology graphs summarizing
execution statistics. The core workflow run is typically performed with
four primary commands: genWorkenvir/SPRproject,
importWF, runWF, and
renderReport/renderLogs.
systemPipeR workflow design overview. Illustration of project initialization, workflow control class, execution, and reporting.
systemPipeR adopts the Common Workflow Language
(CWL), which is a widely used community standard for describing CL
tools and workflows in a declarative, generic, and reproducible manner
(Amstutz et al. 2016). CWL specifications
are human-readable YAML
files that are straightforward to create and to modify. Integrating CWL
in systemPipeR enhances the sharability, standardization,
extensibility and portability of data analysis workflows.
Following the CWL Specifications, the basic description for executing
a CL software are defined by two files: a cwl step definition file and a
yml configuration file. Figure @ref(fig:sprandCWL) illustrates the
utilitity of the two files using “Hello World” as an example. The cwl
file (A) defines the parameters of CL tool or workflow (C), and the yml
file (B) assigns the input variables to the corresponding parameters.
For convenience, in systemPipeR parameter values can be
provided by a targets file (D, see above), and automatically passed on
to the corresponding parameters in the yml file. The usage of a targets
file greatly simplifies the operation of the system for users, because a
tabular metadata file is intuitive to maintain, and it eliminates the
need of modifying the more complex cwl and yml files directly. The
structure of targets files is explained in the
corresponding section below. A detailed
overview of the CWL syntax is provided in the CWL
syntax section below, and the details for connecting the input
information in targets with CWL parameters are described here.
Parameter files. Illustration how the different fields in cwl, yml and targets files are connected to assemble command-line calls, here for ‘Hello World’ example.
systemPipeRdata, a companion package to
systemPipeR, offers a collection of workflow templates that
are ready to use. With a single command, users can easily load these
templates onto their systems. Once loaded, users have the flexibility to
utilize the templates as they are or modify them as needed. Similar and
additional workflow templates are also available from GitHub (see here),
which can be retrieved directly from their repositories. More detailed
information about the template collection and its usage is provided in
the main vignette of systemPipeRdata, available here,
as well as the project site here.
The package also provides several convenience functions that are
useful for designing and testing workflows, such as a CL rendering function that assembles from the
parameter files (cwl, yml and targets) the exact CL strings for each
step prior to running a CL tool. Auto-generation of CWL parameter files
is also supported. Here, users can simply provide the CL strings for a
CL software of interest to a rendering function that generates the
corresponding *.cwl and *.yml files for them.
Auto-conversion of workflows to executable Bash
scripts is also supported.
The systemPipeR
package can be installed from the R console using the BiocManager::install
command. The associated systemPipeRdata
package can be installed the same way. The latter is a data package for
generating systemPipeR workflow test instances
with a single command. These instances contain all parameter files and
sample data required to quickly test and run workflows.
if (!requireNamespace("BiocManager", quietly=TRUE)) install.packages("BiocManager")
BiocManager::install("systemPipeR")
BiocManager::install("systemPipeRdata")For a workflow to run successfully, all CL tools used by a workflow need to be installed and executable on a user’s system, where the analysis will be performed (details provided below).
The following demonstrates how to initialize, run and monitor workflows, and subsequently create analysis reports.
1. Create workflow environment. The chosen example
uses the genWorkenvir function from the
systemPipeRdata package to create an RNA-Seq workflow
environment that is fully populated with a small test dataset, including
FASTQ files, reference genome, and annotation files. After
initialization, the user’s R session should be directed to the resulting
rnaseq directory (here with setwd). A list of
available workflow templates can be found in the vignette of the
systemPipeRdata package (see here).
In addition to the templates distributed through
systemPipeRdata, workflow templates can also be retrieved
directly from GitHub repositories using the genWorkenvir_gh
function. Details on available repositories and usage instructions are
provided on the project website and within the corresponding GitHub
repositories (see here).
2. Initialize project and import workflow from
Rmd template. New workflow instances are created
with the SPRproject function. When calling this function, a
project directory with the default name .SPRproject is
created within the workflow directory. Progress information and log
files of a workflow run will be stored in this directory. After this,
workflow steps can be loaded into sal one-by-one, or all at
once with the importWF function. The latter reads all steps
from a workflow Rmd file (here systemPipeRNAseq.Rmd)
defining the analysis steps.
library(systemPipeR)
# Initialize workflow project
sal <- SPRproject()
## Creating directory '/home/myuser/systemPipeR/rnaseq/.SPRproject'
## Creating file '/home/myuser/systemPipeR/rnaseq/.SPRproject/SYSargsList.yml'
sal <- importWF(sal, file_path = "systemPipeRNAseq.Rmd") # import into sal the WF steps defined by chosen Rmd file
## The following print statements, issued during the import, are shortened for brevity
## Import messages for first 3 of 20 steps total
## Parse chunk code
## Now importing step 'load_SPR'
## Now importing step 'preprocessing'
## Now importing step 'trimming'
## Now importing step '...'
## ...
## Now check if required CL tools are installed
## Messages for 4 of 7 CL tools total
## step_name tool in_path
## 1 trimming trimmomatic TRUE
## 2 hisat2_index hisat2-build TRUE
## 3 hisat2_mapping hisat2 TRUE
## 4 hisat2_mapping samtools TRUE
## ...The importWF function also checks the availability of
the R packages and CL software tools used by a workflow. All dependency
CL software needs to be installed and exported to a user’s
PATH. In the given example, the CL tools
trimmomatic, hisat2-build,
hisat2, and samtools are listed. If the
in_path column shows FALSE for any of them,
then the missing CL software needs to be installed and made available in
a user’s PATH prior to running the workflow. Note, the
shown availability table of CL tools can also be returned with
listCmdTools(sal, check_path=TRUE), and the availability of
individual CL tools can be checked with tryCL,
e.g. for hisat2 use:
tryCL(command = "hisat2").
3. Status summary. An overview of the workflow steps
and their status information can be returned by typing sal.
For space reasons, the following shows only the first 3 of a total of 20
steps of the RNA-Seq workflow. At this stage all workflow steps are
listed as pending since none of them have been executed yet.
sal
## Instance of 'SYSargsList':
## WF Steps:
## 1. load_SPR --> Status: Pending
## 2. preprocessing --> Status: Pending
## Total Files: 36 | Existing: 0 | Missing: 36
## 2.1. preprocessReads-pe
## cmdlist: 18 | Pending: 18
## 3. trimming --> Status: Pending
## Total Files: 72 | Existing: 0 | Missing: 72
## 4. - 20. not shown here for brevity4. Run workflow. Next, one can execute the entire
workflow from start to finish. The steps argument of
runWF can be used to run only selected steps. For details,
consult the help file with ?runWF. During the run, detailed
status information will be provided for each workflow step.
After completing all or only some steps, the status of workflow steps
can always be checked with the summary print function. If a workflow
step was completed, its status will change from Pending to
Success or Failed.
Status check of workflow. The run status flags of each workflow step are given in its summary view.
5. Workflow topology graph. Workflows can be
displayed as topology graphs using the plotWF function. The
run status information for each step and various other details are
embedded in these graphs. Additional details are provided in the visualize workflow section below.
Toplogy graph of RNA-Seq workflow.
6. Report generation. The renderReport
and renderLogs function can be used for generating
scientific and technical reports, respectively. Alternatively,
scientific reports can be generated with the render
function of the rmarkdown package.
The root directory of systemPipeR workflows contains by
default three user facing sub-directories: data,
results and param. A fourth sub-directory is a
hidden log directory with the default name .SPRproject that
is created when initializing a workflow run with the
SPRproject function (see above). Users can change the
recommended directory structure, but will need to adjust in some cases
the code in their workflows. Just adding directories to the default
structure is possible without requiring changes to the workflows. The
following directory tree summarizes the expected content in each default
directory (names given in green).
.batchtools.conf.R and tmpl files for
batchtools and BiocParallel.cwl
and yml files. Previous versions of parameter files are
stored in a separate sub-directory.SPRproject function at
the beginning of a workflow run. It is a hidden directory because its
name starts with a dot.targets fileA targets file defines the input files (e.g.
FASTQ, BAM, BCF) and sample comparisons used in a data analysis
workflow. It can also store any number of additional descriptive
information for each sample. How the input information is passed on from
a targets file to the CWL parameter files is introduced above, and additional details are given below. The following shows the format of two
targets file examples included in the package.
They can also be viewed and downloaded from
systemPipeR’s GitHub repository here.
As an alternative to using targets files, YAML files can be
used instead. Since organizing experimental variables in tabular files
is straightforward, the following sections of this vignette focus on the
usage of targets files. Their usage also integrates well with the widely
used SummarizedExperiment object class.
Descendant targets files can be extracted for each step with input/output operations where the output of the previous step(s) serves as input to the current step, and the output of the current step becomes the input of the next step. This connectivity among input/output operations is automatically tracked throughout workflows. This way it is straightforward to start workflows at different processing stages. For instance, one can intialize an RNA-Seq workflow at the stage of raw sequence files (FASTQ), alignment files (BAM) or a precomputed read count table.
In a targets file with a single type of input files,
here FASTQ files of single-end (SE) reads, the first three columns are
mandatory including their column names, while it is four mandatory
columns for FASTQ files of PE reads. All subsequent columns are optional
and any number of additional columns can be added as needed. The columns
in targets files are expected to be tab separated (TSV
format). The SampleName column contains usually short
labels for referencing samples (here FASTQ files) across many workflow
steps (e.g. plots and column titles). Importantly, the labels
used in the SampleName column need to be unique, while
technical or biological replicates are indicated by the same values
under the Factor column. For readability and transparency,
it is useful to use here a short, consistent and informative syntax for
naming samples and replicates. This is important since the values
provided under the SampleName and Factor
columns are intended to be used as labels for naming the columns or
plotting features in downstream analysis steps.
targetspath <- system.file("extdata", "targets.txt", package = "systemPipeR")
showDF(read.delim(targetspath, comment.char = "#"))## Loading required namespace: DT
To work with custom data, users need to generate a
targets file containing the paths to their own FASTQ files
and then provide under targetspath the path to the
corresponding targets file.
For paired-end (PE) samples, the structure of the targets file is
similar. The main difference is that targets files for PE
data have two FASTQ path columns (here FileName1 and
FileName2) each containing the paths to the corresponding
PE FASTQ files.
If needed, sample comparisons of comparative experiments, such as
differentially expressed genes (DEGs), can be specified in the header
lines of a targets file that start with a
# <CMP> tag. Their usage is optional, but useful for
controlling comparative analyses according to certain biological
expectations, such as identifying DEGs in RNA-Seq experiments based on
simple pair-wise comparisons.
## [1] "# Project ID: Arabidopsis - Pseudomonas alternative splicing study (SRA: SRP010938; PMID: 24098335)"
## [2] "# The following line(s) allow to specify the contrasts needed for comparative analyses, such as DEG identification. All possible comparisons can be specified with 'CMPset: ALL'."
## [3] "# <CMP> CMPset1: M1-A1, M1-V1, A1-V1, M6-A6, M6-V6, A6-V6, M12-A12, M12-V12, A12-V12"
## [4] "# <CMP> CMPset2: ALL"
The function readComp imports the comparison information
and stores it in a list. Alternatively,
readComp can obtain the comparison information from a
SYSargsList instance containing the targets
file information (see below).
## $CMPset1
## [1] "M1-A1" "M1-V1" "A1-V1" "M6-A6" "M6-V6" "A6-V6" "M12-A12" "M12-V12" "A12-V12"
##
## $CMPset2
## [1] "M1-A1" "M1-V1" "M1-M6" "M1-A6" "M1-V6" "M1-M12" "M1-A12" "M1-V12" "A1-V1"
## [10] "A1-M6" "A1-A6" "A1-V6" "A1-M12" "A1-A12" "A1-V12" "V1-M6" "V1-A6" "V1-V6"
## [19] "V1-M12" "V1-A12" "V1-V12" "M6-A6" "M6-V6" "M6-M12" "M6-A12" "M6-V12" "A6-V6"
## [28] "A6-M12" "A6-A12" "A6-V12" "V6-M12" "V6-A12" "V6-V12" "M12-A12" "M12-V12" "A12-V12"
A systemPipeR workflow instance is initialized with the
SPRproject function. This function call creates an empty
SAL container instance and at the same time a linked
project log directory that acts as a flat-file database of a workflow. A
YAML file is automatically included in the project directory that
specifies the basic location of the workflow project. Every time the
SAL container is updated in R with a new workflow step or a
modification to an existing step, the changes are automatically recorded
in the flat-file database. This is important for tracking the run status
of workflows and providing restart functionality for workflows.
If overwrite is set to TRUE, a new project
log directory will be created and any existing one deleted. This option
should be used with caution. It is mainly useful when developing and
testing workflows, but should be avoided in production runs of
workflows.
## Creating directory: /tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/data
## Creating directory: /tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/param
## Creating directory '/tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/.SPRproject'
## Creating file '/tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/.SPRproject/SYSargsList.yml'
The function checks whether the expected workflow directories (see here) exist, and will create them if any of them is missing. If needed users can change the default names of these directories as shown.
Similarly, the default names of the log directory and
YAML file can be changed.
It is also possible to use for all workflow steps a dedicated R environment that is separate from the current environment. This way R objects generated by workflow steps will not overwrite objects with the same names in the current environment.
At this stage, sal is an empty SAL
(SYSargsList) container that only contains the basic
information about the project’s directory structure that can be accessed
with projectInfo.
## Instance of 'SYSargsList':
## No workflow steps added
## $project
## [1] "/tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes"
##
## $data
## [1] "data"
##
## $param
## [1] "param"
##
## $results
## [1] "results"
##
## $logsDir
## [1] ".SPRproject"
##
## $sysargslist
## [1] ".SPRproject/SYSargsList.yml"
The number of workflow steps stored in a SAL object can
be returned with the length function. At this stage it
returns zero since no workflow steps have been loaded into
sal yet.
## [1] 0
In systemPipeR, workflows can be incrementally constructed in interactive mode by sequentially evaluating code
for individual workflow steps in the R console. Alternatively, all steps
of a workflow can be imported simultaneously from an R script or an R
Markdown workflow file using a single import
command. To explain constructing and connecting different types of
workflow steps, this tutorial section introduces the interactive
approach first. After that, the automated import of entire workflows
with many steps is explained, where the individual steps are defined the
same way. In all cases, workflow steps are loaded into a
SAL workflow container with the proper connectivity
information using systemPipeR's appendStep
method. This method allows steps to be comprised of R code or CL
calls.
The following demonstrates how to design, load and run workflows using a simple data processing routine as an example. This mini workflow will export a test dataset to multiple files, compress/decompress the exported files, import them back into R, and then perform a simple statistical analysis and plot the results. The file compression steps demonstrate the usage of the CL interface.
The sal object of the new workflow project (directory
named.SPRproject) was intialized in the previous section.
At this point this sal instance contains no data analysis
steps since none have been loaded so far.
## Instance of 'SYSargsList':
## No workflow steps added
Next, workflow steps will be added to sal.
The first step in the chosen example workflow comprises R code that
will be stored in a LineWise object. It is constructed with
the LineWise function, and then appended to
sal with the appendStep<- method. The R
code of an analysis step is assigned to the code argument
of the LineWise function. In this assignment the R code has
to be enclosed by braces ({...}) and separted from them by
new lines. Additionally, the workflow step should be given a descriptive
name under the step_name argument. Step names are required
to be unique throughout workflows. During the construction of workflow
steps, the included R code will not be executed. The execution of
workflow steps is explained in a separate section below.
In the given code example, the iris dataset is split by
the species names under the Species column, and then the
resulting data.frames are exported to three tabular
files.
appendStep(sal) <- LineWise(code = {
mapply(function(x, y) write.csv(x, y),
split(iris, factor(iris$Species)),
file.path("results", paste0(names(split(iris, factor(iris$Species))), ".csv"))
)
},
step_name = "export_iris")After adding the R code, sal contains now one workflow
step.
## Instance of 'SYSargsList':
## WF Steps:
## 1. export_iris --> Status: Pending
##
To extract the code of an R step stored in a SAL object,
the codeLine method can be used.
## export_iris
## mapply(function(x, y) write.csv(x, y), split(iris, factor(iris$Species)), file.path("results", paste0(names(split(iris, factor(iris$Species))), ".csv")))
CL steps are stored as SYSargs2 objects that are
constructed with the SYSargsList function, and then
appended to sal with the appendStep<-
method. As outlined in the introduction (see here), CL steps are defined by two CWL
parameter files (yml configuration and cwl
step definition files) and an optional targets file. How
parameter values in the targets file are passed on to the
corresponding entries in the yml file, is defined by a
named vector that is assigned to the inputvars
argument of the SYSargsList function. A parameter
connection is established if a name assigned to inputvars
has matching column and element names in the targets and
yml files, respectively (Fig @ref(fig:sprandCWL)). More
details about parameter passing and CWL syntax are provied below (see here and here).
The most important other arguments of the SYSargsList
function are listed below. For more information, users want to consult
the function’s help with ?SYSargsList.
step_name: a unique name for the step. If no
name is provided, a default step_x name will be assigned,
where x is the step index.dir: if TRUE (default) all output files
generated by a workflow step will be written to a subdirectory with the
same name as step_name. This is useful for organizing
result files.dependency: assign here the name of the step the
current step depends on. This is mandatory for all steps in a workflow,
except the first one. The dependency tree of a workflow is based on the
dependency connections among steps.In the specific example code given below, a CL step is added to the
workflow where the gzip software
is used to compress the files that were generated in the previous
step.
targetspath <- system.file("extdata/cwl/gunzip", "targets_gunzip.txt", package = "systemPipeR")
appendStep(sal) <- SYSargsList(step_name = "gzip",
targets = targetspath, dir = TRUE,
wf_file = "gunzip/workflow_gzip.cwl", input_file = "gunzip/gzip.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = c(FileName = "_FILE_PATH_", SampleName = "_SampleName_"),
dependency = "export_iris")After adding the above CL step, sal contains now two
steps.
## Instance of 'SYSargsList':
## WF Steps:
## 1. export_iris --> Status: Pending
## 2. gzip --> Status: Pending
## Total Files: 3 | Existing: 0 | Missing: 3
## 2.1. gzip
## cmdlist: 3 | Pending: 3
##
The individual CL calls, that will be executed by the
gzip step, can be rendered and viewed with the
cmdlist function. Under the targets argument
one can subset the CL calls to specific samples by assigning the
corresponding names or index numbers.
## $gzip
## $gzip$SE
## $gzip$SE$gzip
## [1] "gzip -c results/setosa.csv > results/SE.csv.gz"
##
##
## $gzip$VE
## $gzip$VE$gzip
## [1] "gzip -c results/versicolor.csv > results/VE.csv.gz"
##
##
## $gzip$VI
## $gzip$VI$gzip
## [1] "gzip -c results/virginica.csv > results/VI.csv.gz"
In many use cases the output files, generated by an upstream workflow
step, serve as input to a downstream step. To establish these
input/output connections, the names (paths) of the output files
generated by each step needs to be accessible. This information can be
extracted from SAL objects with the outfiles
accessor method as shown below.
# outfiles(sal) # output files of all steps in sal
outfiles(sal)['gzip'] # output files of 'gzip' step## $gzip
## DataFrame with 3 rows and 1 column
## gzip_file
## <character>
## SE results/SE.csv.gz
## VE results/VE.csv.gz
## VI results/VI.csv.gz
Note, the names of this and other important accessor methods for
‘SAL’ objects can be looked up conveniently with names(sal)
(for more details see here).
In the chosen workflow example, the output files (here compressed
gz files), that were generated by the previous
gzip step, will be uncompressed in the current step with
the gunzip software. The corresponding input files for the
gunzip step are listed under the gzip_file
column above. For defining the gunzip step, the values
‘gzip’ and ‘gzip_file’ will be used under the targets and
inputvars arguments of the SYSargsList
function, respectively. The argument rm_targets_col allows
to drop columns in the targets instance of the new step.
The remaining parameters settings are similar to those in the previous
step.
appendStep(sal) <- SYSargsList(step_name = "gunzip",
targets = "gzip", dir = TRUE,
wf_file = "gunzip/workflow_gunzip.cwl", input_file = "gunzip/gunzip.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = c(gzip_file = "_FILE_PATH_", SampleName = "_SampleName_"),
rm_targets_col = "FileName",
dependency = "gzip")After adding the above new step, sal contains now a
third step.
## Instance of 'SYSargsList':
## WF Steps:
## 1. export_iris --> Status: Pending
## 2. gzip --> Status: Pending
## Total Files: 3 | Existing: 0 | Missing: 3
## 2.1. gzip
## cmdlist: 3 | Pending: 3
## 3. gunzip --> Status: Pending
## Total Files: 3 | Existing: 0 | Missing: 3
## 3.1. gunzip
## cmdlist: 3 | Pending: 3
##
The targets instance of the new step can be returned
with the targetsWF method where the output files from the
previous step are listed under the first column (input).
## $gunzip
## DataFrame with 3 rows and 2 columns
## gzip_file SampleName
## <character> <character>
## SE results/SE.csv.gz SE
## VE results/VE.csv.gz VE
## VI results/VI.csv.gz VI
As before, the output files of the new step can be returned with
outfiles.
## $gunzip
## DataFrame with 3 rows and 1 column
## gunzip_file
## <character>
## SE results/SE.csv
## VE results/VE.csv
## VI results/VI.csv
Finally, the corresponding CL calls of the new step can be returned
with the cmdlist function (here for first entry).
## $gunzip
## $gunzip$SE
## $gunzip$SE$gunzip
## [1] "gunzip -c results/SE.csv.gz > results/SE.csv"
The final step in this sample workflow is an R step that uses the
files from a previous step as input. In this case the
getColumn method is used to obtain the paths to the files
generated in a previous step, which is in the given example the ‘gunzip’
step..
## SE VE VI
## "results/SE.csv" "results/VE.csv" "results/VI.csv"
In this R step, the tabular files generated in the previous
gunzip CL step are imported into R and row appended to a
single data.frame. Next the column-wise mean values are
calculated for the first four columns. Subsequently, the results are
plotted as a bar diagram with error bars.
appendStep(sal) <- LineWise(code = {
df <- lapply(getColumn(sal, step = "gunzip", 'outfiles'), function(x) read.delim(x, sep = ",")[-1])
df <- do.call(rbind, df)
stats <- data.frame(cbind(mean = apply(df[,1:4], 2, mean), sd = apply(df[,1:4], 2, sd)))
stats$size <- rownames(stats)
plot <- ggplot2::ggplot(stats, ggplot2::aes(x = size, y = mean, fill = size)) +
ggplot2::geom_bar(stat = "identity", color = "black", position = ggplot2::position_dodge()) +
ggplot2::geom_errorbar(ggplot2::aes(ymin = mean-sd, ymax = mean+sd), width = .2, position = ggplot2::position_dodge(.9))
},
step_name = "iris_stats",
dependency = "gzip")This is the final step of this demonstration resulting in a
sal workflow container with a total of four steps.
## Instance of 'SYSargsList':
## WF Steps:
## 1. export_iris --> Status: Pending
## 2. gzip --> Status: Pending
## Total Files: 3 | Existing: 0 | Missing: 3
## 2.1. gzip
## cmdlist: 3 | Pending: 3
## 3. gunzip --> Status: Pending
## Total Files: 3 | Existing: 0 | Missing: 3
## 3.1. gunzip
## cmdlist: 3 | Pending: 3
## 4. iris_stats --> Status: Pending
##
The above process of loading workflow steps one-by-one into a
SAL workflow container can be easily automated by storing
the step definitions in an R or Rmd script, and then importing them from
there into an R session.
1. Loading workflows from an R script. For importing
workflow steps from an R script, the code of the workflow steps needs to
be stored in an R script from where it can be imported with R’s
source command. Applied to the above workflow example (see
here), this means nothing else than saving the
code of the four workflow steps to an R script where each step is
declared with the standard CL or R step syntax:
appendStep(sal) <- SYSargsList/LineWise(...). At the
beginning of the R script one has to load the systemPipeR
library, and initialize a new workflow project and associated
SAL container with SPRproject(). After
sourcing the R script from R, the fully populated SAL
container will be loaded into that session, and the workflow is ready to
be executed (see below).
2. Loading workflows from an R Markdown file. As an
alternative to plain R scripts, R Markdown (Rmd) scripts provide a more
adaptable solution for defining workflows. An Rmd file can be converted
into various publication-ready formats, such as HTML or PDF. These
formats can incorporate not only the analysis code but also the results
the code generates, including tables and figures. This approach enables
the creation of reproducible analysis reports for workflows. This
reporting feature is crucial for reproducibility, documentation, and
visual interpretation of the analysis results. The following illustrates
this approach for the same four workflow steps used in the previous
section here, that is included in an Rmd file
of the systemPipeR package. Note, the path to this Rmd file
is retrieved with R’s system.file function.
Prior to importing the workflow from an Rmd file, it is required to
initialize for it a new workflow project with the
SPRproject function. Next, the importWF
function is used to scan the Rmd file for code chunks that define
workflow steps, and subsequently import them in to the SAL
workflow container of the project.
## Creating directory '/tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/.SPRproject_rmd'
## Creating file '/tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/.SPRproject_rmd/SYSargsList.yml'
sal_rmd <- importWF(sal_rmd,
file_path = system.file("extdata", "spr_simple_wf.Rmd", package = "systemPipeR"))## Reading Rmd file
##
## ---- Actions ----
## Checking chunk eval values
## Checking chunk SPR option
## Ignore non-SPR chunks: 17
## Parse chunk code
## Checking preprocess code for each step
## No preprocessing code for SPR steps found
## Now importing step 'load_library'
## Now importing step 'export_iris'
## Now importing step 'gzip'
## Now importing step 'gunzip'
## Now importing step 'stats'
## Now back up current Rmd file as template for `renderReport`
## Template for renderReport is stored at
## /tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/.SPRproject_rmd/workflow_template.Rmd
## Edit this file manually is not recommended
## Now check if required tools are installed
## Check if they are in path:
## Checking path for gzip
## PASS
## Checking path for gunzip
## PASS
## step_name tool in_path
## 1 gzip gzip TRUE
## 2 gunzip gunzip TRUE
## All required tools in PATH, skip module check. If you want to check modules use `listCmdModules`Import done
After the import, the new sal_rmd workflow container,
that is fully populated with all four workflow steps from before, can be inspected with several accessor
functions (not evaluated here). Additional details about accessor
functions are provided here.
sal_rmd
stepsWF(sal_rmd)
dependency(sal_rmd)
cmdlist(sal_rmd)
codeLine(sal_rmd)
targetsWF(sal_rmd)
statusWF(sal_rmd)In standard R Markdown (Rmd) files, code chunks are enclosed by new
lines starting with three backticks. The backtick line at the start of a
code chunk is followed by braces that can contain arguments controlling
the code chunk’s behavior. To formally declare a workflow step in an R
Markdown file’s argument line, systemPipeR introduces a
special argument named spr. When using
importWF to scan an R Markdown file, only code chunks with
spr=TRUE in their argument line will be recognized as
workflow steps and loaded into the provided SAL workflow
container. This design allows for the inclusion of standard code chunks
not part of a workflow and renders them as usual. Here are two examples
of argument settings that will both result in the inclusion of the
corresponding code chunk as a workflow step since spr is
set to TRUE in both cases. Notably, in one case, the
standard R Markdown argument eval is assigned
FALSE, preventing the rmarkdown::render
function from evaluating the corresponding code chunk.
Examples: workflow code chunks are declared by spr flag
in their argument line:
In addition to including spr = TRUE, the actual code of
workflow steps has additional requirements. First, the last assignment
in a code chunk of a workflow step needs to be an
appendStep of SAL using
SYSargsList or LineWise for CL or R code,
respectively. This requirement is met if there are no other assignments
outside of appnedStep. Second, R workflow steps need to be
largely self contained by generating and/or loading the dependencies
required to execute the code. Third, in most cases the name of a
SAL container should remain the same throughout a workflow.
This avoids errors such as: ‘Error:
Example of last assignment in a CL step.
targetspath <- system.file("extdata/cwl/example/targets_example.txt", package = "systemPipeR")
appendStep(sal) <- SYSargsList(step_name = "Example",
targets = targetspath,
wf_file = "example/example.cwl", input_file = "example/example.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = c(Message = "_STRING_", SampleName = "_SAMPLE_"))Example of last assignment in an R step.
In systemPipeR, the runWF function serves
as the primary tool for executing workflows. It is responsible for
running the code specified in the steps of a populated SAL
workflow container. The following runWF command will run
the test workflow from above from start to finish. This test workflow
was first assembled step-by-step, allowing for a thorough examination of
its behavior. Subsequently, the same workflow was imported from an Rmd
file to demonstrate how to auto-load all steps of a workflow at once
into a SAL container. Please refer to the provided link here for more information about this process.
## Running Step: export_iris
## Running Session: Management
## | | | 0% | |==========================================================================================| 100%
## Step Status: Success
## Running Step: gzip
## Running Session: Management
## | | | 0% | |============================== | 33% | |============================================================ | 67% | |==========================================================================================| 100%
## ---- Summary ----
## Targets Total_Files Existing_Files Missing_Files gzip
## SE SE 1 1 0 Success
## VE VE 1 1 0 Success
## VI VI 1 1 0 Success
##
## Step Status: Success
## Running Step: gunzip
## Running Session: Management
## | | | 0% | |============================== | 33% | |============================================================ | 67% | |==========================================================================================| 100%
## ---- Summary ----
## Targets Total_Files Existing_Files Missing_Files gunzip
## SE SE 1 1 0 Success
## VE VE 1 1 0 Success
## VI VI 1 1 0 Success
##
## Step Status: Success
## Running Step: iris_stats
## Running Session: Management
## | | | 0%
## | |==========================================================================================| 100%
## Step Status: Success
## Done with workflow running, now consider rendering logs & reports
## To render logs, run: sal <- renderLogs(sal)
## From command-line: Rscript -e "sal = systemPipeR::SPRproject(resume = TRUE); sal = systemPipeR::renderLogs(sal)"
## To render reports, run: sal <- renderReport(sal)
## From command-line: Rscript -e "sal= s ystemPipeR::SPRproject(resume = TRUE); sal = systemPipeR::renderReport(sal)"
## This message is displayed once per R session
The runWF function allows to choose one or multiple
steps to be executed via its steps argument. When using
partial workflow executions, it is important to pay attention to the
requirements of the dependency graph of a workflow. If a selected step
depends on one or more previous steps, that have not been executed yet,
then the execution of the chosen step(s) will not be possible until the
previous steps have been completed.
Importantly, by default, already completed workflow steps with a
status of ‘Success’ (for example, all output files exist)
will not be repeated unnecessarily unless one explicitly sets the force
parameter to TRUE. Skipping such steps can save time, particularly when
optimizing workflows or adding new samples to previously completed runs.
Additionally, one may find it useful in certain situations to ignore
warnings or errors without terminating workflow runs. This behavior can
be enabled by setting warning.stop=TRUE and/or
error.stop=TRUE.
When starting a new workflow project with the SPRproject
function, a new R environment will be initialized that stores the
objects generated by the workflow steps. The content of this R
environment can be inspected with the viewEnvir
function.
The runWF function saves the new R environment to an
rds file under .SPRproject when
saveEnv=TRUE, which is done by default. For additional
details, users want to consult the corresponding help document with
?runWF.
A status summary of the executed workflows can be returned by typing
sal.
## Instance of 'SYSargsList':
## WF Steps:
## 1. export_iris --> Status: Success
## 2. gzip --> Status: Success
## Total Files: 3 | Existing: 3 | Missing: 0
## 2.1. gzip
## cmdlist: 3 | Success: 3
## 3. gunzip --> Status: Success
## Total Files: 3 | Existing: 3 | Missing: 0
## 3.1. gunzip
## cmdlist: 3 | Success: 3
## 4. iris_stats --> Status: Success
##
Several accessor functions can be used to retrieve additional information about workflows and their run status. The code box below lists these functions, omitting their output for brevity. Although some of these functions have been introduced above already, they are included here again for easy reference. Additional, details on these functions can be found here.
stepsWF(sal)
dependency(sal)
cmdlist(sal)
codeLine(sal)
targetsWF(sal)
statusWF(sal)
projectInfo(sal)While SAL objects are autosaved when working with
workflows, it can be sometimes safer to explicity save the object before
closing R.
Some computing systems, such as HPC clusters, allow users to load
software via an Environment
Modules system into their PATH. If a module system is
available, the function module allows to interact with it
from within R. Specific actions are controlled by values passed on to
the action_type argument of the module
function, such as loading and unloading software with load
and unload, respectively. Additionally, dedicated functions
are provided for certain actions. The following code examples are not
evaluated since they will only work on systems where an Environment
Modules software is installed. A full list of actions and additional
functions for Environment Modules can be accessed with
?module.
module(action_type="load", module_name="hisat2")
moduleload("hisat2") # alternative command
moduleunload("hisat2")
modulelist() # list software loaded into current session
moduleAvail() # list all software available in module systemNote, the module load/unload actions can be defined in the R/Rmd
workflow scripts or in the CWL parameter files. The
listCmdModules function can be used, to list the names and
versions of all software tools that are loaded via Environment Modules
in each step of a SAL workflow container. Independent of
the usage of an Environment Modules system, all CL software used by each
step in a workflow can be listed with listCmdTools. The
output of both fumction calls is not shown below for the same reason as
in the previous code chunk.
The processing time of computationally expensive steps can be greatly
accelerated by processing many input files in parallel using several
CPUs and/or computer nodes of an HPC or cloud system, where a scheduling
system is used for load balancing. To simplify for users the
configuration and execution of workflow steps in serial or parallel
mode, systemPipeR uses for both the same runWF
function. Parallelization simply requires appending of the
parallelization parameters to the settings of the corresponding workflow
steps each requesting the computing resources specified by the user,
such as the number of CPU cores, RAM and run time. These resource
settings are stored in the corresponding workflow step of the
SAL workflow container. After adding the parallelization
parameters, runWF will execute the chosen steps in parallel
mode as instructed.
The following example applies to an alignment step of an RNA-Seq
workflow. The above demonstration workflow is not used here since it is
too simple to benefit from parallel processing. In the chosen alignment
example, the parallelization parameters are added to the alignment step
(here hisat2_mapping) of SAL via a
resources list. The given parameter settings will run 18
processes (Njobs) in parallel using for each 4 CPU cores
(ncpus), thus utilizing a total of 72 CPU cores. The
runWF function can be used with most queueing systems as it
is based on utilities defined by the batchtools package,
which supports the use of template files (*.tmpl)
for defining the run parameters of different schedulers. In the given
example below, a conffile (see
.batchtools.conf.R samples here) and a
template file (see *.tmpl samples here)
need to be present on the highest level of a user’s workflow project.
The following example uses the sample conffile and
template files for the Slurm scheduler that are both
provided by this package.
The resources list can be added to analysis steps when a
workflow is loaded into SAL. Alternatively, one can add the
resource settings with the addResources function to any
step of a pre-populated SAL container afterwards. For
workflow steps with the same resource requirements, one can add them to
several steps at once with a single call to addResources by
specifying multiple step names under the step argument.
resources <- list(conffile=".batchtools.conf.R",
template="batchtools.slurm.tmpl",
Njobs=18,
walltime=120, ## in minutes
ntasks=1,
ncpus=4,
memory=1024, ## in Mb
partition = "short"
)
sal <- addResources(sal, step=c("hisat2_mapping"), resources = resources)
sal <- runWF(sal)The above example will submit via runWF(sal) the
hisat2_mapping step to a partition (queue) called
short on an HPC cluster. Users need to adjust this and
other parameters, that are defined in the resources list,
to their cluster environment .
Workflows instances can be visualized as topology graphs with the
plotWF function. The resulting plot includes the following
information.
If no layout parameters are provided, then plotWF will
automatically detect reasonable settings for a user’s system, including
width, height, layout, plot method, branch styles and others.
For more details about the plotWF function, please visit
its help with ?plotWF.
systemPipeR produces two report types: Scientific and
Technical. The Scientific Report resembles a scientific publication
detailing data analysis, results, interpretation information, and
user-provided text. The Technical Report provides logging information
useful for assessing workflow steps and troubleshooting problems.
After a workflow run, systemPipeR's
renderReport or rmarkdown's
render function can be used to generate Scientific Reports
in HTML, PDF or other formats. The former uses the final
SAL instance as input, and the latter the underlying Rmd
source file. The resulting reports mimic research papers by combining
user-generated text with analysis results, creating reproducible
analysis reports. This reporting infrastructure offers support for
citations, auto-generated bibliographies, code chunks with syntax
highlighting, and inline evaluation of variables to update text content.
Tables and figures in a report can be automatically updated when the
document is rebuilt or workflows are rerun, ensuring data components are
always current. This automation increases reproducibility and saves time
creating Scientific Reports. Furthermore, the workflow topology maps
described earlier can be incorporated into Scientific Reports, enabling
integration between Scientific and Technical Reports.
sal <- renderReport(sal)
rmarkdown::render("my.Rmd", clean = TRUE, output_format = "BiocStyle::html_document") Note, my.Rmd in the last code line needs to be replaced
with the name (path) of the source Rmd file used for
generating the SAL workflow container.
The package collects technical information about workflow runs in a
project’s log directory (default name: .SPRproject). After
partial or full completion of a workflow, the logging information of a
run is used by the renderLog function to generate a
Technical Report in HTML or other formats. The report includes software
execution commands, warnings and errors messages of each workflow step.
Easy visual navigation of Technical Reports is provided by including an
interactive instance of the corresponding workflow topology graph. The
technical details in these reports help assess the success of each
workflow step and facilitate troubleshooting.
The SAL workflow containers of systemPipeR provide
versatile conversion and export options to both Rmd and executable Bash
scripts. This feature not only enhances the portability and reusability
of workflows across different systems but also promotes transparency,
enabling efficient testing and troubleshooting.
A populated SAL workflow container can be converted to
an Rmd file using the sal2rmd function. If needed, this
Rmd file can be used to construct a SAL
workflow container with the importWF function as introduced
above. This functionality is useful for building templates of workflow
Rmds and sharing them with other systems.
The sal2bash function converts and exports workflows
stored in SAL containers into executable Bash scripts. This enables
users to run their workflows as Bash scripts from the command line. The
function takes a SAL container as input and generates a
spr_wf.sh file in the project’s root directory as output.
Additionally, it creates a spr_bash directory that stores
all R-based workflow steps as separate R scripts. To minimize the number
of R scripts needed, the function combines adjacent R steps into a
single file.
The ability to restart existing workflows projects is important for continuing analyses that could not be completed, or to make changes without repeating already completed steps. Two main options are provided to restart workflows. Another option is provided that resets workflows to the very beginning, which effectively deletes the previous environment.
1. The resume=TRUE option will
initialize the latest instance of a SAL object stored in
the logs.dir including its log files. When this option is
used, a workflow can be continued where it was left off, for example
after closing and restarting R from the same directory on the same
system. If the project was created with custom directory and/or file
names, then those names need to be specified under the
log.dir and sys.file arguments of the
SPRproject function, respectively, otherwise the default
names will be used.
If the R environment was saved, one can recover with
load.envir=TRUE all objects that were created during the
previous workflow run. The same is possible with the
restart option. For more details, please consult the help
for the runWF function.
After resuming the workflow with load.envir enabled, one
can inspect the objects created in the old environment, and decide if it
is necessary to copy them to the current environment.
2. The restart=TRUE option will also
use the latest instance of the SAL object stored in the
logs.dir, but the previous log files will be deleted.
3. The overwrite=TRUE option will reset
the workflow project to the very beginning by deleting the
log.dir directory (.SPRproject) that stores
the previous SAL instance and all its log files. At the
same time a new and empty ‘SAL’ workflow container will be created. This
option should be used with caution since it will effectively delete the
workflow environment. Output files written by the workflow steps to the
results directory will not be deleted when this option is
used.
This section describes methods for accessing, subsetting and
modifying SAL workflow objects.
Workflows and their run status can be explored further using a range
of accessor functions for SAL objects.
The number of steps in a workflow can be determined with the
length function.
## [1] 4
The corresponding names of workflow steps can be returned with
stepName.
## [1] "export_iris" "gzip" "gunzip" "iris_stats"
CL software used by each step in a workflow can be listed with
listCmdTools.
## Following tools are used in steps in this workflow:
## step_name tool in_path
## 1 gzip gzip NA
## 2 gunzip gunzip NA
Some computing systems (often HPC clusters) allow users to load CL
software via an Environment
Modules system into their PATH. If this is the case, then the exact
verions of the software tools loaded via the module system can be listed
for SAL and SYSargs2 objects with
listCmdModules and modules, respectively. The
example workflow used here does not make use of Environment Modules, and
thus there are no software tools to list here.
## No module is listed, check your CWL yaml configuration files, skip.
## character(0)
For more information on how to work with Environment Modules in
systemPipeR, please visit the help with
?module, ?modules and
?listCmdModules.
Several accessor functions are named after the corresponding slot
names in SAL objects. This makes it easy to look them up
with names(), and then apply them to sal as
the only argument, such as runInfo(sal).
## [1] "stepsWF" "statusWF" "targetsWF" "outfiles"
## [5] "SE" "dependency" "targets_connection" "projectInfo"
## [9] "runInfo"
The individual workflow steps in a SAL container are
stored as SYSargs2 and LineWise components.
They can be returned with the stepsWF function.
## $export_iris
## Instance of 'LineWise'
## Code Chunk length: 1
##
## $gzip
## Instance of 'SYSargs2':
## Slot names/accessors:
## targets: 3 (SE...VI), targetsheader: 1 (lines)
## modules: 0
## wf: 1, clt: 1, yamlinput: 4 (inputs)
## input: 3, output: 3
## cmdlist: 3
## Sub Steps:
## 1. gzip (rendered: TRUE)
##
##
##
## $gunzip
## Instance of 'SYSargs2':
## Slot names/accessors:
## targets: 3 (SE...VI), targetsheader: 1 (lines)
## modules: 0
## wf: 1, clt: 1, yamlinput: 4 (inputs)
## input: 3, output: 3
## cmdlist: 3
## Sub Steps:
## 1. gunzip (rendered: TRUE)
##
##
##
## $iris_stats
## Instance of 'LineWise'
## Code Chunk length: 5
The accessor function of SYSargs2 and
LineWise objects can be returned similarly (here for
gzip step).
## [1] "targets" "targetsheader" "modules" "wf"
## [5] "clt" "yamlinput" "cmdlist" "input"
## [9] "output" "files" "inputvars" "cmdToCwl"
## [13] "status" "internal_outfiles"
The statusWF function returns a status summary for each
step in a SAL workflow instance.
## $export_iris
## DataFrame with 1 row and 2 columns
## Step Status
## <character> <character>
## 1 export_iris Success
##
## $gzip
## DataFrame with 3 rows and 5 columns
## Targets Total_Files Existing_Files Missing_Files gzip
## <character> <numeric> <numeric> <numeric> <matrix>
## SE SE 1 1 0 Success
## VE VE 1 1 0 Success
## VI VI 1 1 0 Success
##
## $gunzip
## DataFrame with 3 rows and 5 columns
## Targets Total_Files Existing_Files Missing_Files gunzip
## <character> <numeric> <numeric> <numeric> <matrix>
## SE SE 1 1 0 Success
## VE VE 1 1 0 Success
## VI VI 1 1 0 Success
##
## $iris_stats
## DataFrame with 1 row and 2 columns
## Step Status
## <character> <character>
## 1 iris_stats Success
The targets instances for each step in a workflow can be
returned with targetsWF. The below applies it to the second
step.
## $gzip
## DataFrame with 3 rows and 2 columns
## FileName SampleName
## <character> <character>
## SE results/setosa.csv SE
## VE results/versicolor.csv VE
## VI results/virginica.csv VI
If a workflow contains sample comparisons, that have been specified
in the header lines of a targets file starting with a
# <CMP> tag, then they can be returned with the
targetsheader functions. This does not apply to the current
demo sal instance, and thus the function returns
NULL. For more details, consult the targets
file section here.
The outfiles component of a SAL object
stores the paths to the expected outfiles files for each step in a
workflow. Some of them are the input for downstream workflow steps.
## $gzip
## DataFrame with 3 rows and 1 column
## gzip_file
## <character>
## 1 ./results/gzip/SE.cs..
## 2 ./results/gzip/VE.cs..
## 3 ./results/gzip/VI.cs..
The dependency step(s) in a workflow can be obtained
with the dependency function. This information is used to
construct the toplogy graph of a workflow (see here).
## $export_iris
## [1] NA
##
## $gzip
## [1] "export_iris"
##
## $gunzip
## [1] "gzip"
##
## $iris_stats
## [1] "gzip"
The sample names (IDs) stored in the corresponding column of a
targets file can be returned with the SampleName
function.
## [1] "SE" "VE" "VI"
The getColumn method can be used to obtain the paths to
the files generated in a specified step.
## SE VE VI
## "./results/gzip/SE.csv.gz" "./results/gzip/VE.csv.gz" "./results/gzip/VI.csv.gz"
## SE VE VI
## "results/setosa.csv" "results/versicolor.csv" "results/virginica.csv"
The yamlinput function returns the parameters of a
workflow step defined in the corresponding yml file.
## $file
## $file$class
## [1] "File"
##
## $file$path
## [1] "_FILE_PATH_"
##
##
## $SampleName
## [1] "_SampleName_"
##
## $ext
## [1] "csv.gz"
##
## $results_path
## $results_path$class
## [1] "Directory"
##
## $results_path$path
## [1] "./results"
The exact syntax for running CL software on each input data set in a
workflow can be returned with the cmdlist function. The CL
calls are assembled from the corresponding yml and
cwl, and an optional targets file as described
in the above CLI section here. The example
below shows the CL syntax for running gzip and
gunzip on the first input sample. Evaluating the output of
cmdlist can be very helpful for designing and debugging CWL
parameter files to support new CL software or changing their
settings.
## $gzip
## $gzip$SE
## $gzip$SE$gzip
## [1] "gzip -c results/setosa.csv > results/SE.csv.gz"
##
##
##
## $gunzip
## $gunzip$SE
## $gunzip$SE$gunzip
## [1] "gunzip -c ./results/gzip/SE.csv.gz > results/SE.csv"
Similarly, the codeLine function returns the R code of a
LineWise workflow step.
## export_iris
## mapply(function(x, y) write.csv(x, y), split(iris, factor(iris$Species)), file.path("results", paste0(names(split(iris, factor(iris$Species))), ".csv")))
The objects generated in a workflow’s run environment can be accessed
with viewEnvir.
## <environment: 0x5624da1a2f30>
## [1] "df" "plot" "stats"
If needed one or multiple objects can be copied from the run environment of a workflow to the current environment of an R session.
## <environment: 0x5624da1a2f30>
## Copying to 'new.env':
## plot
The bracket operator can be used to subset workflow by steps. For
instance, the current instance of sal has four steps, and
sal[1:2] will subset the workflow to the first two
steps.
## [1] 4
## Instance of 'SYSargsList':
## WF Steps:
## 1. export_iris --> Status: Success
## 2. gzip --> Status: Success
## Total Files: 3 | Existing: 3 | Missing: 0
## 2.1. gzip
## cmdlist: 3 | Success: 3
##
In addition to subsetting by steps, one can subset workflows by input samples. The following illustrates this for the first two input samples, but omits the function output for brevity.
sal_sub <- subset(sal, subset_steps = c(2,3), input_targets = c("SE", "VE"), keep_steps = TRUE)
stepsWF(sal_sub)
targetsWF(sal_sub)
outfiles(sal_sub)For appending workflow steps, one can use the +
operator.
Replacement methods are implemented to make adjustments to certain paramer settings and R code in workflow steps.
## create a copy of sal for testing
sal_c <- sal
## view original value, here restricted to 'ext' slot
yamlinput(sal_c, step = "gzip")$ext## [1] "csv.gz"
## Replace value under 'ext'
yamlinput(sal_c, step = "gzip", paramName = "ext") <- "txt.gz"
## view modified value, here restricted to 'ext' slot
yamlinput(sal_c, step = "gzip")$ext## [1] "txt.gz"
## $gzip
## $gzip$SE
## $gzip$SE$gzip
## [1] "gzip -c results/setosa.csv > results/SE.txt.gz"
Code lines can be added with appendCodeLine to R steps
(LineWise) as shown in the following example.
appendCodeLine(sal_c, step = "export_iris", after = 1) <- "log_cal_100 <- log(100)"
codeLine(sal_c, step = "export_iris")## export_iris
## mapply(function(x, y) write.csv(x, y), split(iris, factor(iris$Species)), file.path("results", paste0(names(split(iris, factor(iris$Species))), ".csv")))
## log_cal_100 <- log(100)
In addition, code lines can be replaced with the
replaceCodeLine function. For additional details about the
LineWise class, please see the example above and the detailed description of the
LineWise class here.
replaceCodeLine(sal_c, step="export_iris", line = 2) <- LineWise(code={
log_cal_100 <- log(50)
})
codeLine(sal_c, step = "export_iris")## export_iris
## mapply(function(x, y) write.csv(x, y), split(iris, factor(iris$Species)), file.path("results", paste0(names(split(iris, factor(iris$Species))), ".csv")))
## log_cal_100 <- log(50)
Renaming of workflow steps is possible with the
renameStep function.
## Instance of 'SYSargsList':
## WF Steps:
## 1. newStep2 --> Status: Success
## 2. newIndex --> Status: Success
## Total Files: 3 | Existing: 3 | Missing: 0
## 2.1. gzip
## cmdlist: 3 | Success: 3
## 3. gunzip --> Status: Success
## Total Files: 3 | Existing: 3 | Missing: 0
## 3.1. gunzip
## cmdlist: 3 | Success: 3
## 4. iris_stats --> Status: Success
##
## [1] "newStep2" "newIndex" "gunzip" "iris_stats"
## [1] "newStep2" "newIndex" "gunzip" "iris_stats"
## $newStep2
## [1] NA
##
## $newIndex
## [1] "newStep2"
##
## $gunzip
## [1] "newIndex"
##
## $iris_stats
## [1] "newIndex"
The replaceStep function can be used to replace entire
workflow steps. When replacing workflow steps, it is important to
maintain a valid dependency graph among the affected steps.
If needed, workflow steps can be removed as follows.
## Instance of 'SYSargsList':
## WF Steps:
## 1. export_iris --> Status: Success
## 2. gunzip --> Status: Success
## Total Files: 3 | Existing: 3 | Missing: 0
## 2.1. gunzip
## cmdlist: 3 | Success: 3
## 3. iris_stats --> Status: Success
##
This section provides a concise overview of CWL and its
utilization within systemPipeR. It covers fundamental CWL
concepts, including the CommandLineTool and
Workflow classes for describing individual CL processes and
workflows. For further details, readers want to refer to CWL’s
comprehensive CommandLineTool
and Workflow
documentation, as well as the examples provided in CWL’s Beginner
Tutorial and User
Guide. Additionally, familiarizing oneself with CWL’s
YAML format specifications can be beneficial.
As illustrated in the introduction (Fig
2), CWL files with the ‘.cwl’ extension define the
parameters of a specific CL step or workflow, while files with the
‘.yml’ extension define their input values.
CommandLineToolA Command Line Tool (CommandLineTool class) specifies a
standalone process that can be run by itself (without including
interactions with other programs), and has inputs and outputs.
The following inspects the basic structure of a ‘.cwl’
sample file for a CommandLineTool that is provided by this
package.
dir_path <- system.file("extdata/cwl", package = "systemPipeR")
cwl <- yaml::read_yaml(file.path(dir_path, "example/example.cwl"))Important components include:
1. cwlVersion: version of CWL
specification used by file.
2. class: declares description of a
CommandLineTool.
## $cwlVersion
## [1] "v1.0"
##
## $class
## [1] "CommandLineTool"
3. baseCommand: name of CL tool.
## $baseCommand
## [1] "echo"
4. inputs: defines input information to
run the tool. This includes:
id: each input has an id including
name.type: type of input value; one of string,
int, long, float,
double, File, Directory or
Any.inputBinding: indicates if the input parameter should
appear in CL call. If missing input will not appear in the CL call.## $inputs
## $inputs$message
## $inputs$message$type
## [1] "string"
##
## $inputs$message$inputBinding
## $inputs$message$inputBinding$position
## [1] 1
##
##
##
## $inputs$SampleName
## $inputs$SampleName$type
## [1] "string"
##
##
## $inputs$results_path
## $inputs$results_path$type
## [1] "Directory"
5.. outputs: list of expected outputs
after running the CL tool. Important components are:
id: each input has an id including
name.type: type of output value; one of string,
int, long, float,
double, File, Directory,
Any or stdout);outputBinding: defines how to set outputs values;
glob specifies output value’s name.## $outputs
## $outputs$string
## $outputs$string$type
## [1] "stdout"
6. stdout: specifies
filename for standard output. Note, by default
systemPipeR constructs the output filename
from results_path and SampleName (see
above).
## $stdout
## [1] "$(inputs.results_path.basename)/$(inputs.SampleName).txt"
WorkflowCWL’s Workflow class describes one or more workflow
steps, declares their interdependencies, and defines how
CommandLineTools are executed. Its CWL file includes
inputs, outputs, and steps.
The following illustrates the basic structure of a
‘.cwl’ sample file for a Workflow that is
provided by this package.
1. cwlVersion: version of CWL
specification used by file.
2. class: declares description of a
Workflow that describes one or more
CommandLineTools and their combined usage.
## $class
## [1] "Workflow"
##
## $cwlVersion
## [1] "v1.0"
3. inputs: defines the inputs of the
workflow.
## $inputs
## $inputs$message
## [1] "string"
##
## $inputs$SampleName
## [1] "string"
##
## $inputs$results_path
## [1] "Directory"
4. outputs: defines the outputs of the
workflow.
## $outputs
## $outputs$string
## $outputs$string$outputSource
## [1] "echo/string"
##
## $outputs$string$type
## [1] "stdout"
5. steps: describes the steps of the
workflow. The example below shows one step.
## $steps
## $steps$echo
## $steps$echo$`in`
## $steps$echo$`in`$message
## [1] "message"
##
## $steps$echo$`in`$SampleName
## [1] "SampleName"
##
## $steps$echo$`in`$results_path
## [1] "results_path"
##
##
## $steps$echo$out
## [1] "[string]"
##
## $steps$echo$run
## [1] "example/example.cwl"
The .yml file provides the input values for the
parameters described above. The following example includes input values
for three parameters (message, SampleName and
results_path).
## $message
## [1] "Hello World!"
##
## $SampleName
## [1] "M1"
##
## $results_path
## $results_path$class
## [1] "Directory"
##
## $results_path$path
## [1] "./results"
Note, the .yml file needs to provide input values for
each input parameter specified in the corresponding .cwl
file (compare cwl[4] above).
cwl, yml and
targetsThis section illustrates how the parameters in CWL files
(cwl and yml) are interconnected to construct
CL calls of steps, and subsequently assembled to workflows.
A SAL container (long name SYSargsList)
stores all information and instructions needed for processing a set of
inputs (incl. files) with a single or many CL steps within a workflow
The SAL object is created and fully populated with the
SYSargsList constructor function. More detailed
documentation of SAL workflow instances is available here and here.
The following imports the .cwl and .yml
files for running the echo Hello World! example.
HW <- SYSargsList(wf_file = "example/workflow_example.cwl",
input_file = "example/example_single.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"))
HW## Instance of 'SYSargsList':
## WF Steps:
## 1. Step_x --> Status: Pending
## Total Files: 1 | Existing: 0 | Missing: 1
## 1.1. echo
## cmdlist: 1 | Pending: 1
##
## $Step_x
## $Step_x$defaultid
## $Step_x$defaultid$echo
## [1] "echo Hello World! > results/M1.txt"
The example provided is restricted to creating a CL call for a single
input (sample). To process multiple inputs, a straightforward approach
is to assign variables to the corresponding parameters instead of using
fixed (hard-coded) values. These variables can then be assigned the
desired input values iteratively, resulting in multiple CL calls, one
for each input value. The following illustrates this with an example,
where the message and SampleName parameters
are assigned variables that are labeled with tags of the form
_XXX_. These variables will be assigned values stored in a
targets file.
## $message
## [1] "_STRING_"
##
## $SampleName
## [1] "_SAMPLE_"
##
## $results_path
## $results_path$class
## [1] "Directory"
##
## $results_path$path
## [1] "./results"
The content of the targets file used for this example is
shown below. The general structure of targets files is
explained above.
targetspath <- system.file("extdata/cwl/example/targets_example.txt", package = "systemPipeR")
read.delim(targetspath, comment.char = "#")## Message SampleName
## 1 Hello World! M1
## 2 Hello USA! M2
## 3 Hello Bioconductor! M3
In the simple example given above the values stored under the
Message and SampleName columns of the targets
file will be passed on to the corresponding parameters with matching
names in the yml file, and from there to the
echo command defined in the cwl file (see here). As mentioned previously, the usage of
targets files is optional in systemPipeR.
Since targets files provide an easy and efficient solution
for organizing experimental variables, their usage is highly encouraged
and well supported in systemPipeR.
The SYSargsList function constructs SAL
instances from the three parameter files, that were introduced above
(see Fig 3). The path to each file is
assigned to its own argument: wf_file is assigned the path
of a cwl workflow file, input_file the path of
a yml input file, and targets the path of a
targets file. Additionally, a named vector is provided
under the inputvars argument that defines which column
values in the targets file are assigned to specific
parameters in the yml file. A parameter connection is
established where a name in inputvars has matching column
and parameter names in the targets and yml
files, respectively (Fig 3). A tagging syntax with the pattern
_XXX_ is used to indicate which parameters contain
variables that will be assigned values from the targets
file. The usage of this pattern is only recommended for consistency and
easy identification, but not enforced.
The SYSargslist function call constructs the
echo commands (CL calls) based on the parameters provided
by the above described parameter file instances (cwl,
yml and targets) as well as the variable
mappings specified under the inputvars argument.
HW_mul <- SYSargsList(step_name = "echo",
targets=targetspath,
wf_file="example/workflow_example.cwl", input_file="example/example.yml",
dir_path = dir_path,
inputvars = c(Message = "_STRING_", SampleName = "_SAMPLE_"))
HW_mul## Instance of 'SYSargsList':
## WF Steps:
## 1. echo --> Status: Pending
## Total Files: 3 | Existing: 0 | Missing: 3
## 1.1. echo
## cmdlist: 3 | Pending: 3
##
The final CL calls (here echo command) can be returned
with the cmdlist for each string given under the
Message column of the targets file. The values
under the SampleName column are used to name the
corresponding output files, each with a txt extension.
## $echo
## $echo$M1
## $echo$M1$echo
## [1] "echo Hello World! > results/M1.txt"
##
##
## $echo$M2
## $echo$M2$echo
## [1] "echo Hello USA! > results/M2.txt"
##
##
## $echo$M3
## $echo$M3$echo
## [1] "echo Hello Bioconductor! > results/M3.txt"
To streamline the process of generating CWL parameter files (both
cwl and yml), users can simply provide the CL
syntax for executing new software. This action will automatically create
the corresponding CWL parameter files, which alleviates the need for
manual creation of CWL files, reducing the burden on users. This
functionality is implemented in systemPipeR’s createParam
function group.
To use this functionality, CL calls need to be provided in a
pseudo-bash script format and stored as a
character vector.
The following uses as example a CL call for the HISAT2 software.
hisat2 -S ./results/M1A.sam -x ./data/tair10.fasta -k 1 -min-intronlen 30 -max-intronlen 3000 -threads 4 -U ./data/SRR446027_1.fastq.gzFor the CL call above, the corresponding pseudo-bash syntax is given
below. Here, the CL string needs to be stored in a single slot of a
character vector, here named command. The
formatting requirements for the CL string will be explained next.
command <- "
hisat2 \
-S <F, out: ./results/M1A.sam> \
-x <F: ./data/tair10.fasta> \
-k <int: 1> \
-min-intronlen <int: 30> \
-max-intronlen <int: 3000> \
-threads <int: 4> \
-U <F: ./data/SRR446027_1.fastq.gz>
"Format specifications for pseudo-bash syntax (Version 1)
\ at the end of a
line.baseCommand).
It can include a subcommand, such as in git commit where
commit is a subcommand.-S and --min.
Values that should be assigned to arguments are placed inside
<...>, also on the same line. Arguments and flags
without values lack this assignment.<TYPE:, where TYPE
can be F for “File”, “int”, “string”, etc.out can be added after TYPE separated by
a comma.: is used to separate keywords and default
values. Any non-space value after the : will be treated as
a default value.Note, the above specifications are Version 1 (v1) of the
pseudo-bash syntax used by the createParam function below.
There also is a Version 2 (v2) specification that supports
additional features, but comes with more syntax restrictions. Details on
this are available in the help of the createParam
function.
createParam FunctionThe createParam function accepts as input a CL string
that is formatted in the above pseudo-bash syntax. As output it creates
the corresponding CWL files (cwl and yml) that
will be written to the default directory: ./param/cwl/.
This path can be changed under the file argument. In
addition, it constructs for the given CL string the corresponding
SYSargs2 object (here assigned to cmd). The
information printed as console output contains the original CL string
that is included for checking purposes. This CL string is not included
to the resulting CWL files.
## *****BaseCommand*****
## hisat2
## *****Inputs*****
## S:
## type: File
## preF: -S
## yml: ./results/M1A.sam
## x:
## type: File
## preF: -x
## yml: ./data/tair10.fasta
## k:
## type: int
## preF: -k
## yml: 1
## min-intronlen:
## type: int
## preF: -min-intronlen
## yml: 30
## max-intronlen:
## type: int
## preF: -max-intronlen
## yml: 3000
## threads:
## type: int
## preF: -threads
## yml: 4
## U:
## type: File
## preF: -U
## yml: ./data/SRR446027_1.fastq.gz
## *****Outputs*****
## output1:
## type: File
## value: ./results/M1A.sam
## *****Parsed raw command line*****
## hisat2 -S ./results/M1A.sam -x ./data/tair10.fasta -k 1 -min-intronlen 30 -max-intronlen 3000 -threads 4 -U ./data/SRR446027_1.fastq.gz
## Written content of 'commandLine' to file:
## param/cwl/hisat2/hisat2.cwl
## Written content of 'commandLine' to file:
## param/cwl/hisat2/hisat2.yml
Next, the cmdlist can be used to check the correctness
of the CL call defined by the CWL parameter files generated by the
createParam command above.
## $defaultid
## $defaultid$hisat2
## [1] "hisat2 -S ./results/M1A.sam -x ./data/tair10.fasta -k 1 -min-intronlen 30 -max-intronlen 3000 -threads 4 -U ./data/SRR446027_1.fastq.gz"
If the createParam function is executed without creating
the CWL parameter files right away (argument setting
writeParamFiles=FALSE) then these files can be generated in
a separate step with writeParamFiles.
targets fileThe following gives a more complete example where the CWL files are
first created for a CL string, and then loaded together with a
targets file into a SYSargs2 object. Next, the
final CL calls are assembled for each input sample with the
renderWF function. The final CL calls can then be inspected
with the cmdlist function, where the below shows only the
first 2 of a total of 18 CL calls for brevity.
command2 <- "
hisat2 \
-S <F, out: _SampleName_.sam> \
-x <F: ./data/tair10.fasta> \
-k <int: 1> \
-min-intronlen <int: 30> \
-max-intronlen <int: 3000> \
-threads <int: 4> \
-U <F: _FASTQ_PATH1_>
"
WF <- createParam(command2, overwrite = TRUE, writeParamFiles = TRUE, confirm = TRUE)
targetspath <- system.file("extdata", "targets.txt", package = "systemPipeR")
WF_test <- loadWorkflow(targets = targetspath, wf_file="hisat2.cwl",
input_file="hisat2.yml", dir_path = "param/cwl/hisat2/")
WF_test <- renderWF(WF_test, inputvars = c(FileName = "_FASTQ_PATH1_", SampleName= "_SampleName_"))## Instance of 'SYSargs2':
## Slot names/accessors:
## targets: 18 (M1A...V12B), targetsheader: 4 (lines)
## modules: 1
## wf: 0, clt: 1, yamlinput: 11 (inputs)
## input: 18, output: 18
## cmdlist: 18
## Sub Steps:
## 1. hisat2 (rendered: TRUE)
## $M1A
## $M1A$hisat2
## [1] "hisat2 -S M1A.sam -x ./data/tair10.fasta -k 1 -min-intronlen 30 -max-intronlen 3000 -threads 4 -U ./data/SRR446027_1.fastq.gz"
##
##
## $M1B
## $M1B$hisat2
## [1] "hisat2 -S M1B.sam -x ./data/tair10.fasta -k 1 -min-intronlen 30 -max-intronlen 3000 -threads 4 -U ./data/SRR446028_1.fastq.gz"
The following introduces several accessor and replacement functions that are useful for creating and revising CWL parameter files.
newIn <- new_inputs <- list(
"new_input1" = list(type = "File", preF="-b1", yml ="myfile1"),
"new_input2" = list(type = "File", preF="-b2", yml ="myfile2"),
"new_input3" = "-b3 <F: myfile3>"
)
cmd5 <- appendParam(cmd, "inputs", index = 1:2, append = new_inputs)
cmdlist(cmd5)
cmd6 <- appendParam(cmd, "inputs", index = 1:2, after=0, append = new_inputs)
cmdlist(cmd6)The workflow steps of SAL (synonym
SYSargsList) containers are composed of
SYSargs2 and/or LineWise objects. These two
classes are introduced here in more detail.
SYSargs2 classThe SYSargs2 class stores workflow steps that run CL
software. An instance of SYSargs2 stores all the
input/output paths and parameter components necessary for executing a
specific CL data analysis step. SYSargs2 instances are
created using two constructor functions: loadWF and
renderWF. These functions make use of a
targets (or yml) and the two CWL parameter
files cwl and yml. The structure and content
for the CWL files are described above. The following
creates a SYSargs2 instance using the cwl and
yml files for running the RNA-Seq read aligner HISAT2 (Kim et al. 2015). Note, when using the
SYSargsList method for constructing workflow steps (see here), then the user will not need to run the
loadWF and renderWF directly.
library(systemPipeR)
targetspath <- system.file("extdata", "targets.txt", package = "systemPipeR")
dir_path <- system.file("extdata/cwl", package = "systemPipeR")
WF <- loadWF(targets = targetspath, wf_file = "hisat2/hisat2-mapping-se.cwl",
input_file = "hisat2/hisat2-mapping-se.yml",
dir_path = dir_path)
WF <- renderWF(WF, inputvars = c(FileName = "_FASTQ_PATH1_",
SampleName = "_SampleName_"))In addition to SAL objects (see here), the cmdlist function accepts
SYSargs2 to constructs CL calls based on the parameter
inputs imported from the corresponding targets,
yml and cwl files.
## $M1A
## $M1A$`hisat2-mapping-se`
## [1] "hisat2 -S ./results/M1A.sam -x ./data/tair10.fasta -k 1 --min-intronlen 30 --max-intronlen 3000 -U ./data/SRR446027_1.fastq.gz --threads 4"
Several accessor methods are available that are named after the slot
names of SYSargs2 objects.
## [1] "targets" "targetsheader" "modules" "wf"
## [5] "clt" "yamlinput" "cmdlist" "input"
## [9] "output" "files" "inputvars" "cmdToCwl"
## [13] "status" "internal_outfiles"
The output components of SYSargs2 define the expected
output files for each step in the workflow; some of which are the input
for the next workflow step, e.g. a downstream
SYSargs2 instance.
## $M1A
## $M1A$`hisat2-mapping-se`
## [1] "./results/M1A.sam"
The targets method allows access to the
targets component of a SYSargs2 object. Refer
to the information provided above for an
explanation of the targets file structure.
## $M1A
## $M1A$FileName
## [1] "./data/SRR446027_1.fastq.gz"
##
## $M1A$SampleName
## [1] "M1A"
##
## $M1A$Factor
## [1] "M1"
##
## $M1A$SampleLong
## [1] "Mock.1h.A"
##
## $M1A$Experiment
## [1] 1
##
## $M1A$Date
## [1] "23-Mar-2012"
## DataFrame with 18 rows and 6 columns
## FileName SampleName Factor SampleLong Experiment Date
## <character> <character> <character> <character> <character> <character>
## 1 ./data/SRR446027_1.f.. M1A M1 Mock.1h.A 1 23-Mar-2012
## 2 ./data/SRR446028_1.f.. M1B M1 Mock.1h.B 1 23-Mar-2012
## 3 ./data/SRR446029_1.f.. A1A A1 Avr.1h.A 1 23-Mar-2012
## 4 ./data/SRR446030_1.f.. A1B A1 Avr.1h.B 1 23-Mar-2012
## 5 ./data/SRR446031_1.f.. V1A V1 Vir.1h.A 1 23-Mar-2012
## ... ... ... ... ... ... ...
## 14 ./data/SRR446040_1.f.. M12B M12 Mock.12h.B 1 23-Mar-2012
## 15 ./data/SRR446041_1.f.. A12A A12 Avr.12h.A 1 23-Mar-2012
## 16 ./data/SRR446042_1.f.. A12B A12 Avr.12h.B 1 23-Mar-2012
## 17 ./data/SRR446043_1.f.. V12A V12 Vir.12h.A 1 23-Mar-2012
## 18 ./data/SRR446044_1.f.. V12B V12 Vir.12h.B 1 23-Mar-2012
If CL software is loaded via an Environment Modules system
into a user’s PATH, then this information can be accessed
in SYSargs2 objects as shown below. For more details on
working with Environment Modules, see here.
## module1
## "hisat2/2.1.0"
Additional accessible information includes the location of the
parameters files, inputvars (see here) and more.
To define R code as workflow steps, the LineWise class
is used. The syntax for declaring lines of R code as workflow steps in R
or Rmd files is introduced in the workflow
design section. The following showcases additional utilities for
LineWise objects.
rmd <- system.file("extdata", "spr_simple_lw.Rmd", package = "systemPipeR")
sal_lw <- SPRproject(overwrite = TRUE)## Recreating directory '/tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/.SPRproject'
## Creating file '/tmp/RtmpTnzPYE/Rbuild1d316679cbbf/systemPipeR/vignettes/.SPRproject/SYSargsList.yml'
## Now check if required tools are installed
## There is no commandline (SYSargs) step in this workflow, skip.
## firstStep
## mapply(function(x, y) write.csv(x, y), split(iris, factor(iris$Species)), file.path("results", paste0(names(split(iris, factor(iris$Species))), ".csv")))
## secondStep
## setosa <- read.delim("results/setosa.csv", sep = ",")
## versicolor <- read.delim("results/versicolor.csv", sep = ",")
## virginica <- read.delim("results/virginica.csv", sep = ",")
Coerce a LineWise object to a list object
and vice versa.
## [1] "list"
## Instance of 'LineWise'
## Code Chunk length: 3
Accessing basic information of LineWise objects.
## [1] 3
## [1] "codeLine" "codeChunkStart" "stepName" "dependency" "status"
## [6] "files" "runInfo"
## setosa <- read.delim("results/setosa.csv", sep = ",")
## versicolor <- read.delim("results/versicolor.csv", sep = ",")
## virginica <- read.delim("results/virginica.csv", sep = ",")
## integer(0)
## character(0)
Subsetting LineWise objects.
## versicolor <- read.delim("results/versicolor.csv", sep = ",")
## setosa <- read.delim("results/setosa.csv", sep = ",")
## virginica <- read.delim("results/virginica.csv", sep = ",")
Replacement methods for changing R code in LineWise
objects.
## setosa <- read.delim("results/setosa.csv", sep = ",")
## 5 + 5
## virginica <- read.delim("results/virginica.csv", sep = ",")
## 6 + 7
## setosa <- read.delim("results/setosa.csv", sep = ",")
## 5 + 5
## virginica <- read.delim("results/virginica.csv", sep = ",")
For comparison, similar replacement methods are available for
SAL objects. They have been covered above.
Here is a partial list of CL software for which
systemPipeR includes CWL parameter file templates. Notably,
with the newly added auto-creation feature for CWL files (see here), generating CWL parameter files for most CL
tools has become straightforward. Thus, maintaining and extending this
list will not be necessary anymore.
| Tool Name | Description | Step |
|---|---|---|
| bwa | Alignment | BWA is a software package for mapping low-divergent sequences against a large reference genome, such as the human genome. |
| Bowtie2 | Alignment | Bowtie 2 is an ultrafast and memory-efficient tool for aligning sequencing reads to long reference sequences. |
| FASTX-Toolkit | Read Preprocessing | FASTX-Toolkit is a collection of command line tools for Short-Reads FASTA/FASTQ files preprocessing. |
| TransRate | Quality | Transrate is software for de-novo transcriptome assembly quality analysis. |
| Gsnap | Alignment | GSNAP is a genomic short-read nucleotide alignment program. |
| Samtools | Post-processing | Samtools is a suite of programs for interacting with high-throughput sequencing data. |
| Trimmomatic | Read Preprocessing | Trimmomatic is a flexible read trimming tool for Illumina NGS data. |
| Rsubread | Alignment | Rsubread is a Bioconductor software package that provides high-performance alignment and read counting functions for RNA-seq reads. |
| Picard | Manipulating HTS data | Picard is a set of command line tools for manipulating high-throughput sequencing (HTS) data and formats such as SAM/BAM/CRAM and VCF. |
| Busco | Quality | BUSCO assesses genome assembly and annotation completeness with Benchmarking Universal Single-Copy Orthologs. |
| Hisat2 | Alignment | HISAT2 is a fast and sensitive alignment program for mapping NGS reads (both DNA and RNA) to reference genomes. |
| Tophat2 | Alignment | TopHat is a fast splice junction mapper for RNA-Seq reads. |
| GATK | Variant Discovery | Variant Discovery in High-Throughput Sequencing Data. |
| Trim_galore | Read Preprocessing | Trim Galore is a wrapper around Cutadapt and FastQC to consistently apply adapter and quality trimming to FastQ files. |
| TransDecoder | Find Coding Regions | TransDecoder identifies candidate coding regions within transcript sequences. |
| Trinotate | Transcriptome Functional Annotation | Trinotate is a comprehensive annotation suite designed for automatic functional annotation of transcriptomes. |
| STAR | Alignment | STAR is an ultrafast universal RNA-seq aligner. |
| Trinity | denovo Transcriptome Assembly | Trinity assembles transcript sequences from Illumina RNA-Seq data. |
| MACS2 | Peak calling | MACS2 identifies transcription factor binding sites in ChIP-seq data. |
| Kallisto | Read counting | kallisto is a program for quantifying abundances of transcripts from RNA-Seq data. |
| BCFtools | Variant Discovery | BCFtools is a program for variant calling and manipulating files in the Variant Call Format (VCF) and its binary counterpart BCF. |
| Bismark | Bisulfite mapping | Bismark is a program to map bisulfite treated sequencing reads to a genome of interest and perform methylation calls in a single step. |
| Fastqc | Quality | FastQC is a quality control tool for high throughput sequence data. |
| Blast | Blast | BLAST finds regions of similarity between biological sequences. |
To run any of the tools mentioned, users must ensure that the
necessary software is installed on their system and added to the
PATH. There are several methods to verify if the required
tools/modules are installed. The easiest method is automatically
executed for users when they call the importWF function, or
just tryCL(<base_command>). In the print message of
importWF, all necessary tools and modules are automatically
listed and checked for users. For additional tool validation methods,
please refer to these instructions: Five Minute
Tutorial, Environment Modules, and Managing
Workflows.
This section presents various data analysis functionalities that are valuable for many workflows. Some of these functionalities are R functions, while others are CWL interfaces to widely used CL software. A few of them are included for historical reasons.
To work with the following examples a new workflow project needs to
be created. The below includes the overwrite=TRUE setting
to remove any already project directory.
The first step in the new workflow project is to load the
systemPipeR package.
Importantly, in order to use the individual appendStep
operations below, one has to pay attention to the step dependencies.
preprocessReads functionThe function preprocessReads allows to apply predefined
or custom read preprocessing functions to the FASTQ files referenced in
a SYSargsList container, such as quality filtering or
adapter trimming routines. Internally, preprocessReads uses
the FastqStreamer function from the ShortRead
package to stream through large FASTQ files in a memory-efficient
manner. The following example performs adapter trimming with the
trimLRPatterns function from the Biostrings
package.
In this step, the preprocessing parameters defined in the
corresponding *.pe.cwl and *.pe.yml files are
added to a previously created SAL object. This
preprocessing step is crucial for preparing the reads for further
analysis.
targetspath <- system.file("extdata", "targetsPE.txt", package = "systemPipeR")
appendStep(sal) <- SYSargsList(
step_name = "preprocessing",
targets = targetspath, dir = TRUE,
wf_file = "preprocessReads/preprocessReads-pe.cwl",
input_file = "preprocessReads/preprocessReads-pe.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = c(
FileName1 = "_FASTQ_PATH1_",
FileName2 = "_FASTQ_PATH2_",
SampleName = "_SampleName_"
),
dependency = c("load_SPR"))After the preprocessing step, the outfiles files can be
used to generate the new targets files containing the paths to the
trimmed FASTQ files. The new targets information can be used for the
next workflow step instance, e.g. running the NGS alignments
with the trimmed FASTQ files. The appendStep function is
automatically handling this connectivity between steps. Please check the
next step for more details.
The following example shows how one can design a custom
preprocessReads function. Here, it is possible to replace
the function used on the preprocessing step and modify the
corresponding sal object. Because it is a custom function,
it is necessary to save this part in the R object, and internally the
preprocessReads.doc.R script, that is stored in the
param directory of the workflow templates, is loading the
custom function. If the R object is saved with a different name (here
"param/customFCT.RData"), one has to adjust the
corresponding path in the preprocessReads.doc.R script.
First, the custom function is defined.
appendStep(sal) <- LineWise(
code = {
filterFct <- function(fq, cutoff = 20, Nexceptions = 0) {
qcount <- rowSums(as(quality(fq), "matrix") <= cutoff, na.rm = TRUE)
# Retains reads where Phred scores are >= cutoff with N exceptions
fq[qcount <= Nexceptions]
}
save(list = ls(), file = "param/customFCT.RData")
},
step_name = "custom_preprocessing_function",
dependency = "preprocessing"
)After this the input parameters can be edited as shown here.
TrimGalore! is a wrapper tool for Cutadapt and FastQC to consistently apply quality and adapter trimming to fastq files.
targetspath <- system.file("extdata", "targets.txt", package = "systemPipeR")
appendStep(sal) <- SYSargsList(step_name = "trimGalore",
targets = targetspath, dir = TRUE,
wf_file = "trim_galore/trim_galore-se.cwl",
input_file = "trim_galore/trim_galore-se.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = c(FileName = "_FASTQ_PATH1_", SampleName = "_SampleName_"),
dependency = "load_SPR",
run_step = "optional")Trimmomatic software (Bolger et al. 2014) performs a variety of useful trimming tasks for Illumina paired-end and single ended reads. The following is an example of how to perform this task.
targetspath <- system.file("extdata", "targets.txt", package = "systemPipeR")
appendStep(sal) <- SYSargsList(step_name = "trimmomatic",
targets = targetspath, dir = TRUE,
wf_file = "trimmomatic/trimmomatic-se.cwl",
input_file = "trimmomatic/trimmomatic-se.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = c(FileName = "_FASTQ_PATH1_", SampleName = "_SampleName_"),
dependency = "load_SPR",
run_step = "optional")The following seeFastq and seeFastqPlot
functions generate and plot a series of useful quality statistics for a
set of FASTQ files, including per cycle quality box plots, base
proportions, base-level quality trends, relative k-mer diversity,
length, and occurrence distribution of reads, number of reads above
quality cutoffs and mean quality distribution. The results are written
to a PDF file named fastqReport.pdf.
appendStep(sal) <- LineWise(code = {
fastq <- getColumn(sal, step = "preprocessing", "targetsWF", column = 1)
fqlist <- seeFastq(fastq = fastq, batchsize = 10000, klength = 8)
pdf("./results/fastqReport.pdf", height = 18, width = 4*length(fqlist))
seeFastqPlot(fqlist)
dev.off()
}, step_name = "fastq_report",
dependency = "preprocessing")After quality control, the sequence reads can be aligned to a reference genome or transcriptome. The following gives examples for running several NGS read aligners.
HISAT2The following steps demonstrate how to run the HISAT2
short read aligner (Kim et al. 2015) from
systemPipeR.
To use an NGS aligner, one has to first index the reference genome.
This is done below with hisat2-build.
appendStep(sal) <- SYSargsList(step_name = "hisat_index",
targets = NULL, dir = FALSE,
wf_file = "hisat2/hisat2-index.cwl",
input_file = "hisat2/hisat2-index.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = NULL,
dependency = "preprocessing")The parameter settings of the aligner are defined in the
workflow_hisat2-se.cwl and
workflow_hisat2-se.yml files. The following shows how to
append the alignment step to the sal workflow container. In
this step several post-processing steps with Samtools are
included to convert the SAM files, that were generated by
HISAT2, to indexed and sorted BAM files. Those sub-steps
are defined by the corresponding CWL workflow file (see
workflow_hisat2-se.cwl).
appendStep(sal) <- SYSargsList(step_name = "hisat_mapping",
targets = "preprocessing", dir = TRUE,
wf_file = "workflow-hisat2/workflow_hisat2-se.cwl",
input_file = "workflow-hisat2/workflow_hisat2-se.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars=c(FileName1="_FASTQ_PATH1_", SampleName="_SampleName_"),
dependency = c("hisat_index"),
run_session = "compute")Tophat2The Bowtie2/Tophat2 suite is the predecessor of
Hisat2 (Kim et al. 2013; Langmead
and Salzberg 2012). How to run it via CWL is shown below.
First, the reference genome has to be indexed for
Bowtie2.
appendStep(sal) <- SYSargsList(step_name = "bowtie_index",
targets = NULL, dir = FALSE,
wf_file = "bowtie2/bowtie2-index.cwl",
input_file = "bowtie2/bowtie2-index.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = NULL,
dependency = "preprocessing",
run_step = "optional")Next, the alignment step is constructed with the parameter files
workflow_tophat2-mapping.cwl and
tophat2-mapping-pe.yml.
appendStep(sal) <- SYSargsList(step_name = "tophat2_mapping",
targets = "preprocessing", dir = TRUE,
wf_file = "tophat2/workflow_tophat2-mapping-se.cwl",
input_file = "tophat2/tophat2-mapping-se.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars=c(preprocessReads_se="_FASTQ_PATH1_", SampleName="_SampleName_"),
dependency = c("bowtie_index"),
run_session = "remote",
run_step = "optional")Bowtie2The following example runs Bowtie2 by itself (without
Tophat2 or Hisat2).
appendStep(sal) <- SYSargsList(step_name = "bowtie2_mapping",
targets = "preprocessing", dir = TRUE,
wf_file = "bowtie2/workflow_bowtie2-mapping-se.cwl",
input_file = "bowtie2/bowtie2-mapping-se.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars=c(preprocessReads_se="_FASTQ_PATH1_", SampleName="_SampleName_"),
dependency = c("bowtie_index"),
run_session = "remote",
run_step = "optional")BWA-MEMThe following example runs BWA-MEM, an aligner that is widely used for VAR-Seq experiments.
First, the reference genome has to be indexed for
BWA-MEM.
appendStep(sal) <- SYSargsList(step_name = "bwa_index",
targets = NULL, dir = FALSE,
wf_file = "bwa/bwa-index.cwl",
input_file = "bwa/bwa-index.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = NULL,
dependency = "preprocessing",
run_step = "optional")Next, the reads can be aligned with BWA-MEM.
appendStep(sal) <- SYSargsList(step_name = "bwa_mapping",
targets = "preprocessing", dir = TRUE,
wf_file = "bwa/bwa-se.cwl",
input_file = "bwa/bwa-se.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars=c(preprocessReads_se="_FASTQ_PATH1_", SampleName="_SampleName_"),
dependency = c("bwa_index"),
run_session = "remote",
run_step = "optional")RsubreadRsubread is an R package for processing short and long
reads. It is well known for its fast and accurate mapping performance of
RNA-Seq reads.
First, the reference genome has to be indexed for
Rsubread.
appendStep(sal) <- SYSargsList(step_name = "rsubread_index",
targets = NULL, dir = FALSE,
wf_file = "rsubread/rsubread-index.cwl",
input_file = "rsubread/rsubread-index.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = NULL,
dependency = "preprocessing",
run_step = "optional")Next, the RNA-Seq reads can be aligned with
Rsubread.
appendStep(sal) <- SYSargsList(step_name = "rsubread",
targets = "preprocessing", dir = TRUE,
wf_file = "rsubread/rsubread-mapping-se.cwl",
input_file = "rsubread/rsubread-mapping-se.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars=c(FileName1="_FASTQ_PATH1_", SampleName="_SampleName_"),
dependency = c("rsubread_index"),
run_session = "compute",
run_step = "optional")gsnapThe gmapR package provides an interface to work with the
GSNAP and GMAP aligners from R (Wu and Nacu 2010).
First, the reference genome has to be indexed for
GSNAP.
appendStep(sal) <- SYSargsList(step_name = "gsnap_index",
targets = NULL, dir = FALSE,
wf_file = "gsnap/gsnap-index.cwl",
input_file = "gsnap/gsnap-index.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = NULL,
dependency = "preprocessing",
run_step = "optional")Next, the RNA-Seq reads are aligned with GSNAP.
appendStep(sal) <- SYSargsList(step_name = "gsnap",
targets = "targetsPE.txt", dir = TRUE,
wf_file = "gsnap/gsnap-mapping-pe.cwl",
input_file = "gsnap/gsnap-mapping-pe.yml",
dir_path = system.file("extdata/cwl", package = "systemPipeR"),
inputvars = c(FileName1 = "_FASTQ_PATH1_",
FileName2 = "_FASTQ_PATH2_", SampleName = "_SampleName_"),
dependency = c("gsnap_index"),
run_session = "remote",
run_step = "optional")The genome browser IGV supports reading of indexed/sorted BAM files
via web URLs. This way it can be avoided to create unnecessary copies of
these large files. To enable this approach, an HTML directory with https
access needs to be available in the user account (e.g.
home/.html) of a system. If this is not the case then the
BAM files need to be moved or copied to the system where IGV runs. In
the following, htmldir defines the path to the HTML
directory with https access where the symbolic links to the BAM files
will be stored. The corresponding URLs will be written to a text file
specified under the urlfile argument. To make the following
code work, users need to change the directory name (here
somedir/) and the username (here
<username>) to the corresponding names on their
system.
appendStep(sal) <- LineWise(
code = {
bampaths <- getColumn(sal, step = "hisat2_mapping", "outfiles",
column = "samtools_sort_bam")
symLink2bam(
sysargs = bampaths, htmldir = c("~/.html/", "somedir/"),
urlbase = "https://cluster.hpcc.ucr.edu/<username>/",
urlfile = "./results/IGVurl.txt")
},
step_name = "bam_IGV",
dependency = "hisat_mapping",
run_step = "optional"
)Reads overlapping with annotation ranges of interest are counted for
each sample using the summarizeOverlaps function (Lawrence et al. 2013).
First, the gene annotation ranges from a GFF file are stored in a
TxDb container for efficient work with genomic
features.
appendStep(sal) <- LineWise(code = {
library(txdbmaker)
txdb <- makeTxDbFromGFF(file="data/tair10.gff", format="gff",
dataSource="TAIR", organism="Arabidopsis thaliana")
saveDb(txdb, file="./data/tair10.sqlite")
},
step_name = "create_txdb",
dependency = "hisat_mapping")Next, The read counting is preformed for exonic gene regions in a non-strand-specific manner while ignoring overlaps among different genes.
appendStep(sal) <- LineWise({
library(BiocParallel)
txdb <- loadDb("./data/tair10.sqlite")
eByg <- exonsBy(txdb, by="gene")
outpaths <- getColumn(sal, step = "hisat_mapping", 'outfiles', column = 2)
bfl <- BamFileList(outpaths, yieldSize=50000, index=character())
multicoreParam <- MulticoreParam(workers=4); register(multicoreParam); registered()
counteByg <- bplapply(bfl, function(x) summarizeOverlaps(eByg, x, mode="Union",
ignore.strand=TRUE,
inter.feature=TRUE,
singleEnd=TRUE))
# Note: for strand-specific RNA-Seq set 'ignore.strand=FALSE' and for PE data set 'singleEnd=FALSE'
countDFeByg <- sapply(seq(along=counteByg),
function(x) assays(counteByg[[x]])$counts)
rownames(countDFeByg) <- names(rowRanges(counteByg[[1]]))
colnames(countDFeByg) <- names(bfl)
rpkmDFeByg <- apply(countDFeByg, 2, function(x) returnRPKM(counts=x, ranges=eByg))
write.table(countDFeByg, "results/countDFeByg.xls",
col.names=NA, quote=FALSE, sep="\t")
write.table(rpkmDFeByg, "results/rpkmDFeByg.xls",
col.names=NA, quote=FALSE, sep="\t")
},
step_name = "read_counting",
dependency = "create_txdb")Please note, in addition to read counts this step generates RPKM
normalized expression values. For most statistical differential
expression or abundance analysis methods, such as edgeR or
DESeq2, the raw count values should be used as input. The
usage of RPKM values should be restricted to specialty applications
required by some users, e.g. manually comparing the expression
levels of different genes or features.
The following provides an overview of the number of reads in each sample and how many of them aligned to the reference.
appendStep(sal) <- LineWise({
read_statsDF <- alignStats(args)
write.table(read_statsDF, "results/alignStats.xls",
row.names = FALSE, quote = FALSE, sep = "\t")
},
step_name = "align_stats",
dependency = "hisat_mapping")The following shows the first four lines of the sample alignment
stats file provided by the systemPipeR package. For
simplicity the number of PE reads is multiplied here by 2 to approximate
proper alignment frequencies where each read in a pair is counted.
## FileName Nreads2x Nalign Perc_Aligned Nalign_Primary Perc_Aligned_Primary
## 1 M1A 192918 177961 92.24697 177961 92.24697
## 2 M1B 197484 159378 80.70426 159378 80.70426
## 3 A1A 189870 176055 92.72397 176055 92.72397
## 4 A1B 188854 147768 78.24457 147768 78.24457
Example of downloading a GFF file for miRNA ranges from an organism of interest (here A. thaliana), and then use them for read counting, here RNA-Seq reads from the above steps.
appendStep(sal) <- LineWise({
system("wget https://www.mirbase.org/download/ath.gff3 -P ./data/")
gff <- rtracklayer::import.gff("./data/ath.gff3")
gff <- split(gff, elementMetadata(gff)$ID)
bams <- getColumn(sal, step = "bowtie2_mapping", 'outfiles', column = 2)
bfl <- BamFileList(bams, yieldSize=50000, index=character())
countDFmiR <- summarizeOverlaps(gff, bfl, mode="Union",
ignore.strand = FALSE, inter.feature = FALSE)
countDFmiR <- assays(countDFmiR)$counts
# Note: inter.feature=FALSE important since pre and mature miRNA ranges overlap
rpkmDFmiR <- apply(countDFmiR, 2, function(x) returnRPKM(counts = x, ranges = gff))
write.table(assays(countDFmiR)$counts, "results/countDFmiR.xls",
col.names=NA, quote=FALSE, sep="\t")
write.table(rpkmDFmiR, "results/rpkmDFmiR.xls", col.names=NA, quote=FALSE, sep="\t")
},
step_name = "read_counting_mirna",
dependency = "bowtie2_mapping")The following computes the sample-wise Spearman correlation
coefficients from the rlog (regularized-logarithm)
transformed expression values generated with the DESeq2
package. After transformation to a distance matrix, hierarchical
clustering is performed with the hclust function and the
result is plotted as a dendrogram.
appendStep(sal) <- LineWise({
library(DESeq2, warn.conflicts=FALSE, quietly=TRUE)
library(ape, warn.conflicts=FALSE)
countDFpath <- system.file("extdata", "countDFeByg.xls", package="systemPipeR")
countDF <- as.matrix(read.table(countDFpath))
colData <- data.frame(row.names = targetsWF(sal)[[2]]$SampleName,
condition=targetsWF(sal)[[2]]$Factor)
dds <- DESeqDataSetFromMatrix(countData = countDF, colData = colData,
design = ~ condition)
d <- cor(assay(rlog(dds)), method = "spearman")
hc <- hclust(dist(1-d))
plot.phylo(as.phylo(hc), type = "p", edge.col = 4, edge.width = 3,
show.node.label = TRUE, no.margin = TRUE)
},
step_name = "sample_tree_rlog",
dependency = "read_counting")rlog values.
edgeRThe following run_edgeR function is a
convenience wrapper for identifying differentially expressed genes
(DEGs) in batch mode with edgeR’s GML method (Robinson et al. 2010) for any number of
pairwise sample comparisons specified under the
cmp argument. Users are strongly encouraged to
consult the edgeR
vignette for more detailed information on this topic and how to properly
run edgeR on data sets with more complex
experimental designs.
appendStep(sal) <- LineWise({
targetspath <- system.file("extdata", "targets.txt", package = "systemPipeR")
targets <- read.delim(targetspath, comment = "#")
cmp <- readComp(file = targetspath, format = "matrix", delim = "-")
countDFeBygpath <- system.file("extdata", "countDFeByg.xls", package = "systemPipeR")
countDFeByg <- read.delim(countDFeBygpath, row.names = 1)
edgeDF <- run_edgeR(countDF = countDFeByg, targets = targets, cmp = cmp[[1]],
independent = FALSE, mdsplot = "")
DEG_list <- filterDEGs(degDF = edgeDF, filter = c(Fold = 2, FDR = 10))
},
step_name = "edger",
dependency = "read_counting")Filter and plot DEG results for up and down-regulated genes. Because
of the small size of the toy data set used by this vignette, the
FDR cutoff value has been set to a relatively high threshold
(here 10%). More commonly used FDR cutoffs are 1% or 5%. The
definition of ‘up’ and ‘down’ is given in the
corresponding help file. To open it, type ?filterDEGs in
the R console.
edgeR.
DESeq2The following run_DESeq2 function is a convenience
wrapper for identifying DEGs in batch mode with DESeq2
(Love et al. 2014) for any number of
pairwise sample comparisons specified under the cmp
argument. Users are strongly encouraged to consult the DESeq2
vignette for more detailed information on this topic and how to properly
run DESeq2 on data sets with more complex experimental
designs.
The function overLapper can compute Venn intersects for
large numbers of sample sets (up to 20 or more) and
vennPlot can plot 2-5 way Venn diagrams. A useful feature
is the possibility to combine the counts from several Venn comparisons
with the same number of sample sets in a single Venn diagram (here for 4
up and down DEG sets).
appendStep(sal) <- LineWise({
vennsetup <- overLapper(DEG_list$Up[6:9], type="vennsets")
vennsetdown <- overLapper(DEG_list$Down[6:9], type="vennsets")
vennPlot(list(vennsetup, vennsetdown), mymain="", mysub="",
colmode=2, ccol=c("blue", "red"))
},
step_name = "vennplot",
dependency = "edger")The following shows how to obtain gene-to-GO mappings from
biomaRt (here for A. thaliana) and how to organize
them for the downstream GO term enrichment analysis. Alternatively, the
gene-to-GO mappings can be obtained for many organisms from
Bioconductor’s *.db genome annotation packages or GO
annotation files provided by various genome databases. For each
annotation, this relatively slow preprocessing step needs to be
performed only once. Subsequently, the preprocessed data can be loaded
with the load function as shown in the next step.
appendStep(sal) <- LineWise({
library("biomaRt")
listMarts() # To choose BioMart database
listMarts(host="plants.ensembl.org")
m <- useMart("plants_mart", host="https://plants.ensembl.org")
listDatasets(m)
m <- useMart("plants_mart", dataset="athaliana_eg_gene", host="https://plants.ensembl.org")
listAttributes(m) # Choose data types you want to download
go <- getBM(attributes=c("go_id", "tair_locus", "namespace_1003"), mart=m)
go <- go[go[,3]!="",]; go[,3] <- as.character(go[,3])
go[go[,3]=="molecular_function", 3] <- "F"
go[go[,3]=="biological_process", 3] <- "P"
go[go[,3]=="cellular_component", 3] <- "C"
go[1:4,]
dir.create("./data/GO")
write.table(go, "data/GO/GOannotationsBiomart_mod.txt",
quote=FALSE, row.names=FALSE, col.names=FALSE, sep="\t")
catdb <- makeCATdb(myfile="data/GO/GOannotationsBiomart_mod.txt",
lib=NULL, org="", colno=c(1,2,3), idconv=NULL)
save(catdb, file="data/GO/catdb.RData")
},
step_name = "get_go_biomart",
dependency = "edger")Apply the enrichment analysis to the DEG sets obtained in the above
differential expression analysis. Note, in the following example the
FDR filter is set here to an unreasonably high value, simply
because of the small size of the toy data set used in this vignette.
Batch enrichment analysis of many gene sets is performed with the
GOCluster_Report function. When method="all",
it returns all GO terms passing the p-value cutoff specified under the
cutoff arguments. When method="slim", it
returns only the GO terms specified under the myslimv
argument. The given example shows how one can obtain such a GO slim
vector from BioMart for a specific organism.
appendStep(sal) <- LineWise({
load("data/GO/catdb.RData")
DEG_list <- filterDEGs(degDF=edgeDF, filter=c(Fold=2, FDR=50), plot=FALSE)
up_down <- DEG_list$UporDown; names(up_down) <- paste(names(up_down), "_up_down", sep="")
up <- DEG_list$Up; names(up) <- paste(names(up), "_up", sep="")
down <- DEG_list$Down; names(down) <- paste(names(down), "_down", sep="")
DEGlist <- c(up_down, up, down)
DEGlist <- DEGlist[sapply(DEGlist, length) > 0]
BatchResult <- GOCluster_Report(catdb=catdb, setlist=DEGlist, method="all",
id_type="gene", CLSZ=2, cutoff=0.9,
gocats=c("MF", "BP", "CC"), recordSpecGO=NULL)
library("biomaRt")
m <- useMart("plants_mart", dataset="athaliana_eg_gene", host="https://plants.ensembl.org")
goslimvec <- as.character(getBM(attributes=c("goslim_goa_accession"), mart=m)[,1])
BatchResultslim <- GOCluster_Report(catdb=catdb, setlist=DEGlist, method="slim",
id_type="gene", myslimv=goslimvec, CLSZ=10,
cutoff=0.01, gocats=c("MF", "BP", "CC"),
recordSpecGO=NULL)
gos <- BatchResultslim[grep("M6-V6_up_down", BatchResultslim$CLID), ]
gos <- BatchResultslim
pdf("GOslimbarplotMF.pdf", height=8, width=10); goBarplot(gos, gocat="MF"); dev.off()
goBarplot(gos, gocat="BP")
goBarplot(gos, gocat="CC")
},
step_name = "go_enrichment",
dependency = "get_go_biomart")The data.frame generated by
GOCluster_Report can be plotted with the
goBarplot function. Because of the variable size of the
sample sets, it may not always be desirable to show the results from
different DEG sets in the same bar plot.
The following example performs hierarchical clustering on the
rlog transformed expression matrix subsetted by the DEGs
identified in the above differential expression analysis. It uses a
Pearson correlation-based distance measure and complete linkage for
cluster joining.
appendStep(sal) <- LineWise({
library(pheatmap)
geneids <- unique(as.character(unlist(DEG_list[[1]])))
y <- assay(rlog(dds))[geneids, ]
pdf("heatmap1.pdf")
pheatmap(y, scale="row", clustering_distance_rows="correlation",
clustering_distance_cols="correlation")
dev.off()
},
step_name = "hierarchical_clustering",
dependency = c("sample_tree_rlog", "edger"))## R version 4.6.0 (2026-04-24)
## Platform: x86_64-pc-linux-gnu
## Running under: Ubuntu 24.04.4 LTS
##
## Matrix products: default
## BLAS: /usr/lib/x86_64-linux-gnu/openblas-pthread/libblas.so.3
## LAPACK: /usr/lib/x86_64-linux-gnu/openblas-pthread/libopenblasp-r0.3.26.so; LAPACK version 3.12.0
##
## locale:
## [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C LC_TIME=en_US.UTF-8
## [4] LC_COLLATE=en_US.UTF-8 LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8
## [7] LC_PAPER=en_US.UTF-8 LC_NAME=C LC_ADDRESS=C
## [10] LC_TELEPHONE=C LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C
##
## time zone: Etc/UTC
## tzcode source: system (glibc)
##
## attached base packages:
## [1] stats4 stats graphics grDevices utils datasets methods base
##
## other attached packages:
## [1] magrittr_2.0.5 systemPipeR_2.19.0 ShortRead_1.71.0
## [4] GenomicAlignments_1.49.0 SummarizedExperiment_1.43.0 Biobase_2.73.1
## [7] MatrixGenerics_1.25.0 matrixStats_1.5.0 BiocParallel_1.47.0
## [10] Rsamtools_2.29.0 Biostrings_2.81.2 XVector_0.53.0
## [13] GenomicRanges_1.65.0 IRanges_2.47.2 S4Vectors_0.51.3
## [16] Seqinfo_1.3.0 BiocGenerics_0.59.6 generics_0.1.4
## [19] BiocStyle_2.41.0
##
## loaded via a namespace (and not attached):
## [1] gtable_0.3.6 xfun_0.57 bslib_0.11.0 hwriter_1.3.2.1
## [5] ggplot2_4.0.3 htmlwidgets_1.6.4 latticeExtra_0.6-31 lattice_0.22-9
## [9] crosstalk_1.2.2 vctrs_0.7.3 tools_4.6.0 bitops_1.0-9
## [13] parallel_4.6.0 tibble_3.3.1 pkgconfig_2.0.3 Matrix_1.7-5
## [17] RColorBrewer_1.1-3 S7_0.2.2 cigarillo_1.3.0 lifecycle_1.0.5
## [21] stringr_1.6.0 compiler_4.6.0 farver_2.1.2 deldir_2.0-4
## [25] textshaping_1.0.5 codetools_0.2-20 htmltools_0.5.9 sys_3.4.3
## [29] buildtools_1.0.0 sass_0.4.10 yaml_2.3.12 pillar_1.11.1
## [33] crayon_1.5.3 jquerylib_0.1.4 DT_0.34.0 DelayedArray_0.39.3
## [37] cachem_1.1.0 abind_1.4-8 tidyselect_1.2.1 digest_0.6.39
## [41] stringi_1.8.7 dplyr_1.2.1 labeling_0.4.3 maketools_1.3.2
## [45] fastmap_1.2.0 grid_4.6.0 cli_3.6.6 SparseArray_1.13.2
## [49] S4Arrays_1.13.0 withr_3.0.2 scales_1.4.0 rmarkdown_2.31
## [53] pwalign_1.9.1 jpeg_0.1-11 interp_1.1-6 otel_0.2.0
## [57] png_0.1-9 kableExtra_1.4.0 evaluate_1.0.5 knitr_1.51
## [61] viridisLite_0.4.3 rlang_1.2.0 Rcpp_1.1.1-1.1 glue_1.8.1
## [65] xml2_1.5.2 BiocManager_1.30.27 svglite_2.2.2 rstudioapi_0.18.0
## [69] jsonlite_2.0.0 R6_2.6.1 systemfonts_1.3.2
This project is funded by awards from the National Science Foundation (ABI-1661152], and the National Institute on Aging of the National Institutes of Health (U19AG023122).
targets filecwl, yml and targets