如何用r语言绘制累计生存率图

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

请问一下r语言要怎么把这个图画出来？
我写了这些：

plot(x,y,main="累积生存率",xlab="time",ylab="Survival Probability"
names<-c("x"."y","α","λ")
weibull<-function(x,y)

lambda=0.26328
alpha=0.5
y=exp(-lambda*x^alpha)
plot(x,y)
lines(x,y,col="red")


lambda=0.1
alpha=1.0
y=exp(-lambda*x^alpha)
plot(x,y)
lines(x,y,col="black")

lambda=0.00208
alpha=3.0
y=exp(-lambda*x^alpha)
plot(x,y)
lines(x,y,col="blue")
一直说我二进列运算符中有非数值参数和参数长度为0

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言 生存率 如何用 Probability Survival

你是不是漏掉了x？我试验正常啊

1. x <- seq(0, 15, length.out = 400)
   
2.      
   
3.      lambda=0.26328
   
4.      alpha=0.5
   
5.      y1=exp(-lambda*x^alpha)
   
6.      
   
7.      lambda=0.1
   
8.      alpha=1.0
   
9.      y2=exp(-lambda*x^alpha)
   
10.      
    
11.      lambda=0.00208
    
12.      alpha=3.0
    
13.      y3=exp(-lambda*x^alpha)
    
14.      
    
15.      
    
16.      plot(x,y1, type="l", col="red", lwd=1,
    
17.           main = 'Cummulated Survival Probability',
    
18.           xlab="time", ylab="survival probability", ylim = c(0,1))
    
19.      lines(x, y2, col="black", type = 'l', lty = 2, lwd = 1)
    
20.      lines(x, y3, col="blue", type = 'l', lwd = 1)
    
21.      
    
22.      

复制代码

你不会是我学长吧，怎么这问题跟cz布置的作业一模一样