p1 <- ggplot(data=heatmap, mapping=aes(x= Sample, y= Gene, fill= Abundance)) + geom_tile() + facet_grid (~ Sample, scales = "free", ...
確定! 回上一頁