亚洲在线久爱草,狠狠天天香蕉网,天天搞日日干久草,伊人亚洲日本欧美

為了賬號安全,請及時綁定郵箱和手機立即綁定
已解決430363個問題,去搜搜看,總會有你想問的

將密度曲線擬合成R中的直方圖

將密度曲線擬合成R中的直方圖

慕森卡 2019-07-09 10:45:20
將密度曲線擬合成R中的直方圖R中是否有與直方圖擬合曲線的函數?假設你有下面的直方圖hist(c(rep(65, times=5), rep(25, times=5), rep(35, times=10), rep(45, times=4)))它看起來很正常,但它是傾斜的。我想要擬合一個正常的曲線,是傾斜的,圍繞這個直方圖。這個問題是相當基本的,但我似乎無法在互聯網上找到R的答案。
查看完整描述

3 回答

?
一只萌萌小番薯

TA貢獻1795條經驗 獲得超7個贊

如果我正確理解了您的問題,那么您可能需要一個密度估計和直方圖:

X <- c(rep(65, times=5), rep(25, times=5), rep(35, times=10), rep(45, times=4))hist(X, prob=TRUE)            
# prob=TRUE for probabilities not countslines(density(X))            
 # add a density estimate with defaultslines(density(X, adjust=2), lty="dotted")   
 # add another "smoother" density

稍后編輯很長時間:

下面是一個稍微打扮一下的版本:

X <- c(rep(65, times=5), rep(25, times=5), rep(35, times=10), rep(45, times=4))hist(X, prob=TRUE, col="grey")
# prob=TRUE for probabilities not countslines(density(X), col="blue", lwd=2)
 # add a density estimate with defaultslines(density(X, adjust=2), lty="dotted", col="darkgreen", lwd=2)


查看完整回答
反對 回復 2019-07-09
?
慕后森

TA貢獻1802條經驗 獲得超5個贊

這樣的事情用ggplot 2很容易。

library(ggplot2)dataset <- data.frame(X = c(rep(65, times=5), rep(25, times=5), 
                            rep(35, times=10), rep(45, times=4)))ggplot(dataset, aes(x = X)) + 
  geom_histogram(aes(y = ..density..)) + 
  geom_density()

或者模仿Dirk的解的結果

ggplot(dataset, aes(x = X)) + 
  geom_histogram(aes(y = ..density..), binwidth = 5) + 
  geom_density()


查看完整回答
反對 回復 2019-07-09
?
慕沐林林

TA貢獻2016條經驗 獲得超9個贊

我就是這樣做的:

foo <- rnorm(100, mean=1, sd=2)hist(foo, prob=TRUE)curve(dnorm(x, mean=mean(foo), sd=sd(foo)), add=TRUE)

一個額外的練習就是用ggplot 2軟件包來做這件事.。


查看完整回答
反對 回復 2019-07-09
  • 3 回答
  • 0 關注
  • 1159 瀏覽

添加回答

舉報

0/150
提交
取消
微信客服

購課補貼
聯系客服咨詢優惠詳情

幫助反饋 APP下載

慕課網APP
您的移動學習伙伴

公眾號

掃描二維碼
關注慕課網微信公眾號