我有以下空白ggplot，R讓我們將該圖稱為 (***)
a = 1:10
b = 1:10
data = data.frame(a,b)
ggplot(data, aes(a, b))
現在讓我們假設我們還有以下三個資料集，以及相應的熱圖
第一，
x_1 = 2:6
x_2 = 1:3
x = expand.grid(x_1,x_2)
x_values = runif(15,0,1)
data_1 = data.frame(x_1 = x[,1], x_2 = x[,2],x_values)
ggplot(data_1, aes(x_1, x_2))
geom_tile(aes(fill = x_values))
第二個，
y_1 = 4:7
y_2 = 2:9
y = expand.grid(y_1,y_2)
y_values = runif(32,0,1)
data_2 = data.frame(y_1 = y[,1], y_2 = y[,2],y_values)
ggplot(data_2, aes(y_1, y_2))
geom_tile(aes(fill = y_values))
第三個，
z_1 = 3:6
z_2 = 8:10
z = expand.grid(z_1,z_2)
z_values = runif(12,0,1)
data_3 = data.frame(z_1 = z[,1], z_2 = z[,2],z_values)
ggplot(data_3, aes(z_1, z_2))
geom_tile(aes(fill = z_values))
有沒有辦法在 (***) 之上繪制所有三個熱圖？我想創建一個 x 軸跨度為ay 軸跨度為的圖，然后在 x 軸跨度為y 軸跨度為b的子空間上繪制第一個資料集的熱圖，并在頂部然后在子空間上添加第二個資料集的熱圖，其中 x 軸跨越 as和 y 軸跨越 as并且對第三個資料集也這樣做，并將其推廣到更多的資料集。x_1x_2y_1y_2
uj5u.com熱心網友回復：
也許這就是您正在尋找的：
set.seed(123)
library(ggplot2)
ggplot()
geom_tile(aes(x_1, x_2, fill = x_values), data_1)
geom_tile(aes(y_1, y_2, fill = y_values), data_2)
geom_tile(aes(z_1, z_2, fill = z_values), data_3)
scale_x_continuous(limits = range(a))
scale_y_continuous(limits = range(b))
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/454407.html
標籤：r