數(shù)據(jù)框:mRNA捏萍; 基因名列:Symbol(在該數(shù)據(jù)框最后一列);
results = t(sapply(split(mRNA,mRNA$Symbol),function(x) colMeans(x[,1:(ncol(x)-1)])))
數(shù)據(jù)框:mRNA捏萍; 基因名列:Symbol(在該數(shù)據(jù)框最后一列);
results = t(sapply(split(mRNA,mRNA$Symbol),function(x) colMeans(x[,1:(ncol(x)-1)])))