我需要在同一圖表上繪製多個發行,我的數據如下:如何在同一圖表上繪製R中的多個正態迴歸?
mean sd
DIV 0.1790 0.2099
CAS 0.1040 0.1576
ATL 0.0960 0.2218
COM 0.0980 0.1768
我需要在同一圖表上繪製多個發行,我的數據如下:如何在同一圖表上繪製R中的多個正態迴歸?
mean sd
DIV 0.1790 0.2099
CAS 0.1040 0.1576
ATL 0.0960 0.2218
COM 0.0980 0.1768
如果我明白你的問題,這應該這樣做。雖然你的帖子的標題說'正常回歸',但不知道那是什麼。
normalpars <- read.table(text=
"code mean sd
DIV 0.1790 0.2099
CAS 0.1040 0.1576
ATL 0.0960 0.2218
COM 0.0980 0.1768", header=TRUE)
plot(1, xlim=c(-1,1), ylim=c(0,3), type='n',
xlab="X", ylab="Density")
for(i in 1:nrow(normalpars)){
curve(dnorm(x, mean=normalpars$mean[i], sd=normalpars$sd[i]),
add=TRUE)
}
謝謝,這是非常有幫助的,對頂部的錯字表示歉意。 – user3171665
還有一個問題,你能告訴我如何添加顏色(和圖例)各自的分佈? – user3171665
同樣ggplot使用件事:(調用你的表df
)
library(ggplot2)
library(reshape2)
# using density functions [dnorm(...)]
x <- seq(-1,1,by=0.01)
dist <- apply(df,1,function(z){dnorm(x,mean=z[1],sd=z[2])})
dist <- data.frame(x=x, dist)
gg <- melt(dist,id.vars="x")
ggplot(gg) + geom_line(aes(x=x, y=value, color=variable))
是這樣的,你是後? http://docs.ggplot2.org/current/geom_linerange.html – marbel