Añadir opción de cambio de color a theme_heatmap.

This commit is contained in:
Costa
2022-02-04 13:57:23 +01:00
parent 0f3f1f86a0
commit ece3a80215
+2 -2
View File
@@ -1,5 +1,5 @@
theme_heatmap<-function(x){ theme_heatmap<-function(x,line.color="#FFFFFF00"){
list(geom_tile(), list(geom_tile(color=line.color),
scale_fill_gradientn(colors=col2(200)), scale_fill_gradientn(colors=col2(200)),
theme(axis.text.x = element_text(angle = 90, hjust = 1, vjust=0.5), theme(axis.text.x = element_text(angle = 90, hjust = 1, vjust=0.5),
panel.background = element_blank(), panel.background = element_blank(),