miRNAのマイクロアレイの解析を頼まれて、非常に困った。 library(affy) exp <- exprs(eset <- rma(Data <- ReadAffy())) cl <- c(rep(0,10),rep(1,10)) library(siggenes) summary(sig <- sam(eset, cl, B=1000)) みたいなド定番で何の工夫もないやり方にし…