#' Random feature selection
#'
#' Perform feature selection on a single-cell feature matrix (e.g., gene
#' expression) by randomly removing a specified proportion of features.
#'
#' @param mat a single-cell matrix to be filtered, with features (genes) in rows
#' and cells in columns
#' @param feature_perc percentage of features (genes) chosen at random following
#' the technical variance filter
#'
#' @return the filtered matrix (or, if \code{feature_perc == 1}, the input
#' matrix)
#'
#' @importFrom magrittr %<>% extract
#' @export
select_random = function(mat, feature_perc = 0.5) {
if (feature_perc < 1) {
features = rownames(mat)
keep = sample(features, floor(nrow(mat) * feature_perc))
mat %<>% extract(keep, )
}
return(mat)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.