#pnorm函数的使用形式：pnorm(p,mean=0,sd=1,lower.tail=TRUE,log.p=FALSE)
#a.P(X>=2)
pnorm(2,mean=2,sd=3,lower.tail=FALSE)
#b.P(1<=X<7)
pnorm(7,mean=2,sd=3,lower.tail=TRUE)-pnorm(1,mean=2,sd=3,lower.tail=TRUE)
#c.P(-2.5<=X<-1)
pnorm(-1,mean=2,sd=3,lower.tail=TRUE)-pnorm(-2.5,mean=2,sd=3,lower.tail=TRUE)
#d.P(-3<=X-2<3)即P(-1<=X<5)
pnorm(5,mean=2,sd=3,lower.tail=TRUE)-pnorm(-1,mean=2,sd=3,lower.tail=TRUE)
因为没有看到你的数据，随意给你找了一组数据；你可以试着操作一下：
w=c(100,99,34,29,95,85,86,95,84,87,58,89,93,90,92,84,75,76,65,76,87,89,83,82,81,94,95,96,87,89,75,71,71,72,73,75,89,86,89,92,90,99,98,96,95,90,83,84,78,79)
hist(w,freq=FALSE)#做概率密度直方图
x=seq(min(w),max(w),by=0.001)#做一组序列，用于绘制normal curve的x坐标
y=dnorm(x,mean(w),sd(w))#求x的正态分布函数值
lines(x,y,col="blue",lwd=2)#添加一条正态曲线
绘制好的图片如下：
你可以在修改一下柱子的颜色，坐标标签等；在这里推荐你去学习一下ggplot2这个包；感觉比R绘图的基础包要强大一些；下面使用ggplot2画的，相同的数据，颜色没有调整，可能不太好看：
