在R語(yǔ)言中可以使用plot函數(shù)繪制簡(jiǎn)單的散點(diǎn)圖,在前面的一篇文章中,已經(jīng)給出了plot函數(shù)的具體使用方法(參見(jiàn)R語(yǔ)言中plot函數(shù)的使用),在該文章中也給出了繪制散點(diǎn)圖的方法。在這里,再給出一個(gè)例子,單獨(dú)來(lái)介紹散點(diǎn)圖的使用。
散點(diǎn)圖(scatter diagram)是對(duì)兩個(gè)數(shù)量變量間關(guān)系的圖形表述。
某商店在過(guò)去三個(gè)月內(nèi)10次利用周末電視廣告來(lái)促銷。管理人員想證實(shí)廣告播放次數(shù)和下一周商店銷售額之間是否存在關(guān)系。具體數(shù)值見(jiàn)下表:(案例來(lái)自Statistics for business and economics,11th Edition,作者:David R. Anderson,Dennis J. Sweeney,Thomas A. Williams)
| 周 | 廣告次數(shù)x | 銷售額(100美元)y |
| 1 | 2 | 50 |
| 2 | 5 | 57 |
| 3 | 1 | 41 |
| 4 | 3 | 54 |
| 5 | 4 | 54 |
| 6 | 1 | 38 |
| 7 | 5 | 63 |
| 8 | 3 | 48 |
| 9 | 4 | 59 |
| 10 | 2 | 46 |
使用R語(yǔ)言繪制散點(diǎn)圖的代碼如下:
x <- c(2,5,1,3,4,1,5,3,4,2)
y <- c(50, 57, 41, 54, 54, 38, 63, 48, 59, 46)
plot(x, y, xlab = "廣告次數(shù)", ylab = "銷售額(100美元)")
其效果如下圖所示:

從散點(diǎn)圖可以看出,廣告次數(shù)和銷售額之間存在正相關(guān)關(guān)系。即,較高的廣告次數(shù)可以帶來(lái)較高的銷售額。
也可以在散點(diǎn)圖上添加趨勢(shì)線。趨勢(shì)線(trendline)是顯示相關(guān)性近似程度的一條直線。
在R語(yǔ)言中可以使用abline函數(shù)和lm函數(shù)添加趨勢(shì)線。
abline(lm(y~x)) #lm函數(shù)是回歸函數(shù)這里是求y關(guān)于x的一元回歸情況,并使用abline函數(shù)繪制出來(lái)
其效果如下圖所示:

新聞熱點(diǎn)
疑難解答