Limpiar un código comentado.
This commit is contained in:
@@ -20,8 +20,6 @@ ggcorrplot<-function(df, var, color="#FFFFFF00", stat="signif"){
|
|||||||
df$Var2<-factor(df$Var2, levels=order$y)
|
df$Var2<-factor(df$Var2, levels=order$y)
|
||||||
|
|
||||||
ggplot(df, aes(Var1, Var2))+
|
ggplot(df, aes(Var1, Var2))+
|
||||||
# scale_x_discrete(limits=order$x)+
|
|
||||||
# scale_y_discrete(limits=order$y)+
|
|
||||||
geom_tile(aes(fill=Value), color=color)+
|
geom_tile(aes(fill=Value), color=color)+
|
||||||
geom_text(data=df.pval, aes(label=Value), color="white")+
|
geom_text(data=df.pval, aes(label=Value), color="white")+
|
||||||
scale_fill_gradientn(colors=col2(200))+
|
scale_fill_gradientn(colors=col2(200))+
|
||||||
|
|||||||
Reference in New Issue
Block a user