diff --git a/R/Functions.R b/R/Functions.R index 07430d9..a2dd8e9 100644 --- a/R/Functions.R +++ b/R/Functions.R @@ -5046,6 +5046,7 @@ labeledHeatmap = function ( cex.lab = NULL, cex.lab.x = cex.lab, cex.lab.y = cex.lab, + cex.legend = cex.lab, colors.lab.x = 1, colors.lab.y = 1, font.lab.x = 1, @@ -5153,7 +5154,7 @@ labeledHeatmap = function ( if (invertColors) colors = rev(colors); labPos = .heatmapWithLegend(Matrix[showRows, showCols, drop = FALSE], - signed = FALSE, colors = colors, naColor = naColor, cex.legend = cex.lab, + signed = FALSE, colors = colors, naColor = naColor, cex.legend = cex.legend, plotLegend = plotLegend, keepLegendSpace = keepLegendSpace, ...) plotbox = labPos$box; xmin = plotbox[1]; xmax = plotbox[2]; ymin = plotbox[3]; yrange = plotbox[4]-ymin; diff --git a/R/heatmapWithLegend.R b/R/heatmapWithLegend.R index 44e750b..bf53946 100644 --- a/R/heatmapWithLegend.R +++ b/R/heatmapWithLegend.R @@ -89,7 +89,7 @@ reverseRows = TRUE, plotLegend = TRUE, keepLegendSpace = plotLegend, - cex.legend = 1, + cex.legend = cex.legend, legendShrink = 0.94, ## The following arguments are now in inches legendSpace = 0.5,