Skip to main content

Browse the archive

Revision 6298a5601cc5b84f812a66d95dd5361bb5d8b4f9 authored by Vladislav Kamenev on 13 August 2018, 14:20:47 UTC, committed by Vladislav Kamenev on 13 August 2018, 14:20:47 UTC 
Another JS version report
1 parent 94ca5d1
Raw File
calculatedAnnotation.R 
#' Create calculated annotation
#'
#' \code{calculatedAnnotation} adds a column calculated by operation
#'
#' @param es ExpressionSet object.
#'
#' @param operation Name of the operation to perform calculation
#'
#' @import Biobase
#'

calculatedAnnotation <- function (es, operation) {
    fn <- tolower(operation)
    fData(es)[[operation]] <- apply(exprs(es), 1, fn)
    assign("es", es, envir = parent.frame())

}
back to top