尋找 plot 成對散點圖矩陣的方法，其中變量分為兩組

Question

尋找一種方法來 plot 成對散點圖矩陣，其中變量位於兩組中，即圖需要限制為組之間的對，不包括組內對。 例如，鹼基pairs()產生這個

    pairs(iris[1:4])

例如，我希望僅將萼片變量與花瓣變量相關聯，並且對萼片（或花瓣）長度與寬度的相關性不感興趣。 所以，我需要一個 2x2 矩陣，而不是 4x4 矩陣。

解決方案看起來像這樣

pairs()似乎支持公式參數，但是pairs(Sepal.Length + Sepal.Width ~ Petal.Length + Petal.Width, data=iris)看起來不正確。 它給出了一個 3x3 矩陣的正確方向，但由於某種原因，這兩個 sepal 變量被分組。

最好在ggplot2或GGally::ggpairs()中尋找解決方案。

Answer 1

這是一個帶有 tidyr 預處理的香草 ggplot 方法。

首先，我們將重塑數據，使寬度和長度變量具有相同的列。

library(ggplot2)

df <- tidyr::pivot_longer(iris, c(Petal.Length, Petal.Width), 
                          names_to = "petal_metric", values_to = "petal_value")
df <- tidyr::pivot_longer(df, c(Sepal.Length, Sepal.Width),
                          names_to = "sepal_metric", values_to = "sepal_value")

接下來，我們可以簡單地分析花瓣/萼片指標。

p <- ggplot(df, aes(sepal_value, petal_value, colour = Species)) +
  geom_point()
  
p + facet_grid(petal_metric ~ sepal_metric)

我們可以更好地裝飾 plot 以將條帶用作軸標題。

p + facet_grid(petal_metric ~ sepal_metric, switch = "both") +
  theme(strip.placement = "outside",
        strip.background = element_blank(),
        axis.title = element_blank())

^{由代表 package (v2.0.1) 於 2022 年 1 月 11 日創建}