In abrionne/ViSEAGO: ViSEAGO: Easier data mining of biological functions organized into clusters using Gene Ontology and semantic similarity

###################
# koad ViSEAGO
library(ViSEAGO)

###################
# knitr document options
knitr::opts_chunk$set(
  eval=FALSE,echo=TRUE,fig.pos = 'H',
  fig.width=8,message=FALSE,comment=NA,warning=FALSE
)

Introduction{-}

The main objective of ViSEAGO workflow is to carry out a data mining of biological functions and establish links between genes involved in the study. We developed ViSEAGO in R to facilitate functional Gene Ontology (GO) analysis of complex experimental design with multiple comparisons of interest. It allows to study large-scale datasets together and visualize GO profiles to capture biological knowledge. It stands for three major concepts: Visualization, Semantic similarity and Enrichment Analysis of Gene Ontology. It provides access to the last current GO annotations, which are retrieved from one of NCBI EntrezGene, Ensembl or Uniprot databases for available species. ViSEAGO extends classical functional GO analysis to focus on functional coherence by aggregating closely related biological themes while studying multiple datasets at once. It provides both a synthetic and detailed view using interactive functionalities respecting the GO graph structure and ensuring functional coherence supplied by semantic similarity. ViSEAGO has been successfully applied on several datasets from different species with a variety of biological questions. Results can be easily shared between bioinformaticians and biologists, enhancing reporting capabilities while maintaining reproducibility.

package diagram {-}

ViSEAGO is like a workflow with input lists of genes and associated genomic resources in order to perform enrichment tests, followed by a clustering of GO terms based on theirs semantic similarity. Most of outputs (tables and graphs) could be visualized in static or interactive mode.

r system.file("extdata/","workflow.png",package="ViSEAGO") alt="workflow" style="width:100%;height:100%;"/>

Installation{-}

Firtsly, install the r BiocStyle::Biocpkg("ViSEAGO") R package from Bioconductor, or ForgeMIA gitlab.

###################
# load ViSEAGO package from Bioconductor
BiocManager::install("ViSEAGO")

###################
# load ViSEAGO package from gitLab
remotes::install_gitlab(
    "umr-boa/viseago",
    host = "forgemia.inra.fr",
    build_opts = c("--no-resave-data","--no-manual")
)

NB: This vignette is not runnable and provide a pseudo-code to illustrate ViSEAGO package capabilities.

Genes of interest

Firstly, you need to provide the gene background (= expressed genes) and selection files.

###################
# load genes background
background<-scan(
    "background.txt",
    quiet=TRUE,
    what=""
)

###################
# load gene selection
selection<-scan(
    "selection.txt",
    quiet=TRUE,
    what=""
)

GO annotation of genes

The Gene Ontology (GO) is a community-based bioinformatics resource that supplies information about gene product function using ontologies to represent biological knowledge @pmid25428369.

Currently, the 3 predominant genomic ressources are EntrezGene @pmid25355515, Ensembl @pmid27899575, and Uniprot-GOA @pmid25378336. Furthermore, an easy access with the R langage @R to some genomic GO annotations from EntrezGene is available using Bioconductor @pmid25633503 org.xx.eg.db databases. However, there are important differences between supported species, and corresponding genes knowledge according to database used. This has necessary an impact on GO annotations and enrichment and downstream analyses.

More precisely, since December 2006, the GOA and Ensembl Compara teams have used the gene orthology data obtained from Ensembl Compara to project GO terms from a source species onto one or more target species. For this pipeline, only one to one and apparent one to one orthologies are used, and only manually annotated GO terms with an experimental evidence type of either EXP, IDA, IEP, IGI, IMP or IPI are projected. GO annotations created using this technique receive the evidence code 'IEA' (Inferred from Electronic Annotation).

A similar approach for EntrezGene database and with the orthologs_groups @pmid24063302 from the NCBI annotation pipeline. This method is available using the ViSEAGO::annotate(id,EntrezGene,ortholog = TRUE).

The easy access to GO annotations for all the availables species from these databases are provided by:

###################
# connect to Bioconductor
Bioconductor<-ViSEAGO::Bioconductor2GO()

###################
# connect to EntrezGene
EntrezGene<-ViSEAGO::EntrezGene2GO()

###################
# connect to Ensembl
Ensembl<-ViSEAGO::Ensembl2GO()

###################
# connect to Uniprot-GOA
Uniprot<-ViSEAGO::Uniprot2GO()

