如何在 R 中的特定 x 值上繪制箱線圖？

Question

我想將不同光譜帶的反射率的箱線圖添加到現有圖中。 每個波段都有一個相關的波長（藍色波段 = 450，綠色波段 = 560，紅色波段 = 650）假設我的波段是

blue <- rnorm(100, mean = 50)
green <- rnorm(50, mean = 30)
red <- rnorm(150, mean = 75)
wavelength <- c(350:900)

以波長作為 x 軸的向量

如何將它們添加到特定的 x 位置？ 我只找到 x 值是非度量的示例。 我現有的圖如下所示：需要添加箱線圖的現有圖

我還是 R 的新手。提前致謝

Answer 1

我想這就是你要找的。 或者至少是一個好的起點。

# reproducible example
set.seed(1)
blue_band  <- 450
green_band <- 560
red_band   <- 650
blue  <- rnorm(100, mean = 50)
green <- rnorm( 50, mean = 30)
red   <- rnorm(150, mean = 75)
wavelength <- c(350:900)
wavelength_value <- sort(runif(length(wavelength), 50,100))

# your plot with ggplot2
library(ggplot2)
ggplot() +
 geom_line(data = NULL, aes(x = wavelength, y = wavelength_value)) +
 geom_boxplot(data = NULL, aes(x = blue_band , y = blue ), colour = "blue" , width = 10) +
 geom_boxplot(data = NULL, aes(x = green_band, y = green), colour = "green", width = 10) +
 geom_boxplot(data = NULL, aes(x = red_band  , y = red  ), colour = "red"  , width = 10)