Commit 6b129f99 authored by Ilya Korsunsky's avatar Ilya Korsunsky
Browse files

fixed some bugs

parent b1a09bdd

DESCRIPTION

+3 −1
Original line number Diff line number Diff line
@@ -25,7 +25,9 @@ Imports: 
    rlang,

    stats, 

    utils,

    arm

    arm,

    furrr,

    lme4

RoxygenNote: 7.0.2

Suggests: 

    knitr,

R/glmm.R

+1 −1
Original line number Diff line number Diff line
@@ -44,7 +44,7 @@ find_markers_glmm <- function( 
        it_fxn <- purrr::map

    }

    if (is.null(features)) {

        features <- rownames(counts_mat$counts_mat)

        features <- rownames(counts_mat)

    }

    

    ## Get results for each gene

R/metaanalysis.R

+1 −1
Original line number Diff line number Diff line
@@ -45,7 +45,7 @@ split.presto <- function(obj, splitvar, .appendname = TRUE, .sep = '_') { 
#' @param overwrite (bool) overwrite model object

#' 

#' @export 

glmm.presto <- function(obj, dge_formula, main_effect, analysis_name, features=NULL, do_par=TRUE, nsim=100, overwrite=TRUE) {    

glmm.presto <- function(obj, dge_formula, main_effect, analysis_name, features=NULL, do_par=TRUE, nsim=100, overwrite=TRUE, ...) {    

    if (analysis_name %in% names(obj$models) & !overwrite) {

        stop(sprintf('glmm results \"%s\" already exists. Set overwrite=TRUE to replace', analysis_name))

    }

CRA Git | Maintained and supported by SUSTech CRA and CCSE