从ggpairs图中删除行

Question

我使用iris创建了ggpairs的成对图，该图具有4个数字变量和1个类别变量。我进行了以下操作，因此将以iris$Species为条件的每个数值变量的丑陋直方图都省去了，但并排箱形图却留在了其中：

iris_pairs <- ggpairs(data = iris, mapping = aes(color = Species))
iris_pairs$nrow <- 4
iris_pairs$yAxisLabels <- iris_pairs$yAxisLabels[1:4]
iris_pairs

是否有更清洁或更惯用的方式来做到这一点？关于它的东西感觉很笨拙，我宁愿做得更干净。我已经尝试过了：

iris_nrow <- iris_pairs$nrow - 1
iris_ncol <- iris_pairs$ncol
iris_pairs_x_labs <- iris_pairs$xAxisLabels
iris_pairs_y_labs <- iris_pairs$yAxisLabels

pairs_list <- list()
for (i1 in seq(1:iris_ncol)){
  horiz_list <- list()
  for (i2 in seq(1:iris_nrow)){
    plot_obj <- iris_pairs[i1, i2] %>%
    horiz_list[[i2]] <- plot_obj
  }
  pairs_list[[i1]] <- horiz_list
}

ggmatrix(pairs_list, nrow = iris_nrow, ncol = iris_ncol, xAxisLabels <- iris_pairs_x_labs, yAxisLabels <- iris_pairs_y_labs)

但是感觉甚至更笨拙了（反正也不起作用）。