|
|
@ -20,5 +20,5 @@ ggcorrplot<-function(df, var, color="#FFFFFF00", stat="signif"){ |
|
|
|
scale_x_discrete(limits=order$x)+ |
|
|
|
scale_y_discrete(limits=order$y)+ |
|
|
|
theme_heatmap(line.color=color)+ |
|
|
|
geom_text(data=df.pval, aes(label=Value)) |
|
|
|
geom_text(data=df.pval, fill="#FFFFF00",aes(label=Value)) |
|
|
|
} |