我的問題主要由以下帖子回答：
當我mydraw.gam在嘗試添加地毯圖（見下面的代碼）時使用命令（見上一篇文章）時，這就是我的圖的樣子：
p<-mydraw.gam(LMB.gam)
p[[1]] geom_rug(position = "jitter",sides="b")
我需要一些幫助來弄清楚如何將地毯圖正確添加到與實際資料相對應的可編輯 gratia::draw ggplot 部分效果圖。
謝謝！
uj5u.com熱心網友回復：
我只會使用smooth_estimates()它的draw()方法從模型中繪制單個平滑。然后您可以使用標準的ggplot2功能添加到它...
# using your data in `df`
m <- gam(X2 ~ s(X1), data = df)
sm <- smooth_estimates(m, smooth = "s(X1)")
draw(sm)
labs(title = "My title", y = "foo")
geom_rug(data = df,
mapping = aes(x = X1),
sides = "b",
inherit.aes = FALSE)
產生
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/376603.html
上一篇：將huxtable資料和ggplot匯出到一個Excel檔案中
下一篇：ggplot繪制網格