求用R或者SPLUS做可靠性分析的例子或者加速寿命实验的分析函数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

求有用R或者splus做可靠性统计，特别是加速寿命试验这块的应用和例子，谢谢！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：可靠性分析 PLUS Plu 可靠性 可靠性

还有加速退化试验。。。

Accelerated Life Testing of Motorettes是这个不
   
library(survival)
plot(survfit(Surv(time, cens) ~ factor(temp), motors), conf.int = FALSE)
# fit Weibull model
motor.wei <- survreg(Surv(time, cens) ~ temp, motors)
summary(motor.wei)
# and predict at 130C
unlist(predict(motor.wei, data.frame(temp=130), se.fit = TRUE))
   
motor.cox <- coxph(Surv(time, cens) ~ temp, motors)
summary(motor.cox)
# predict at temperature 200
plot(survfit(motor.cox, newdata = data.frame(temp=200),
     conf.type = "log-log"))
summary( survfit(motor.cox, newdata = data.frame(temp=130)) )

DM小菜鸟 发表于 2015-2-9 15:48
Accelerated Life Testing of Motorettes是这个不
   
library(survival)

你好，你给的这个代码是不是davison统计模型里贝叶斯估计那一章里HM算法的Motorette data例子的代码实现？现在在做这个题，有想请教的，急急急。请看到回复