library(broom)     # For converting models into tables
library(haven)
library(huxtable)  # For side-by-side regression table
library(rdrobust)  # For robust nonparametric RDD  
library(rddensity) # For nonparametric RDD
library(stargazer)
library(tidyverse) # For ggplot
  • 作図用代用フォントの設定
theme_set(theme_gray(base_size = 10, base_family = "HiraginoSans-W3"))  # macOS用
theme_set(theme_gray(base_size = 10, base_family = "Meiryo"))        # Windows用

III. 現職優位効果の推定

  • 前のセッションでは補講を受けたか否かということが後期の試験点数に与える影響をもとめた
  • ここではある総選挙で当選したかどうかということが次の総選挙の結果に与える影響(現職優位)について検討してみる
  • 日本の衆院選の小選挙区で党派的現職優位効果がみられるかどうかを分析した Ariga et al. 2016 の研究を参考にする

リサーチ・クエスチョン

  • 選挙で当選した議員は次の選挙で有利なのか? 
  • 2017年総選挙で自民党候補者が僅差で勝った選挙区(処置群)
  • 2017年総選挙で自民党候補者が僅差で負けた選挙区(統制群)
  • 2021年総選挙においてこれら 2 種類の選挙区で、自民党候補者の得票率がどれだけ異なるのか?

仮説

もし党派的な現職優位効果が存在するなら、自民党候補者が僅差で勝った「処置群」の自民党得票率の方が高いはず