2
我不知道這個問題是微不足道的,但是......49地塊排列成矩陣的7x7
我試圖繪製一組變量類似的形式作爲PAIRS情節。
但不是在圖形的行和列中使用相同的變量,我想有變量變量。例如,如果我有一個包含X1,...,X7的數據集和另一個包含Y1,...,Y7的數據集。
我已經嘗試過佈局和參數(mfrow),但因爲我想跨越7個變量x 7個變量,它給了我一個溢出錯誤。
有沒有辦法做到這個陰謀矩陣7x7?
謝謝
我不知道這個問題是微不足道的,但是......49地塊排列成矩陣的7x7
我試圖繪製一組變量類似的形式作爲PAIRS情節。
但不是在圖形的行和列中使用相同的變量,我想有變量變量。例如,如果我有一個包含X1,...,X7的數據集和另一個包含Y1,...,Y7的數據集。
我已經嘗試過佈局和參數(mfrow),但因爲我想跨越7個變量x 7個變量,它給了我一個溢出錯誤。
有沒有辦法做到這個陰謀矩陣7x7?
謝謝
我不知道的方式做到這一點的基礎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
來做到這一點,但如果你的數據集很大,並且語法更清晰,它可能會更快。
謝謝!正是我所需要的。我不知道這個庫(ggplot2),因爲我一直使用基本的R(繪圖,配對等) – Anna