Revision 500631814632f21a69721751d7edfdcb4ce3896a authored by Alexey Sergushichev on 01 August 2018, 18:18:39 UTC, committed by Alexey Sergushichev on 01 August 2018, 18:18:39 UTC
1 parent 2f41a12
subsetES.R
#' Subsets es, if rows or columns are not specified, all are retained
#' @param es ExpressionSet object.#'
#' @param columns List of specified columns' indices (optional), indices start from 0#'
#' @param rows List of specified rows' indices (optional), indices start from 0
#' @return new expression set `es`
#'
#'
subsetES <- function(es, columns = c(), rows=c()) {
rows <- getIndicesVector(rows, nrow(exprs(es)))
columns <- getIndicesVector(columns, ncol(exprs(es)))
es <- es[rows, columns]
assign("es", es, envir = parent.frame())
}
![swh spinner](/static/img/swh-spinner.gif)
Computing file changes ...