R语言 绘制相关性热力图 wrap()函数

在R语言中，绘制相关性热力图通常不需要使用`wrap()`函数。`wrap()`函数实际上是`tidytext`包中的一个功能，主要用于处理文本数据中的单词wrap，也就是文本自动换行。对于相关性热力图，我们通常会使用`cor()`函数计算变量间的相关系数，然后用`heatmap()`或`ggplot2`中的`geom_tile()`或`ggcorrplot()`等函数生成热力图。

如果你想展示两个或多个变量之间的相关矩阵作为热力图，并希望保持行名和列名清晰，可以这样做：

# 假设df是一个包含数据的dataframe
cor_matrix <- cor(df)

# 使用ggcorrplot
library(ggcorrplot)
ggcorrplot(cor_matrix, type = "lower", lab = TRUE) +
  theme_minimal() + # 设置主题
  labs(title = "Correlation Heatmap") + # 添加标题
  xlab("Variables") + ylab("Variables")

如果需要自定义每个单元格的透明度，你可以结合`ggplot2`的`geom_tile()`并传递`alpha`参数：

ggplot(as.data.frame(cor_matrix), aes(x=Var1, y=Var2, fill=value)) +
  geom_tile(color="white") +
  scale_fill_gradient(low = "white", high = "red", alpha = 0.7) +
  theme_minimal()

在这里，`alpha`参数设置了填充颜色的透明度。