落衡故事讲得很好

y<-read.table(filename) z<-read.table(filename2) curve(dnorm(x, mean(y$V1), sd(y$V1)), xlim=c(0, 2000)) curve(dnorm(x, mean(z$V1), sd(z$V1)), xlim=c(0, 2000), **add=TRUE**) 把两张正态分布图画在同一窗口中。

# 读取文件redfile par(mar=c(5, 5, 5, 5)) # 调整图像大小# 第一张图，设置xlim，ylim，把纵坐标轴设为Falseplot(redfile$V3, redfile$V4, pch=16, xlim=c(40, 52), ylim=c(62, 94), cex=1.5, yaxt="n", ann=F, col=rgb(0, 0, 255, 40