diff --git a/public/biopet-framework/src/main/resources/nl/lumc/sasc/biopet/tools/plotHeatmap.R b/public/biopet-framework/src/main/resources/nl/lumc/sasc/biopet/tools/plotHeatmap.R index 95e6d5acee76442dc97bb6b0a74e89d236dc0d18..7f7237e90f6593e3d6cf110da005cd89c154d466 100644 --- a/public/biopet-framework/src/main/resources/nl/lumc/sasc/biopet/tools/plotHeatmap.R +++ b/public/biopet-framework/src/main/resources/nl/lumc/sasc/biopet/tools/plotHeatmap.R @@ -15,7 +15,7 @@ heat<- heat[,-1] heat<- as.matrix(heat) colNumber <- 50 -col <- rev(colorRampPalette(brewer.pal(12, "Spectral"))(colNumber)) +col <- rev(colorRampPalette(brewer.pal(11, "Spectral"))(colNumber)) for (i in (colNumber+1):(colNumber+round((dist(range(heat)) - dist(range(heat[heat < 1]))) / dist(range(heat[heat < 1])) * colNumber))) { col[i] <- col[colNumber] }