色の後出し変更

cummerbundはわかりやすく色を割り振ってくれるが、全部色を統一したい場合もある。

expressionPlot(zb.gene.cluster1_2,logMode = T,drawSummary = F)+
  theme(legend.position = "none",
        axis.title = element_blank())

色付きだとグレースケールにしたとき見栄えが悪い。そこでscalecolormanual()を利用。今回は16遺伝子をプロットしたため、16本の線全てを黒色にした。

expressionPlot(zb.gene.cluster1_2,logMode = T,drawSummary = F)+
  theme(legend.position = "none",
        axis.title = element_blank())+
  scale_colour_manual(values = rep("black",16))