如何在 ggplot2 中的框附近设置列名？答案

【问题标题】：How can i set column names on near the boxes in ggplot2?如何在 ggplot2 中的框附近设置列名？
【发布时间】：2020-06-09 06:20:41
【问题描述】：

我正在尝试创建这样的热图

我的数据集在这里：DATASET

ggplot(data=mxdf)+
  geom_tile(aes(x=mxdf$Var1,y=mxdf$Var2,fill=mxdf$value))+
  scale_fill_viridis(option = "B",discrete = T,end=1)+
  labs(title = "CORRELATIONS",y="",x="")+
  theme(legend.position = "none",axis.text.x = element_text(angle = 45, vjust = 1, 
                                                            size = 9, hjust = 1))

我使用这段代码，我得到了这张地图

没关系，但是 X 轴列名称太远而无法绘制。如何设置 x 轴列名称，如第一张图？

【问题讨论】：

请将您的数据作为文本（使用dput）而不是图像。

标签： r ggplot2 plot statistics heatmap

【解决方案1】：

我认为您需要添加annotate。但是，要固定注释位置，您还需要在 x 轴上使用扩展。

 ggplot(data= mxdf)+
  geom_tile(aes(x= mxdf$Var2,y= mxdf$Var1,fill= mxdf$value))+
  scale_fill_viridis(option = "B",discrete = T,end=1)+
  labs(title = "CORRELATIONS",y="",x="")+
  theme(legend.position = "none",axis.text.x = element_text(angle = 45, vjust = 1, 
                                                            size = 9, hjust = 1)) +
  scale_x_discrete(expand = c(0.5, 0.5)) +
  annotate("text", x = (1:length(levels(mxdf$Var2)))-1, y = 1:length(levels(mxdf$Var2)), label = levels(mxdf$Var2)) +
  theme(
    axis.text.y = element_blank()
  )

【讨论】：