R 作业 练习题

1. 病人对两种药物五个剂量水平上的响应情况绘制折线图：

dose <- c(20,30,40,45,60) #剂量

drugA <- c(16,20,27,40,60)#药物A反应

drugB <- c(15,18,25,31,40)#药物B反应

(1)用不同的线类型、点符号和颜色，并添加图例；

(2)添加标题（main）、坐标轴标签（xlab、ylab）；

(3)添加Y=30的参考线。

#1.
#(1)用不同的线类型、点符号和颜色，并添加图例；
par(mar=c(4,4,4,.1))
par(mfrow=c(1,1))
dose=c(20,30,40,45,60)
drugA=c(16,20,27,40,60)
drugB=c(15,18,25,31,40)
plot(dose,drugA,type="o",pch=24,lty=1,lwd=2,cex=1,col="purple",xlab="",ylab="")
lines(dose,drugB,type="o"