Commit 5c35cc88 authored by smorabit's avatar smorabit
Browse files

bugfixes

parent c79b5b4a

R/WGCNA_functions.R

+1 −1
Original line number Diff line number Diff line
@@ -527,7 +527,7 @@ ComputeModuleEigengene <- function( 


  # compute average expression of each gene

  cur_expr <- GetAssayData(cur_seurat, slot='data')

  expr <- t(cur_expr)

  expr <- Matrix::t(cur_expr)

  averExpr <- Matrix::rowSums(expr) / ncol(expr)



  # run PCA with Seurat function

CRA Git | Maintained and supported by SUSTech CRA and CCSE