如何使用数据框中的 ggpubr 创建热图？

如何解决如何使用数据框中的 ggpubr 创建热图？

我有以下数据框：

Coagulant <- c(rep("Chem_1",times = 9),rep("Chem_2",times = 9))

VeLocity <- rep(c(rep("low",times = 3),rep("mid",rep("high",times = 3)),times = 2)

Solids <- rep(c(0,50,100),times = 6)

Parameter_1 <- runif(n = 18,min = 70,max = 100)

Parameter_2 <- runif(n = 18,min = 90,max = 100)

Parameter_3 <- runif(n = 18,min = 0,max = 100)

Ex.data.frame <- data.frame(Coagulant,VeLocity,Solids,Parameter_1,Parameter_2,Parameter_3)

Ex.data.frame$Coagulant <- factor(Ex.data.frame$Coagulant,levels = c("Chem_1","Chem_2"),labels = c("Chem_1","Chem_2"))

Ex.data.frame$VeLocity <- factor(Ex.data.frame$VeLocity,levels = c("low","mid","high"),labels = c("low","high"))

Ex.data.frame$Solids <- factor(Ex.data.frame$Solids,levels = c(0,labels = c(0,100))

使用此数据框，我想绘制这样的热图：

如果有人有不同的建议，我如何使用我的数据框和 ggpubr 或 ggplot2 绘制类似的热图或等效图？