From 2cd480bfd032928c6833a3f85f73e650014f45bf Mon Sep 17 00:00:00 2001
From: Costa <47926492N@ICO.SCS.local>
Date: Fri, 4 Feb 2022 15:14:07 +0100
Subject: [PATCH] Cambiar color a blanco.

---
 R/ggcorrplot.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/ggcorrplot.R b/R/ggcorrplot.R
index 6d2d3d9..bb7f6b3 100644
--- a/R/ggcorrplot.R
+++ b/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(),