###################
# connect to Custom file
Custom<-ViSEAGO::Custom2GO(system.file("extdata/customfile.txt",package = "ViSEAGO"))

In order to know if your target species is supported by the database, we can display the available organisms in an interactive table using ViSEAGO::available_organisms method. The organism key identifiant is always displayed in the first column of the table.

###################
# Display table of available organisms with Bioconductor
ViSEAGO::available_organisms(Bioconductor)

###################
# Display table of available organisms with EntrezGene
ViSEAGO::available_organisms(EntrezGene)

###################
# Display table of available organisms with Ensembl
ViSEAGO::available_organisms(Ensembl)

###################
# Display table of available organisms with Uniprot
ViSEAGO::available_organisms(Uniprot)

###################
# Display table of available organisms with Custom
ViSEAGO::available_organisms(Custom)

At this step, we need to provide the organism key identifiant based on the genomic ressource used (Bioconductor, EntrezGene, Ensembl, or Uniprot), in order to extract and store the species GO annotations using ViSEAGO::annotate() method.

###################
# load GO annotations from Bioconductor
myGENE2GO<-ViSEAGO::annotate(
    "bioconductor_id",
    Bioconductor
)

###################
# load GO annotations from EntrezGene
myGENE2GO<-ViSEAGO::annotate(
    "EntrezGene_id",
    EntrezGene
)

###################
# load GO annotations from EntrezGene
# with the add of GO annotations from orthologs genes (see above)
myGENE2GO<-ViSEAGO::annotate(
    "EntrezGene_id",
    EntrezGene,
    ortholog = TRUE
)

###################
# load GO annotations from Ensembl
myGENE2GO<-ViSEAGO::annotate(
    "Ensembl_id",
    Ensembl
)

###################
# load GO annotations from Uniprot
myGENE2GO<-ViSEAGO::annotate(
    "Uniprot_id",
    Uniprot
)

###################
# load GO annotations from Custom
myGENE2GO<-ViSEAGO::annotate(
    "Custom_id",
    Custom
)

Functionnal GO enrichment

GO enrichment tests

The GO terms enrichment tests are performed with the r BiocStyle::Biocpkg("topGO") package @pmid16606683, which support several algorithms that improve GO group scoring using the underlying GO graph topology.

First, we create a topGOdata object, using ViSEAGO::create_topGOdata method, with inputs as: genes selection, genes background, GO terms category used (MF, BP, or CC), and minimum of annotated genes by GO terms (nodeSize).

###################
# create topGOdata for BP
BP<-ViSEAGO::create_topGOdata(
    geneSel=selection,
    allGenes=background,
    gene2GO=myGENE2GO, 
    ont="BP",
    nodeSize=5
)

Now, we perform the GO enrichment tests for BP category with Fisher's exact test with one of the four available algorithms (classic, elim, weight, and weight01) using topGO::runTest method.

###################
# perform TopGO test using clasic algorithm
classic<-topGO::runTest(
    BP,
    algorithm ="classic",
    statistic = "fisher"
)

NB: p-values of GO terms are not adjusted and considered significant below 0.01 (see r BiocStyle::Biocpkg("topGO") vignette).

Combine enriched GO terms

We combine results of enrichment tests into an object using ViSEAGO::merge_enrich_terms method. A table of enriched GO terms in at least one comparison is displayed in interactive mode, or printed in a file using ViSEAGO::show_table method. The printed table contains for each enriched GO terms, additional columns including the list of significant genes and frequency (ratio of number of significant genes to number of background genes) evaluated by comparison.

###################
# merge results
BP_sResults<-ViSEAGO::merge_enrich_terms(
    Input=list(
        condition=c("BP","classic")
    )
)

###################
# display the merged table
ViSEAGO::show_table(BP_sResults)

###################
# print the merged table in a file
ViSEAGO::show_table(
    BP_sResults,
    "BP_sResults.xls"
)

Graphs of GO enrichment tests

Several graphs summarize important features. An interactive barchart showing the number of GO terms enriched or not in each comparison, using ViSEAGO::GOcount method. Intersections of lists of enriched GO terms between comparisons are displayed in an Upset plot using ViSEAGO::Upset method.

###################           
# count significant (or not) pvalues by condition
ViSEAGO::GOcount(BP_sResults)

###################           
# display interactions
ViSEAGO::Upset(
    BP_sResults,
    file="OLexport.xls"
)

GO terms Semantic Similarity

