Aşağıdaki model, kampanya harcamalarının seçim sonuçlarını etkileyip etkilemeyeceğini incelemek için yapılan bir çalışmada kullanılabilir:
\[ voteA = \beta_0+\beta_1log(expendA)+\beta_2log(expendB)+\beta_3prtystrA+U \]
burda voteA Aday A tarafından alınan oy oranı, expendA ve expendB aday A ve B tarafında yapılan kampanya harcamaları ve prtystrA ise aday A için parti gücünün bir ölçüsüdür (A’nın partisine en son başkanlık seçiminde giden oy oranı).
B1 burda A adayın seçim kampanyada harcadı parayı ifade ediyor.burda expendA diğer değişkenler sabit tutsak b1 A adayın % 1 lik artış yaparsa diğer Adayı dengeye ulaşabilmek için % kaç artış yapmasına gösterir.
burda yorumlana oy1 Açıklama Wooldridge Kaynak: M. Barone ve G. Ujifusa’dan, The Almanac of American Politics, 1992. Washington, DC: National Journal. Veriler geç yükleniyor.
Kullanım veri(‘oy1’) Biçim 10 değişken üzerinde 173 gözlem içeren bir data.frame:
eyalet: eyalet posta kodu
bölge: kongre bölgesi
democA: =1, eğer A demokratsa
oy A: A için oy yüzdesi
harcamakA: kamp. harcar. A tarafından, 1000$
harcamakB: kamp. harcar. B tarafından, 1000$
prtystrA: cumhurbaşkanı için oy yüzdesi
lexpendA: log(expendA)
lexpendB: log(expendB)
paylaşımA: 100*(expendA/(expendA+expendB))
Şuradaki hipotezi yorumlanacaksak şöyle bir şey diyeyebiliriz: a adaydaki ve b deki kampanya harcamaları dengeye tutan şey expendA ve expendB harcama maliyetler eşit olması, çünkü aldıklarımız veriler görer expendA da kampanya harcama maliyeti 1000$ ve expendB de kampanya harcama maliyeti 1000$ ve bunlar harcamaları eşit olduğu için ikisi de aynen anda eşit bir artış yaparsalar harcamalar yine denge gelir.
oy1 Açıklama Wooldridge Kaynak: M. Barone ve G. Ujifusa’dan, The Almanac of American Politics, 1992. Washington, DC: National Journal. Veriler geç yükleniyor.
Kullanım veri(‘oy1’) Biçim 10 değişken üzerinde 173 gözlem içeren bir data.frame:
eyalet: eyalet posta kodu
bölge: kongre bölgesi
democA: =1, eğer A demokratsa
oy A: A için oy yüzdesi
harcamakA: kamp. harcar. A tarafından, 1000$
harcamakB: kamp. harcar. B tarafından, 1000$
prtystrA: cumhurbaşkanı için oy yüzdesi
lexpendA: log(expendA)
lexpendB: log(expendB)
paylaşımA: 100*(expendA/(expendA + expendB))
library(wooldridge)
data("vote1")
help("vote1")
head(vote1)
## state district democA voteA expendA expendB prtystrA lexpendA lexpendB
## 1 AL 7 1 68 328.296 8.737 41 5.793916 2.167567
## 2 AK 1 0 62 626.377 402.477 60 6.439952 5.997638
## 3 AZ 2 1 73 99.607 3.065 55 4.601233 1.120048
## 4 AZ 3 0 69 319.690 26.281 64 5.767352 3.268846
## 5 AR 3 0 75 159.221 60.054 66 5.070293 4.095244
## 6 AR 4 1 69 570.155 21.393 46 6.345908 3.063064
## shareA
## 1 97.40767
## 2 60.88104
## 3 97.01476
## 4 92.40370
## 5 72.61247
## 6 96.38355
summary(vote1)
## state district democA voteA
## Length:173 Min. : 1.000 Min. :0.0000 Min. :16.0
## Class :character 1st Qu.: 3.000 1st Qu.:0.0000 1st Qu.:36.0
## Mode :character Median : 6.000 Median :1.0000 Median :50.0
## Mean : 8.838 Mean :0.5549 Mean :50.5
## 3rd Qu.:11.000 3rd Qu.:1.0000 3rd Qu.:65.0
## Max. :42.000 Max. :1.0000 Max. :84.0
## expendA expendB prtystrA lexpendA
## Min. : 0.302 Min. : 0.93 Min. :22.00 Min. :-1.197
## 1st Qu.: 81.634 1st Qu.: 60.05 1st Qu.:44.00 1st Qu.: 4.402
## Median : 242.782 Median : 221.53 Median :50.00 Median : 5.492
## Mean : 310.611 Mean : 305.09 Mean :49.76 Mean : 5.026
## 3rd Qu.: 457.410 3rd Qu.: 450.72 3rd Qu.:56.00 3rd Qu.: 6.126
## Max. :1470.674 Max. :1548.19 Max. :71.00 Max. : 7.293
## lexpendB shareA
## Min. :-0.07257 Min. : 0.09464
## 1st Qu.: 4.09524 1st Qu.:18.86800
## Median : 5.40056 Median :50.84990
## Mean : 4.94437 Mean :51.07654
## 3rd Qu.: 6.11084 3rd Qu.:84.25510
## Max. : 7.34484 Max. :99.49500
ilkregesyon <- lm(vote1$voteA ~ vote1$lexpendA + vote1$lexpendB + vote1$prtystrA)
summary(ilkregesyon)
##
## Call:
## lm(formula = vote1$voteA ~ vote1$lexpendA + vote1$lexpendB +
## vote1$prtystrA)
##
## Residuals:
## Min 1Q Median 3Q Max
## -20.3968 -5.4174 -0.8679 4.9551 26.0660
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 45.07893 3.92631 11.48 <2e-16 ***
## vote1$lexpendA 6.08332 0.38215 15.92 <2e-16 ***
## vote1$lexpendB -6.61542 0.37882 -17.46 <2e-16 ***
## vote1$prtystrA 0.15196 0.06202 2.45 0.0153 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 7.712 on 169 degrees of freedom
## Multiple R-squared: 0.7926, Adjusted R-squared: 0.7889
## F-statistic: 215.2 on 3 and 169 DF, p-value: < 2.2e-16
Test istatistiğini ilk regresyon verilerine göre yorumlayacak olsak böyle bir şey diyebiliriz: burada A adaydaki kampanya harcamaları %1 lik bir artış yaparsa B adayı 6 pointla onun reklamların ekliyor ve B adayı da aynı zamanda kampanya harcamaları %1 birimlik yaparsa A adayı -6 pointla regresyon verilere göre etkliyormuş o zaman şu 6(expendA%1 artışı) -6(expendB %1 artış)= 0 şöyleyse yine A ve B adayın harcamalaı dengeye gelir.