我正在使用 R 編程語言。我做了以下兩個圖：
library(ggplot2)
library(cowplot)
data_1 = data.frame(a = rnorm(100,10,10), b = rnorm(100,10,10), c = as.factor("one"))
data_2 = data.frame(a = rnorm(100,10,10), b = rnorm(100,10,10), c = as.factor("two"))
p1 = ggplot(data_1, aes(x = a, y =
b))
geom_density_2d_filled()
ggtitle("Plot 1")
p2 = ggplot(data_2, aes(x = a, y =
b))
geom_density_2d_filled()
ggtitle("Plot 2")
plot_grid(p1, p2)
我的問題：有沒有辦法將這兩個情節組合在一個情節中，這樣它看起來就不會“太凌亂”？
我嘗試了以下代碼：
ggplot(final, aes(x = a, y =
b, colour = c))
geom_density_2d_filled()
ggtitle("Combined")
但這很難閱讀。
有誰知道如何做到這一點？
謝謝！
uj5u.com熱心網友回復：
你的意思是…… 像這樣？在這里，等高線圖用于重疊多個 2d 核密度：
library(ggplot2)
library(dplyr)
#>
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#>
#> filter, lag
#> The following objects are masked from 'package:base':
#>
#> intersect, setdiff, setequal, union
set.seed(1337)
data_1 = data.frame(a = rnorm(100,10,10), b = rnorm(100,10,10), c = as.factor("one"))
data_2 = data.frame(a = rnorm(100,10,10), b = rnorm(100,10,10), c = as.factor("two"))
bind_rows(
data_1,
data_2
) %>%
ggplot(aes(a, b, color = c))
geom_density2d()
由reprex 包(v2.0.1)于 2021 年 12 月 7 日創建
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/376436.html