「平均±標準偏差のプロット」の編集履歴（バックアップ）一覧に戻る

---

「平均±標準偏差のプロット」を以下のとおり復元します。

---

 x <- rnorm(50)
 
 hist(x, freq=F)
 rug(x)
 lines(density(x))
 
 #win.graph()
 
 histogram(x, type="density", panel=function(x, ...) {
  panel.histogram(x, ...)
  panel.densityplot(x, ...)
  panel.rug(x, ...)
 })

*参照
[[R]]

---

復元してよろしいですか？