GO annotations of genes created at a previous step and enriched GO terms are combined using ViSEAGO::build_GO_SS method. The Semantic Similarity (SS) between enriched GO terms are calculated using ViSEAGO::compute_SS_distances method which is a wrapper of functions implemented in the r BiocStyle::Biocpkg("GOSemSim") package @pmid20179076. Among the SS algorithms between GO terms, 4 of them use information content (IC) of a GO term which is computed by the negative log probability of the term occurring in GO corpus. A rarely used term contains a greater amount of information. These IC-based mehods are Resnik, Lin, Rel, and Jiang. A Graph-based method, using the topology of GO graph structure to compute semantic similarity is also available with the Wang method. The built object myGOs contains all informations of enriched GO terms and computed SS distances between them.

###################        
# initialyse 
myGOs<-ViSEAGO::build_GO_SS(
    gene2GO=myGENE2GO,
    enrich_GO_terms=BP_sResults
)

###################           
# compute all available Semantic Similarity (SS) measures
myGOs<-ViSEAGO::compute_SS_distances(
    myGOs,
    distance="Wang"
)

Visualization and interpretation of enriched GO terms

Multi Dimensional Scaling of GO terms - A preview

A Multi Dimensional Scale (MDS) plot with ViSEAGO::MDSplot method provides a representation of distances among a set of enriched GO terms on the two first dimensions. Some patterns could appear at this time and could be investigated in an interactive mode. The plot could be also printed in a png file.

###################           
# display MDSplot
ViSEAGO::MDSplot(myGOs)

###################           
# print MDSplot
ViSEAGO::MDSplot(
    myGOs,
    file="mdsplot1.png"
)

Clustering heatmap of GO terms

To fully explore the results of this functional analysis, a hierarchical clustering method using ViSEAGO::GOterms_heatmap is performed based on one of SS distances (i.e Wang) between the enriched GO terms and a chosen aggregation criteria (i.e ward.D2).

Clusters of enriched GO terms are obtained by cutting branches off the dendrogram. Here, we choose a dynamic branch cutting method based on the shape of clusters using r BiocStyle::CRANpkg("dynamicTreeCut") [@pmid18024473; @dynamicTreeCut]. It builds clusters in a bottom top manner in two steps. In step 1, branches that satisfy specific criteria for being clusters, based on the merging information of the dendrogram, are detected. A simple control of the relative sensitivity to cluster splitting is provided in the parameter deepSplit (The higher the value, the more and smaller clusters will be produced), and the minimum cluster size with minClusterSize. In step 2, all previously unassigned objects are tested for sufficient proximity to clusters detected in the first step using a modified Partitioning Around Medoids (PAM). If the closest cluster is close enough in a precise sense that we define below, the object is assigned to that cluster. The PAM stage will be performed using pamStage=TRUE parameter, and respect the dendrogram using pamRespectsDendro=TRUE parameter, in the sense an object can be PAM-assigned only to clusters that lie below it on the branch that the object is merged into.

Enriched GO terms are ranked in a dendrogram as a result of a hierarchical clustering and colored depending on their cluster assignation. Additional illustrations are displayed: the GO description of GO terms (trimmed if more than 50 characters), a heatmap of -log10(pvalue) of enrichment test for each comparison, and optionally the Information Content (IC). The illustration is displayed with ViSEAGO::show_heatmap method.

##################           
# GOterms heatmap with the default parameters
Wang_clusters_wardD2<-ViSEAGO::GOterms_heatmap(
    myGOs,
    showIC=TRUE,
    showGOlabels=TRUE,
    GO.tree=list(
        tree=list(
            distance="Wang",
            aggreg.method="ward.D2"
        ),
        cut=list(
            dynamic=list(
                pamStage=TRUE,
                pamRespectsDendro=TRUE,
                deepSplit=2,
                minClusterSize =2
            )
        )
    ),
    samples.tree=NULL
)

###################           
# Display the clusters-heatmap
ViSEAGO::show_heatmap(
    Wang_clusters_wardD2,
    "GOterms"
)

###################    
# print the clusters-heatmap
ViSEAGO::show_heatmap(
    Wang_clusters_wardD2,
    "GOterms",
    "cluster_heatmap_Wang_wardD2.png"
)

A table of enriched GO terms in at least one of the comparison is displayed in interactive mode, or printed in a file using ViSEAGO::show_table method. The columns GO cluster number and IC value are added to the previous table of enriched terms table. The printed table contains for each enriched GO terms, additional columns including the list of significant genes and frequency (ratio between the number of significant genes and number of background genes in a specific GO tag) evaluated by comparison.

