Dear All, There might be a bug in heatmap(): x <- matrix(rnorm(10*5), 10, 5) heatmap(x, labCol=1:5) Error in axis(1, 1L:nc, labels = labCol, las = 2, line = -0.5, tick = 0, : 'at' and 'labels' lengths differ, 5 != 10 Works fine under 4.0.1. Looking at the code from 4.0.1 vs. Rdevel, esp. this part sticks out: labRow <- labRow[rowInd] %||% rownames(x) %||% (1L:nr)[rowInd] labCol <- labCol[rowInd] %||% colnames(x) %||% (1L:nc)[colInd] Maybe this should be: labCol <- labCol[colInd] %||% colnames(x) %||% (1L:nc)[colInd]> sessionInfo()R Under development (unstable) (2020-06-21 r78727) Platform: x86_64-pc-linux-gnu (64-bit) Running under: Ubuntu 16.04.6 LTS Matrix products: default BLAS: /home/wviechtb/rdev/lib/libRblas.so LAPACK: /home/wviechtb/rdev/lib/libRlapack.so locale: [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C LC_TIME=en_US.UTF-8 [4] LC_COLLATE=C LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8 [7] LC_PAPER=en_US.UTF-8 LC_NAME=C LC_ADDRESS=C [10] LC_TELEPHONE=C LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C attached base packages: [1] stats graphics grDevices utils datasets methods base loaded via a namespace (and not attached): [1] compiler_4.1.0 Best, Wolfgang
>>>>> Viechtbauer, Wolfgang (SP) writes:Should be fixed now. Best -k> Dear All, > There might be a bug in heatmap():> x <- matrix(rnorm(10*5), 10, 5) > heatmap(x, labCol=1:5)> Error in axis(1, 1L:nc, labels = labCol, las = 2, line = -0.5, tick = 0, : > 'at' and 'labels' lengths differ, 5 != 10> Works fine under 4.0.1. Looking at the code from 4.0.1 vs. Rdevel, esp. this part sticks out:> labRow <- labRow[rowInd] %||% rownames(x) %||% (1L:nr)[rowInd] > labCol <- labCol[rowInd] %||% colnames(x) %||% (1L:nc)[colInd]> Maybe this should be:> labCol <- labCol[colInd] %||% colnames(x) %||% (1L:nc)[colInd]>> sessionInfo() > R Under development (unstable) (2020-06-21 r78727) > Platform: x86_64-pc-linux-gnu (64-bit) > Running under: Ubuntu 16.04.6 LTS> Matrix products: default > BLAS: /home/wviechtb/rdev/lib/libRblas.so > LAPACK: /home/wviechtb/rdev/lib/libRlapack.so> locale: > [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C LC_TIME=en_US.UTF-8 > [4] LC_COLLATE=C LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8 > [7] LC_PAPER=en_US.UTF-8 LC_NAME=C LC_ADDRESS=C > [10] LC_TELEPHONE=C LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C> attached base packages: > [1] stats graphics grDevices utils datasets methods base> loaded via a namespace (and not attached): > [1] compiler_4.1.0> Best, > Wolfgang> ______________________________________________ > R-devel at r-project.org mailing list > stat.ethz.ch/mailman/listinfo/r-devel