पहले से मौजूद उत्तरों में जोड़ने के लिए, बैंड माध्य के एक आत्मविश्वास अंतराल का प्रतिनिधित्व करता है, लेकिन आपके प्रश्न से आप स्पष्ट रूप से एक पूर्ववर्ती अंतराल की तलाश कर रहे हैं । भविष्यवाणी अंतराल एक सीमा है कि यदि आप एक नया बिंदु आकर्षित करते हैं तो वह बिंदु सैद्धांतिक रूप से उस समय की सीमा X% (जहाँ आप X का स्तर निर्धारित कर सकते हैं) में समाहित हो जाएगा।
library(ggplot2)
set.seed(5)
x <- rnorm(100)
y <- 0.5*x + rt(100,1)
MyD <- data.frame(cbind(x,y))
हम आपके आरंभिक प्रश्न में उसी प्रकार के कथानक को उत्पन्न कर सकते हैं जो कि स्मूद लूप रिग्रेशन लाइन (डिफ़ॉल्ट 95% विश्वास अंतराल) के माध्यम से एक आत्मविश्वास अंतराल के साथ दिखाया गया है।
ConfiMean <- ggplot(data = MyD, aes(x,y)) + geom_point() + geom_smooth()
ConfiMean
भविष्यवाणी अंतराल के एक त्वरित और गंदे उदाहरण के लिए, यहां मैं चिकनाई के साथ रैखिक प्रतिगमन का उपयोग करके एक भविष्यवाणी अंतराल उत्पन्न करता हूं (इसलिए यह आवश्यक रूप से एक सीधी रेखा नहीं है)। नमूना डेटा के साथ यह बहुत अच्छा करता है, 100 बिंदुओं के लिए केवल 4 सीमा के बाहर हैं (और मैंने भविष्यवाणी पर 90% अंतराल निर्दिष्ट किया है)।
#Now getting prediction intervals from lm using smoothing splines
library(splines)
MyMod <- lm(y ~ ns(x,4), MyD)
MyPreds <- data.frame(predict(MyMod, interval="predict", level = 0.90))
PredInt <- ggplot(data = MyD, aes(x,y)) + geom_point() +
geom_ribbon(data=MyPreds, aes(x=fit,ymin=lwr, ymax=upr), alpha=0.5)
PredInt
अब कुछ और नोट। मैं लाडीस्लाव से सहमत हूं कि आपको समय श्रृंखला के पूर्वानुमान के तरीकों पर विचार करना चाहिए क्योंकि आपके पास 2007 में कुछ समय के बाद से एक नियमित श्रृंखला है और यह आपके कथानक से स्पष्ट है यदि आप कठिन दिखते हैं तो मौसमी है (बिंदुओं को जोड़ने से यह बहुत स्पष्ट हो जाएगा)। इसके लिए मैं पूर्वानुमान पैकेज में पूर्वानुमान.स्टल फ़ंक्शन की जांच करने का सुझाव दूंगा जहां आप एक मौसमी खिड़की चुन सकते हैं और यह Loess का उपयोग करके मौसमी और प्रवृत्ति का एक मजबूत अपघटन प्रदान करता है। मैं मजबूत तरीकों का उल्लेख करता हूं क्योंकि आपके डेटा में कुछ ध्यान देने योग्य स्पाइक्स हैं।
यदि आप कभी-कभार आउटलेर्स के साथ डेटा रखते हैं तो आम तौर पर गैर-श्रृंखला श्रृंखला डेटा के लिए मैं अन्य मजबूत तरीकों पर विचार करूंगा। मुझे नहीं पता कि सीधे Loess का उपयोग करके भविष्यवाणी अंतराल कैसे उत्पन्न किया जाता है, लेकिन आप मात्रात्मक प्रतिगमन पर विचार कर सकते हैं (यह निर्भर करता है कि भविष्यवाणी अंतराल कितना चरम है)। अन्यथा यदि आप केवल संभावित गैर-रेखीय होना चाहते हैं, तो आप फ़ंक्शन को x से भिन्न होने देने के लिए स्प्लिन पर विचार कर सकते हैं।