I am using heatmap3 to create heatmap. I have 77 rows and 10 columns in reality but getting heatmap with only 38 rows with 10 columns. my code is as below
x <- Heatmap_data
x
y <- as.matrix(Heatmap_data)
y
class(x)
class(y)
library(heatmap3)
nrow(y)
ncol(y)
heatmap3(y, Rowv = NULL, Colv = NULL,
distfun = function(y) as.dist(1 - cor(t(y), use = "pa")), balanceColor = F, showColDendro = T, showRowDendro = F,
col = colorRampPalette(c("white", "firebrick3"))(1024),
method = "complete", ColAxisColors = 0,
RowAxisColors = 0, hclustfun = hclust, reorderfun = function(d, w)
reorder(d, w), symm = FALSE, scale = c("none"),
ColSideWidth = 0.4, file = "heatmap3.pdf", topN = NA, filterFun = sd,
returnDistMatrix = FALSE, margins = c(5, 5), cexRow = 0.2 + 1/log10(nrow(y)), cexCol = 0.2 +
1/log10(ncol(y)), lasRow = 2, lasCol = 2, labRow = NULL,
labCol = NULL, main = NULL, xlab = NULL, ylab = NULL,
keep.dendro = FALSE, verbose = getOption("verbose"), useRaster = if
(ncol(y) * nrow(y) >= 50000) TRUE else FALSE)