@@ -1,6 +1,7 @@

 CHANGES in VERSION 1.19.1

 * `Heatmap()`: no column name added if the input matrix is a one-column matrix.

+* `oncoPrint()`: scales the the row annotations are now the same if rows are split.

 =======================

@@ -71,6 +71,10 @@ Legend = function(at, labels = at, nrow = NULL, ncol = 1, col_fun, by_row = FALS

 	title = "", title_gp = gpar(fontsize = 10, fontface = "bold"),

 	title_position = c("topleft", "topcenter", "leftcenter", "lefttop")) {

+	if(missing(at) && !missing(labels)) {

+		at = seq_along(labels)

+	}

+

 	# odevlist = dev.list()

 	direction = match.arg(direction)[1]

 	if(missing(col_fun)) {

@@ -270,10 +270,11 @@ oncoPrint = function(mat, get_type = function(x) x,

 	# row annotation which is a barplot

 	anno_row_bar = function(index, k = NULL, N = NULL) {

 		n = length(index)

-		count = apply(arr, c(1, 3), sum)[index, , drop = FALSE]

+		count = apply(arr, c(1, 3), sum)[, , drop = FALSE]

 		all_type = all_type[!(colnames(count) %in% barplot_ignore)]

 		count = count[, setdiff(colnames(count), barplot_ignore), drop = FALSE]

 		max_count = max(rowSums(count))

+		count = count[index, , drop = FALSE]

 		pushViewport(viewport(xscale = c(0, max_count*1.1), yscale = c(0.5, n + 0.5)))

 		for(i in seq_len(nrow(count))) {

 			if(any(count[i, ] > 0)) {