我需要在同一图表上绘制多个发行,我的数据如下:如何在同一图表上绘制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