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

我有一个数据框架，它有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)

Jewels\u Input\u Data\u 2不确定“Jewels\u Input\u 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"))

从
CorList开始，因为这是5个图形，也许你可以从
op开始，因为它没有给我绘图。但我正在按要求获取矩阵。有什么问题吗，我可能在做什么？它仍然给了我同样的老情节。