muhaz
पैकेज hazard functionright censored से कर्नेल स्मूथिंग विधियों का उपयोग कर डेटा अनुमानित करता है। मेरा सवाल यह है कि, muhaz
की गणना के खतरे के लिए आत्मविश्वास अंतराल प्राप्त करने का कोई तरीका है?मुहाज पैकेज खतरे के कार्य के विश्वास अंतराल
options(scipen=999)
library(muhaz)
data(ovarian, package="survival")
attach(ovarian)
fit1 <- muhaz(futime, fustat)
plot(fit1, lwd=3, ylim=c(0,0.002))
ऊपर के उदाहरण muhaz.object
fit
में कुछ प्रविष्टियों है fit1$msemin
, fit1$var.min
, fit1$haz.est
लेकिन उनकी लंबाई fit1$haz.est
का आधा है।
खतरे के फ़ंक्शन के लिए आत्मविश्वास अंतराल निकालना संभव है तो कोई विचार?
संपादित करें: मैं के साथ आधार पर निम्न की कोशिश की क्या @ user20650 सुझाव
options(scipen=999)
library(muhaz)
data(ovarian, package="survival")
fit1 <- muhaz(ovarian$futime, ovarian$fustat,min.time=0, max.time=744)
h.df<-data.frame(est=fit1$est.grid, h.orig=fit1$haz.est)
for (i in 1:10000){
d.s.onarian<-ovarian[sample(1:nrow(ovarian), nrow(ovarian), replace = T),]
d.s.muhaz<-muhaz(d.s.onarian$futime, d.s.onarian$fustat, min.time=0, max.time=744)
h.df<-cbind(h.df, d.s.muhaz$haz.est)
}
h.df$upper.ci<-apply(h.df[,c(-1,-2)], 1, FUN=function(x) quantile(x, probs = 0.975))
h.df$lower.ci<-apply(h.df[,c(-1,-2)], 1, FUN=function(x) quantile(x, probs = 0.025))
plot(h.df$est, h.df$h.orig, type="l", ylim=c(0,0.003), lwd=3)
lines(h.df$est, h.df$upper.ci, lty=3, lwd=3)
lines(h.df$est, h.df$lower.ci, lty=3, lwd=3)
स्थापना max.time कार्यों के लिए, हर बूटस्ट्रैप नमूना ने एक ही आकलन ग्रिड अंक लगता है। हालांकि सीआई प्राप्त, थोड़ा समझ में आता है। आम तौर पर मैं उम्मीद करता हूं कि अंतराल टी = 0 पर संकीर्ण होते हैं और समय के साथ व्यापक हो जाते हैं (कम जानकारी, अधिक अनिश्चितता) लेकिन प्राप्त अंतराल समय के साथ कम या ज्यादा स्थिर लगते हैं। के रूप में टिप्पणी करने वाले को सुझाव दिया
क्या आप इसे बूटस्ट्रैप कर सकते हैं? यह '(फिट 1, प्लॉट (est.grid, haz.est, type = "l", lwd = 3, ylim = c (0,0.002))' 'एक ही साजिश देता है, इसलिए आपको' हज़ 'के अनुमानों की आवश्यकता होगी 'फिट 1' के लिए एक ही timepoints पर .est'। हालांकि, जैसा कि आप 'muhaz' मॉडल को दोबारा बदलते हैं और दोबारा बदलते हैं, त्वरित प्रयास से, मुझे लगता है कि आप 'est.grid' को प्रत्येक resample के लिए उसी timepoints पर बल दे सकते हैं यदि आप' min.time' सेट करते हैं और 'max.time' मूल फिट के समान ही होना चाहिए। यानी 'साथ (डेटा, मुहाज (futime, fustat, min.time = 0, max.time = 744))', जहां 'dat' बूटस्ट्रैप डेटा है। – user20650
अधिकतम सेट करना।समय काम करता प्रतीत होता है, हर बूटस्ट्रैप नमूना में वही अनुमानित ग्रिड पॉइंट होते हैं। हालांकि सीआई प्राप्त, थोड़ा समझ में आता है। आम तौर पर मैं उम्मीद करता हूं कि अंतराल समय के साथ व्यापक हो जाएंगे (कम जानकारी, अधिक अनिश्चितता) लेकिन प्राप्त अंतराल समय के साथ कम या ज्यादा स्थिर प्रतीत होता है। – ECII