diff --git a/R/ggcorrplot.R b/R/ggcorrplot.R index a1642eb..b97d9ec 100644 --- a/R/ggcorrplot.R +++ b/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