0

我在 中绘制了 2 条正常曲线ggplot2,并在第一条曲线的最大值处添加了一个单独的点。我想在这一点上添加一个宽度为 1 的错误栏。这是我的代码:

library(ggplot2)
library(reshape2)
x=seq(from=0,to=5, length=100)
y=dnorm(x,2,0.5)
z=dnorm(x,3,1)
sf=data.frame(d=2,e=0.8, se=0.5)
normalplot=data.frame(x,y,z)
colnames(normalplot)=c("index", "Type 1", "Type 2")
k=melt(normalplot, id="index")
colnames(k)=c("index", "Method", "value")

ggplot(k, aes(x=index, y=value, colour=Method))+
  theme(axis.text.y=element_blank(), axis.ticks.y=element_blank())+xlab("")+ylab("")+
  geom_line()+
  geom_point(data=sf,aes(d,e),colour="red",size=2)+
  geom_errorbarh(sf,aes(xmax =d+se, xmin =d-se))

这不起作用,但我不明白为什么。我还想在 (3,0.4) 处的第二条正态曲线的最大值处添加另一个点,同时带有一个误差线。有什么帮助吗?

4

0 回答 0