r - ggplot2 plotmatrix with free scales

Question

I use plotmatrix to find correlations in a data frame:

# Reduce dataset to 1000 to make things run faster
d <- diamonds[sample(nrow(diamonds), 1000),]
plotmatrix(d[,-c(2:4)]) + geom_smooth(color="steelblue", method="lm")

This works fine, as long as the different columns are of the same scale. If they are not, the columns with a small scale become useless. As you can see if you run the example above, price is the largest, and so it kills all the other columns.

To solve this problem in a grid, I would usually ask ggplot draw each scale independently using:

scales="free_x"

However, how can I pass that into plotmatrix, or make plotmatrix scale Independently somehow?

Answer 1

根据上面 joran 的评论，使用 GGally 包中的 ggpairs：

# Reduce dataset to 1000 to make things run faster
d <- diamonds[sample(nrow(diamonds), 1000),]
ggpairs(d[,-c(2:4)], lower=list(continuous = "smooth"))