密集堆積箱形圖和密度圖

Question

這些是關於如何分別繪製密度或箱形圖的幾個good examples。

但是，我正在尋找一個關於如何繪製箱形圖及其相應密度圖的例子，其中一個圖層堆疊在另一個圖層上並且未覆蓋。密度圖應該在最上面。底部的boxplot放置在x軸上。

我不知道如何做到這一點，任何意見或提示，非常感謝。最好使用這個玩具數據集，只是爲了保持簡單。

df <- data.frame(x <- rchisq(1000, 5, 10)) 

Answer 1

如果我理解正確的話，那麼你正在尋找的東西是這樣的：

library(plotly) 
df <- data.frame(y = rchisq(1000, 5, 10)) 
fit <- density(df$y) 

p1 <- plot_ly(df, x = fit$x, y = fit$y, type = 'scatter', mode = 'lines') 
p2 <- plot_ly(df, y = ~y, type = 'box') 
subplot(p1, p2, nrows = 2)