49地块排列成矩阵的7x7

Question

我不知道这个问题是微不足道的，但是......

我试图绘制一组变量类似的形式作为PAIRS情节。

但不是在图形的行和列中使用相同的变量，我想有变量变量。例如，如果我有一个包含X1，...，X7的数据集和另一个包含Y1，...，Y7的数据集。

我已经尝试过布局和参数（mfrow），但因为我想跨越7个变量x 7个变量，它给了我一个溢出错误。

有没有办法做到这个阴谋矩阵7x7？

谢谢

Answer 1

我不知道的方式做到这一点的基础R使用pairs(...)，但这里有一个ggplot解决方案，假设你的x和y的值在dataframes命名df.x和df.y。

# create a sample dataset - you have this already... 
set.seed(1)   # for reproducible example 
df.x <- data.frame(matrix(sample(1:50,350,replace=T),nc=7)) 
df.y <- 2*df.x + rnorm(350,sd=5) 
colnames(df.y) <- paste0("Y",1:7) 

# this makes the plot - you start here. 
library(ggplot2) 
library(data.table) 
library(reshape2)  # for melt(...) 

xDT <- data.table(melt(cbind(id=1:nrow(df.x),df.x),id="id",value.name="xval",variable.name="H"),key="id") 
yDT <- data.table(melt(cbind(id=1:nrow(df.y),df.y),id="id",value.name="yval",variable.name="V"),key="id") 
xy <- xDT[yDT,allow.cartesian=T] 

# simulates pairs() in base R 
ggp = ggplot(xy,aes(x=xval,y=yval)) 
ggp = ggp + geom_point() 
ggp = ggp + facet_grid(V~H, scales="free") 
ggp = ggp + labs(x="",y="") 
print(ggp) 

这是假设，但不检查，在df.x和df.y行数是相同的。

你不一定需要data.tables来做到这一点，但如果你的数据集很大，并且语法更清晰，它可能会更快。