Plot column names

[simone-rizzetto]

Hi,
thanks for the amazing software!
I'm wondering if you could add an option to plot cell names.
Such as,
in PlotMethods.R, change
sc3_plot_markers.SingleCellExperiment <- function(object, k, auroc, p.val, show_pdata) {
to
sc3_plot_markers.SingleCellExperiment <- function(object, k, auroc, p.val, show_pdata, show_colnames=FALSE) {

and

do.call(pheatmap::pheatmap, c(list(dataset[markers$feature_symbol, , drop = FALSE], show_colnames = show_colnames,
cluster_rows = FALSE, cluster_cols = hc, cutree_cols = k, annotation_row = row.ann, annotation_names_row = FALSE,
gaps_row = which(diff(markers[, 1]) != 0), cellheight = 10), list(annotation_col = ann)[add_ann_col]))

[wikiselev]

Hi, thanks for the suggestion, could you please create a pull request for this?