weibullR软件包中是否有任何函数可以获取R中的可靠性v / s时间图?

时间:2019-01-18 08:57:44

标签: r plot reliability

我正在使用WeibullR软件包绘制R中的可靠性v / s时间图。 但是默认情况下,它会打印不可靠性与时间的关系。 有什么方法可以使其可靠性与时间关系图? 预先感谢

使用的图书馆:

库(WeibullR)

图书馆(WeibullR) df <-data.frame(time = c(10000,10000,20000,20000,30000,                          30000、30000、30000、40000、50000,                          50000,60000,70000,70000,70000,                          70000,80000,80000,80000,80000,                          90000、90000、100000),                  事件= rep(1,23)) weibl <-1- wblr(df,col =“ darkgreen”,label =“审查数据集”,dist =“ weibull2p”,ylab =“ check”) weibl_fit <-wblr.fit(weR,col =“ Red”,method.fit =“ rr”) 数据<-wblr.conf(weibl_fit,col =“ blue”) 情节(数据)

默认情况下,它绘制的不可靠性[%]与失效时间的关系。 预期的是可靠性与时间的关系。

1 个答案:

答案 0 :(得分:0)

此处df是具有时间和事件作为两个列名称的数据帧。对于下面的库,要求您的列名应采用这种格式(即事件和时间)。

要绘制可靠性与时间的关系图,我将使用df以上的值作为输入。

库(WeibullR)

weibl <-wblr(df,col =“ darkgreen”,label =“审查数据集”,dist =“ weibull2p”, ylab =“不可靠”)

数据<-wblr.fit(weibl,col =“ Red”,method.fit =“ mle”,dist =“ weibull2p”) 可靠性<-data $ data $ dpoints

图(x =可靠性$时间,y =((1-可靠性$ ppp)* 100),xlab =“时间”,ylab =“可靠性”,xlim = c(1000,100000),ylim = c( 0,100),col =“ orange”)

上图将给您可靠性与时间的关系图。