我可以告訴ggpairs使用對數刻度嗎？

Question

我可以在GGally包中爲ggpairs函數提供一個參數，以針對某些而非全部變量使用對數刻度嗎？

Answer 1

不能提供參數本身（一個原因是，創建散點圖功能是預定義的無規模，見ggally_points），但你可以使用之後和getPlot改變putPlot規模。例如：

custom_scale <- ggpairs(data.frame(x=exp(rnorm(1000)), y=rnorm(1000)), 
upper=list(continuous='points'), lower=list(continuous='points')) 
subplot <- getPlot(custom_scale, 1, 2) # retrieve the top left chart 
subplotNew <- subplot + scale_y_log10() # change the scale to log 
subplotNew$type <- 'logcontinuous' # otherwise ggpairs comes back to a fixed scale 
subplotNew$subType <- 'logpoints' 
custom_scale <- putPlot(custom_fill, subplotNew, 1, 2) 

Answer 2

這與Jean-Robert的答案基本相同，但看起來更簡單（平易近人）。我不知道它是否是一項新功能，但它看起來不像您需要使用getPlot或putPlot了。

custom_scale[1,2]<-custom_scale[1,2] + scale_y_log10() + scale_x_log10()

這裏是跨越一個大矩陣應用它的功能。提供圖中的行數和圖的名稱。

scalelog2<-function(x=2,g){ #for below diagonal 
for (i in 2:x){ 
    for (j in 1:(i-1)) { 
     g[i,(j)]<-g[i,(j)] + scale_x_continuous(trans='log2') + 
scale_y_continuous(trans='log2') 
         } } 
for (i in 1:x){ #for the bottom row 
     g[(x+1),i]<-g[(x+1),i] + scale_y_continuous(trans='log2') 
         } 
for (i in 1:x){ #for the diagonal 
     g[i,i]<-g[i,i]+ scale_x_continuous(trans='log2') } 
    return(g) }