"বেসাহাজ" ফাংশনটি ব্যবহার করে বেসলাইন হ্যাজার্ড ফাংশনটি অনুমান করা যায়। "সহায়তা" ফাইলটিতে বলা হয়েছে যে এটি "পূর্বাভাসের বেঁচে থাকা" ফাংশন যা এটি পরিষ্কারভাবে নয়। যদি কেউ কোডটি পরীক্ষা করে দেখেন তবে এটি স্পষ্টত কোনও survfit
বস্তু থেকে সংশ্লেষিত বিপত্তি ফাংশন । আরও নির্বিকারতার জন্য, ডিফল্ট সেটিংটি হ'ল centered=TRUE
ক) কোনও বেসলাইন হ্যাজার্ড ফাংশন নয় (যেমন নামটি ইঙ্গিত দেয়), এবং খ) প্রাক্কলন-কর্মসূচিকে নিয়োগ করে যা কোনও ব্যবহারিক দিক থেকে বৈধ হিসাবে বঞ্চিত হয় red
এবং আপনার আগের বিন্দু: হ্যাঁ এই ফাংশনটি পদক্ষেপ ফাংশনটি ব্যবহার করে। আপনি আউটপুটটি স্মুথিং ব্যবহার করে বিপত্তি ফাংশনে রূপান্তর করতে পারেন। এর সব থেকে খারাপ দিক, সেই ভবিষ্যদ্বাণীটির অনিশ্চয়তা অন্তর কী? আপনি যদি এটি অর্জন করতে পারেন তবে আপনি ফিল্ডস পদক পেতে পারেন। আমি মনে করি না যে আমরা এমনকি বুটস্ট্র্যাপিং কাজ করে কিনা তাও জানি।
উদাহরণ হিসাবে:
set.seed(1234)
x <- rweibull(1000, 2, 3)
coxfit <- coxph(Surv(x) ~ 1)
bhest <- basehaz(coxfit)
haz <- exp(diff(bhest[, 1])*diff(bhest[, 2]))
time <- (bhest[-1,2] + bhest[-1000, 2])/2
b <- 2^-3
curve(3*b*x, from=0, to=max(x), xlab='Survival time', ylab='Weibull hazard')
points(t <- bhest[-1,2], h <- diff(bhest[, 1])/diff(bhest[, 2]), col='grey')
smooth <- loess.smooth(t, h)
lines(smooth$x, smooth$y, col='red')
legend('topright', lty=c(1,1,0), col=c('black', 'red', 'grey'), pch=c(NA,NA,1), c('Actual hazard fun', 'Smoothed hazard fun', 'Stepped discrete-time hazards'), bg='white')