Tôi có thể yêu cầu ggpairs sử dụng thang đo log không?

Question

Tôi có thể cung cấp tham số cho hàm ggpairs trong gói GGally để sử dụng thang đo log cho một số biến chứ không phải tất cả?

Answer 1

Bạn không thể cung cấp các thông số như vậy (một lý do là chức năng tạo ra các điểm phân tán được xác định trước mà không quy mô, xem ggally_points), nhưng bạn có thể thay đổi quy mô sau đó sử dụng getPlot và putPlot. Ví dụ:

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

Đây thực chất là câu trả lời giống như Jean-Robert nhưng trông đơn giản hơn nhiều (có thể tiếp cận). Tôi không biết nếu đó là một tính năng mới nhưng có vẻ như bạn không cần sử dụng getPlot hoặc putPlot nữa.

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

Đây là chức năng áp dụng trên một ma trận lớn. Cung cấp số hàng trong ô và tên của ô.

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) }