画图代码如下:
a <- c(5,7,4,1,3,2,5,5,6,11,8,2,2)
b <- c(32,40,21,23,28,36,40,50,48,68,55,27,18)
plot(a,b,xlab = "病程",ylab = "UPDRS评分",pch=2,col="Red",col.axis="Orange",col.lab="Blue")
title("MSA患者病程和UPDRS评分的关系")
服务热线
178 0020 3020
微信服务号
附件