如何在按类别划分的R中构建关联矩阵？

Question

我的数据框有4个变量 - cur，price，volume和carat。

除了切割外，一切都是数值变量： 我能够得到价格，体积和克拉的相关矩阵。 以下是代码，

Jewels_Input_Data_2 <- subset(Jewels_Input_Data,select = c(price,Volume,carat))

#Correlation Plot to examine the relationships between price, volume, caret
library(corrplot)
CorMatrix <- cor(Jewels_Input_Data_2)

上图显示了所有有序切割水平的相关矩阵。我希望将它显示为彼此相邻的每个切割级别。

换句话说，我想通过分类变量破解CorMatrix - Cut已经订购了等级。

说出每个切割水平 - 我想看到矩阵值，理想情况下我想用corrplot（）

绘制它

请帮助我。

Answer 1

不确定“Jewels_Input_Data”是什么，但作为一个可重复的例子：

library(dplyr)
library(purrr)
library(ggplot2)

diamonds %>% 
  mutate(volume = x*y*z) %>% 
  select(cut, price, volume, carat) %>% 
  split(.$cut) %>% 
  map(~ select(., -cut)) %>% 
  map(~ cor(.)) %>% 
  map(~ corrplot(., method = "number"))