मैं प्रेडिक्शन पैकेज के फंक्शन prediction_summary() का उपयोग करना चाहता हूं और कॉन्फिडेंस इंटरवल लेंथ को एडजस्ट करना चाहता हूं। हालांकि, ऐसा लगता है कि स्तर विनिर्देश कोई फर्क नहीं पड़ता। क्या मुझसे यहां कुछ गलत हो रहा है?
प्रतिलिपि प्रस्तुत करने योग्य उदाहरण:
# Make data
DF <- data.frame(
x = rnorm(n= 100, 20,3),
y = rbinom(n = 100, size = 1, prob=0.4)
)
# Specify model
model <- glm(x ~ y, data = DF)
# Prediction
prediction::prediction_summary(
model = model,
level = 0.2
)
# Same result
prediction::prediction_summary(
model = model,
level = 0.9
)
1
Poza
25 जून 2021, 02:45
1 उत्तर
सबसे बढ़िया उत्तर
समस्या स्रोत कोड से संबंधित है
library(prediction)
prediction_summary
function (model, ..., level = 0.95)
{
predictions <- prediction(model, ...)
summary(predictions, level = 0.95)
}
ध्यान दें कि level को summary में 0.95 के रूप में हार्ड-कोड किया गया है। हम इनपुट को level = level यानी उपयोगकर्ता निर्दिष्ट स्तर के रूप में लेने के लिए summary लाइन को संशोधित करके सुधार कर सकते हैं
body(prediction_summary)[[3]] <- quote(summary(predictions, level = level))
अब, परीक्षण करें
> prediction_summary(
+ model = model,
+ level = 0.9
+ )
Prediction SE z p lower upper
19.96 0.3178 62.81 0 19.44 20.49
> prediction_summary(
+ model = model,
+ level = 0.2
+ )
Prediction SE z p lower upper
19.96 0.3178 62.81 0 19.88 20.04
4
akrun
25 जून 2021, 03:07