-1
我正在做lm關係的圖形,我想存檔併爲它們中的每一個繪製一個帶有R²的公式y=ax+b
。我該怎麼做?公式爲lm圖形
lmfit <- geom_smooth(method="lm", se = T)
p <- qplot(x, y, data=Tab) + facet_grid(id ~., scales = "free") + lmfit
我正在做lm關係的圖形,我想存檔併爲它們中的每一個繪製一個帶有R²的公式y=ax+b
。我該怎麼做?公式爲lm圖形
lmfit <- geom_smooth(method="lm", se = T)
p <- qplot(x, y, data=Tab) + facet_grid(id ~., scales = "free") + lmfit
在ggplot
之內,沒有直接的方法來做到這一點。您需要分別計算每個id
的迴歸,然後從每個中提取公式和R^2。將這些提取的版本放在數據框中(與id
一起)並使用geom_text
來顯示它們。
下載者請留下評論,解釋如何改善問題。 – joran
如果你給出一個可重複的答案(見http://tinyurl.com/reproducible-000),你可能會得到一個更詳細的答案(@Brian Diggs似乎是正確的,但並沒有告訴你如何*完全*你想要什麼.. );另請參閱http://groups.google.com/group/ggplot2/browse_thread/thread/d53807fa41b95cc0?pli=1(我通過Google搜索「ggplot」迴歸方程式「add」)和http://groups.google.com /組/ GGPLOT2/MSG/edba8578e45d525a –