मान लीजिए कि आपका एकाधिक प्रतिगमन समीकरण था
y^=2x1+5x2+3
जहां y का अर्थ है "की भविष्यवाणी की y "।y^y
अब केवल उन बिंदुओं को लें जिनके लिए । तो अगर आप साजिश y के खिलाफ एक्स 1 , इन बातों समीकरण को पूरा करेगा:x2=1y^x1
y^=2x1+5(1)+3=2x1+8
इसलिए उन्हें ढलान 2 की लाइन पर और -डिनसेप्ट 8 के साथ लेटना चाहिए।y
अब उन बिंदुओं को लें जिनके लिए । जब आप साजिश y के खिलाफ एक्स 1 , तो इन बातों को संतुष्ट:x2=2y^x1
y^=2x1+5(2)+3=2x1+13
तो यह ढलान 2 की एक पंक्ति है और -intercept 13. के साथ आप अपने लिए सत्यापित कर सकते हैं कि यदि x 2 = 3 है तो आपको ढलान 2 की दूसरी पंक्ति मिलती है और y -intercept 18 है।yx2=3y
हम देखते हैं कि विभिन्न मानों वाले बिंदु अलग- अलग रेखाओं पर स्थित होंगे, लेकिन सभी समान ढाल के साथ: मूल प्रतिगमन समीकरण में 2 x 1 के गुणांक का अर्थ यह है कि, ceteris paribus अर्थात अन्य भविष्यवाणियों को स्थिर रखना, एक में इकाई वृद्धि एक्स 1 बढ़ जाती है की भविष्यवाणी की मतलब प्रतिक्रिया y दो इकाइयों द्वारा, जबकि के अवरोधन के अर्थ 3 प्रतिगमन समीकरण में किया गया था कि जब एक्स 1 = 0 और एक्स 2 = 0 तो भविष्यवाणी मतलब प्रतिक्रिया है 3x22x1x1y^3x1=0x2=03। लेकिन आपके सभी बिंदुओं में समान , जिसका अर्थ है कि वे एक अलग अवरोधन के साथ लाइनों पर झूठ बोलते हैं - लाइन में केवल उन बिंदुओं के लिए 3 अवरोधन होगा जिनके लिए x 2 = 0 है । इसलिए एक पंक्ति को देखने के बजाय, आप देख सकते हैं (यदि x 2 के कुछ निश्चित मान हैं, उदाहरण के लिए यदि x 2 हमेशा पूर्णांक है) विकर्ण "लकीरों" की एक श्रृंखला। निम्न डेटा पर विचार करें, जहां y = 2 एक्स 1 + 5 एक्स 2 + 3 ।x23x2=0x2x2y^=2x1+5x2+3
यहाँ बोधगम्य "धारियाँ" हैं। अब अगर मैं उन बिंदुओं में रंग देता हूं जिनके लिए लाल वृत्त के रूप में, x 2 = 2 स्वर्ण त्रिकोण के रूप में और x 2 = 3 नीले वर्गों के रूप में, हम देखते हैं कि वे तीन अलग-अलग रेखाओं पर, ढलान 2 के सभी, और y -interpret ऊपर की गणना के अनुसार 8, 13 और 18। बेशक, यदि x 2 को पूर्णांक मान लेने के लिए विवश नहीं किया गया था, या स्थिति अन्य पूर्वानुमानकर्ता चर द्वारा प्रतिगमन में शामिल की जा रही थी, तो विकर्ण गति कम स्पष्ट होगी, लेकिन यह अभी भी मामला होगा कि प्रत्येक बिंदु इंगित किया गया था एक अलग लाइन पर स्थित हैx2=1x2=2x2=3yx2ग्राफ पर नहीं दिखाए गए अन्य भविष्यवक्ताओं के मूल्यों के आधार पर ।
आप में से एक 3 आयामी लेखाचित्र तैयार करने थे, तो के खिलाफ एक्स 1 और एक्स 2 , तो अपने भविष्यवाणी अंक समीकरण के साथ दो आयामी विमान में सब झूठ y = 2 एक्स 1 + 5yx1x2 । Y बनाम एक्स 1 ग्राफ मैं ऊपर वर्णित दो आयामों पर कि तीन आयामी ग्राफ का अनुमान है - कल्पना खुद के साथ अस्तर एक्स 2 की धुरी है ताकि आप सीधे इसे नीचे देख रहे हैं, जबकि y अंक ऊपर और धुरी एक्स 1y^=2x1+5x2+3yx1x2yx1-एक्सिस आपके अधिकार की ओर इशारा करता है।
yy
के बीच के रिश्ते y और एक्स 1 रेखीय है जब एक्स 2 के लिए नियंत्रित किया जाता है (यानी निरंतर के लिए एक्स 2 , के बीच के रिश्ते y औरy^x1x2x2y^x1x2yx1 x2yx1
आर भूखंडों के लिए कोड
library(scatterplot3d)
data.df <- data.frame(
x1 = c(0,2,4,5,8, 1,3,4,7,8, 0,3,5,6,7),
x2 = c(1,1,1,1,1, 2,2,2,2,2, 3,3,3,3,3)
)
data.df$yhat <- with(data.df, 2*x1 + 5*x2 + 3)
data1.df <- data.df[data.df$x2==1,]
data2.df <- data.df[data.df$x2==2,]
data3.df <- data.df[data.df$x2==3,]
#Before lines added
mar.default <- c(5,4,4,2) + 0.1
par(mar = mar.default + c(0, 1, 0, 0))
plot(data.df[c("x1","yhat")], main=expression("Predicted y against "*x[1]),
xlab=expression(x[1]), ylab=expression(hat(y)))
#After lines added
plot(data.df[c("x1","yhat")], main=expression("Predicted y against "*x[1]),
xlab=expression(x[1]), ylab=expression(hat(y)), pch=".")
points(data1.df[c("x1","yhat")], pch=19, col="red")
abline(lm(yhat ~ x1, data=data1.df), col="red")
points(data2.df[c("x1","yhat")], pch=17, col="gold")
abline(lm(yhat ~ x1, data=data2.df), col="gold")
points(data3.df[c("x1","yhat")], pch=15, col="blue")
abline(lm(yhat ~ x1, data=data3.df), col="blue")
#3d plot
myPlot <- scatterplot3d(data.df, pch=".", xlab=expression(x[1]),
ylab=expression(x[2]), zlab=expression(hat(y)),
main=expression("Predicted y against "*x[1]*" and "*x[2]))
myPlot$plane3d(Intercept=3, x.coef=2, y.coef=5, col="darkgrey")
myPlot$points3d(data1.df, pch=19, col="red")
myPlot$points3d(data2.df, pch=17, col="gold")
myPlot$points3d(data3.df, pch=15, col="blue")
print(myPlot)