Corregir error: pvalues como numeric y no character.

R/ggcorrplot.R

@@ -9,7 +9,7 @@ ggcorrplot<-function(df, var, color="#FFFFFF00", stat="signif"){
     gather(Var2, Value, -Var1)
 
   if (stat=="signif"){
-    df.pval$Value<-gtools::stars.pval(df.pval$Value)
+    df.pval$Value<-gtools::stars.pval(as.numeric(df.pval$Value))
   }
 
   order<- mcor %>% as.data.frame() %>% add_column(Var1=rownames(mcor),.before=1) %>% clustsort