###################           
# Display the clusters-heatmap table
ViSEAGO::show_table(Wang_clusters_wardD2)

###################           
# Print the clusters-heatmap table
ViSEAGO::show_table(
    Wang_clusters_wardD2,
    "cluster_heatmap_Wang_wardD2.xls"
)

Multi Dimensional Scaling of GO terms

We also display a Multi Dimensional Scale (MDS) plot with the overlay of GO terms clusters from Wang_clusters_wardD2 object with ViSEAGO::MDSplot method. It is a way to check the coherence of GO terms clusters on the MDS plot.

###################           
# display colored MDSplot
ViSEAGO::MDSplot(
    Wang_clusters_wardD2,
    "GOterms"
)

###################           
# print colored MDSplot
ViSEAGO::MDSplot(
    Wang_clusters_wardD2,
    "GOterms",
    file="mdsplot2.png"
)

Visualization and interpretation of GO clusters

This part is dedicated to explore relationships between clusters of GO terms defined by the last hierarchical clustering with ViSEAGO::GOterms_heatmap method. This analysis should be conducted if the number of clusters of GO terms is large enough and therefore difficult to investigate.

Compute semantic similiarity between GO clusters

A Semantic Similarity (SS) between clusters of GO terms, previously defined, are calculated using ViSEAGO::compute_SS_distances method. The availables SS algorithms between GO terms clusters, implemented in the r BiocStyle::Biocpkg("GOSemSim") package @pmid20179076, could be max, average, rcmax, or BMA.

A colored Multi Dimensional Scale (MDS) plot with ViSEAGO::MDSplot method provides a representation of distances between the clusters of GO terms. Each circle represents a cluster of GO terms and its size depends on the number of GO terms that it contains. Clusters of GO terms that are close should share a functional coherence.

###################           
# calculate semantic similarites between clusters of GO terms
Wang_clusters_wardD2<-ViSEAGO::compute_SS_distances(
    Wang_clusters_wardD2,
    distance=c("max", "avg","rcmax", "BMA")
)

###################           
# build and highlight in an interactive MDSplot grouped clusters for one distance object
ViSEAGO::MDSplot(
    Wang_clusters_wardD2,
    "GOclusters"
)

###################           
# build and highlight in MDSplot grouped clusters for one distance object
ViSEAGO::MDSplot(
    Wang_clusters_wardD2,
    "GOclusters",
    file="mdsplot3.png"
)

GO clusters semantic similarities heatmap

A new hierarchical clustering using ViSEAGO::GOclusters_heatmap is performed based on one of the SS distance (i.e. BMA) between the clusters of GO terms, previously computed, and a chosen aggregation criteria (i.e ward.D2).

Clusters of GO terms are ranked in a dendrogram and branches are colored depending on the cluster assignation. Additional illustrations are displayed: definition of the cluster of GO terms corresponds to the first common GO term ancestor followed by the cluster label in brackets, and heatmap of GO terms count from the corresponding cluster. The illustration is displayed with ViSEAGO::show_heatmap method.

###################
# GOclusters heatmap
Wang_clusters_wardD2<-ViSEAGO::GOclusters_heatmap(
    Wang_clusters_wardD2,
    tree=list(
        distance="BMA",
        aggreg.method="ward.D2"
    )
)

###################           
# sisplay the GOClusters heatmap
ViSEAGO::show_heatmap(
    Wang_clusters_wardD2,
    "GOclusters"
)

###################           
# print the GOClusters heatmap in a file
ViSEAGO::show_heatmap(
    Wang_clusters_wardD2,
    "GOclusters",
    "Wang_clusters_wardD2_heatmap_groups.png"
)

Conclusion

A complete functional Gene Ontology (GO) enrichment analysis can be performed using r BiocStyle::Biocpkg("ViSEAGO") package. It facilitates the interpretation of biological processes, functions, or cellular component involved in the study. It provides both a synthetic and detailed view using interactive functionalities respecting GO graph structure and ensuring functional coherence. Also, comparisons of enrichment can be made on large datasets and for complex experimental designs, such as explained in mouse mammary gland status comparison example (see utils::vignette("2_mouse_bionconductor",package ="ViSEAGO")). Moreover, we can explore the effect of the GO semantic similarity algorithms on the tree structure, such as illustrate in the clustering comparions example (seevignette("3_SS_choice",package ="ViSEAGO")).

Information session{-}

version

References{-}

abrionne/ViSEAGO documentation built on June 13, 2019, 2:27 p.m.