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

xuwei420620

3154

收藏 2011-12-20

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

扫码加我拉你入群

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

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

全部回复

xuwei420620

2011-12-20 20:20:14

还有加速退化试验。。。

扫码加我拉你入群

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

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

DM小菜鸟

2015-2-9 15:48:10

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)) )

扫码加我拉你入群

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

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

mensaodeyehu

2016-11-18 19:47:33

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

library(survival)

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

扫码加我拉你入群

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

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

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群