Commit 910b8669 authored by Ilya Korsunsky's avatar Ilya Korsunsky
Browse files

add back residuals to poisson predicted values

parent ab45bb97

R/glmm.R

+2 −1
Original line number Diff line number Diff line
@@ -14,7 +14,8 @@ regress_out_one_gene <- function(formula_full, formula_reduced, design, y, commo 
            type = 'response',

            re.form = formula_reduced

        ) 

        return(ypred)        

        yresid <- residuals(glmer_res, type = 'response')        

        return(ypred + yresid)  

    }, error = function(e) {

        return(rep(NA, length(y)))

    })

CRA Git | Maintained and supported by SUSTech CRA and CCSE