Cambiar color a blanco.

R/ggcorrplot.R

@@ -20,7 +20,7 @@ ggcorrplot<-function(df, var, color="#FFFFFF00", stat="signif"){
     scale_x_discrete(limits=order$x)+
     scale_y_discrete(limits=order$y)+
     geom_tile(aes(fill=Value), color=color)+
-    geom_text(data=df.pval, aes(label=Value))+
+    geom_text(data=df.pval, aes(label=Value), color="white")+
     scale_fill_gradientn(colors=col2(200))+
     theme(axis.text.x = element_text(angle = 90, hjust = 1, vjust=0.5),
         panel.background = element_blank(),