R语言根据不同颜色十六进制值绘制带边缘密度图的分组散点图2

library(ggpubr)
# Grouped Scatter plot with marginal density plots
ggscatterhist(
  iris, x = "Sepal.Length", y = "Sepal.Width",
  color = "Species", size = 3, alpha = 0.6,
  palette = c("#87CEEB", "#6A5ACD", "#708090"),
  margin.params = list(fill = "Species", color = "black", size = 0.2)
)

ggscatterhist(
  iris, x = "Sepal.Length", y = "Sepal.Width",
  color = "Species", size = 3, alpha = 0.6,
  palette = c("#FFFAFA", "#00FF7F", "#4682B4"),
  margin.params = list(fill = "Species", color = "black", size = 0.2)
)

ggscatterhist(
  iris, x = "Sepal.Length", y = "Sepal.Width",
  color = "Species", size = 3, alpha = 0.6,
  palette = c("#D2B48C", "#008080", "#D8BFD8"),
  margin.params = list(fill = "Species", color = "black", size = 0.2)
)

ggscatterhist(
  iris, x = "Sepal.Length", y = "Sepal.Width",
  color = "Species", size = 3, alpha = 0.6,
  palette = c("#FF6347", "#40E0D0", "#EE82EE"),
  margin.params = list(fill = "Species", color = "black", size = 0.2)
)

ggscatterhist(
  iris, x = "Sepal.Length", y = "Sepal.Width",
  color = "Species", size = 3, alpha = 0.6,
  palette = c("#F5DEB3", "#9ACD32", "#FFFF00"),
  margin.params = list(fill = "Species", color = "black", size = 0.2)
)