R/down.r

In biomics-pasteur-fr/RNADiff: R Tools for RNA-Seq Projects at Institut Pasteur (Biomics Platform)

#' Extract down-regulated features from a table of results
#'
#' Extract down-regulated features from a table of results
#'
#' @param complete an element of the list created by of \code{exportComplete.DESeq2()} or \code{exportComplete.DESeq2()}
#' @param alpha significance threshold to apply to the adjusted p-values
#' @return A \code{data.frame} containing the results of the differential analysis (counts, FC, log2FC, p-value, etc.) for the down-regulated features
#' @author Hugo Varet

# created Nov 18th, 2014

down <- function(complete, alpha=0.05){
  if (!is.null(complete$betaConv)){
    down <- complete[which(complete$padj <= alpha & complete$betaConv & complete$log2FoldChange<=0),]
  } else{
    down <- complete[which(complete$padj <= alpha & complete$log2FoldChange<=0),]
  }
  down <- down[order(down$padj),]
  down
}