ggpairsに下三角だけを表示するには？

Question

ggpairsを使用してペアプロットを作成していますが、下側の三角形を表示したいだけです。私は対角線と上三角を空白にすることはできますが、それらを行かせることはできません。それは空の行と空の列を残してしまいます。

提案がありますか？

library("GGally") 
ggpairs(iris[, 1:4], 
     lower = list(continuous = "points"), 
     upper = list(continuous = "blank"), 
     diag = list(continuous = "blankDiag") 
     ) 

Answer 1

ggpairsオブジェクトを編集することができます。オブジェクトの大部分はプロットのlistです。不要なプロットはこのリストから削除することができ、ggpairsオブジェクトの他の要素は一致するように変更できます。ここで

は、私たちはあなたの仕様にグラフをしかめるために、パッケージのデザインや意図を台無しにできることが、なぜ単に考慮しない場合があります。この

gpairs_lower <- function(g){ 
    g$plots <- g$plots[-(1:g$nrow)] 
    g$yAxisLabels <- g$yAxisLabels[-1] 
    g$nrow <- g$nrow -1 

    g$plots <- g$plots[-(seq(g$ncol, length(g$plots), by = g$ncol))] 
    g$xAxisLabels <- g$xAxisLabels[-g$ncol] 
    g$ncol <- g$ncol - 1 

    g 
} 

library("GGally") 
g <- ggpairs(iris[, 1:4], 
      lower = list(continuous = "points"), 
      upper = list(continuous = "blank"), 
      diag = list(continuous = "blankDiag") 
    ) 

gpairs_lower(g)