* ====================================================================================== * * A Two-Stage Theory of Discussant Influence on Vote Choice in Multi-Party Systems * * -- Preparation of the data set (FINAL VERSION) -- * * JP, 2014-06-13 * * ====================================================================================== * *** Set working directory cd "$WD/BJPOLS_replication_files" *** Open data file (GLES RCS 2009) use "ZA5303_V1-6-0.dta", clear set more off * ====================================================================================== * * Recoding * ====================================================================================== * ** Share of voters that discuss about politics ** "DK" ==> did not talk gen ipkd=(pre061>0&pre061<8) if pre061<9 lab var ipkd "Does R discuss about politics?" lab def janein 0 "no" 1 "yes" lab val ipkd janein numlabel janein, add tab1 ipkd pre061, mis tab ipkd pre061, mis ** Number of days of political discussion for respodents who discuss at all gen ipk_tage=pre061 if ipkd==1 label var ipk_tage "Frequency of politcal discussion" ** Number of discussion partners for respodents who discuss at all gen ipk_anz=. replace ipk_anz=0 if pre061==0 | pre061==8 replace ipk_anz=1 if pre061>0&pre061<8 replace ipk_anz=2 if pre068==1 replace ipk_anz=3 if pre068==2 replace ipk_anz=. if pre061==9 | pre068==9 label def anz_gp 0 "No discussant" 1 "One discussant" 2 "Two discussants" 3 "Three or more" lab var ipk_anz "Number of discussants" lab val ipk_anz anz_gp tab ipk_anz ** Type of relationship gen ipk_bezGP1=pre062 if pre062>0&pre062<9 tab ipk_bezGP1, gen(ipk_bezGP1_) gen ipk_bezGP2=pre069 if pre069>0&pre069<9 tab ipk_bezGP2, gen(ipk_bezGP2_) lab def beztyp 1"Spouse/life partner" 2 "Relative" 3"Friend" 4"Colleague" 5"Neighbour" 6"Other" lab val ipk_bezGP1 beztyp lab val ipk_bezGP2 beztyp lab var ipk_bezGP1 "Type of relationship: First discussant" lab var ipk_bezGP2 "Type of relationship: Second discussant" foreach num of numlist 1/6 { rename ipk_bezGP1_`num' ipk_bez`num'_GP1 rename ipk_bezGP2_`num' ipk_bez`num'_GP2 } lab var ipk_bez1_GP1 "- Spouse/life partner" lab var ipk_bez2_GP1 "- Relative" lab var ipk_bez3_GP1 "- Friend" lab var ipk_bez4_GP1 "- Colleague" lab var ipk_bez5_GP1 "- Neighbour" lab var ipk_bez6_GP1 "- Other" lab var ipk_bez1_GP2 "- Spouse/life partner" lab var ipk_bez2_GP2 "- Relative" lab var ipk_bez3_GP2 "- Friend" lab var ipk_bez4_GP2 "- Colleague" lab var ipk_bez5_GP2 "- Neighbour" lab var ipk_bez6_GP2 "- Other" foreach num of numlist 1/6 { gen ipk_bez`num'=ipk_bez`num'_GP1==1 if ipk_bezGP1<. replace ipk_bez`num'=(ipk_bez`num')+1 if ipk_bez`num'_GP2==1 replace ipk_bez`num'=. if pre069==9 } foreach num of numlist 1/6 { recode ipk_bez`num' (1=1) (2=1) (0=0) (.=.), gen(ipk_bezd`num') } tab1 ipk_bezd? ipk_bez? ** Political expertise of discussant tab pre064 gen ipk_wisGP1 = . replace ipk_wisGP1=0 if pre064==4 replace ipk_wisGP1=1 if pre064==3 replace ipk_wisGP1=2 if pre064==2 replace ipk_wisGP1=3 if pre064==1 lab var ipk_wisGP1 "Political expertise: First discussant" lab def ipk_wis_lb 0 "very low" 3 "very high" lab val ipk_wisGP1 ipk_wis_lb tab ipk_wisGP1 tab pre071 gen ipk_wisGP2 = . replace ipk_wisGP2=0 if pre071==4 replace ipk_wisGP2=1 if pre071==3 replace ipk_wisGP2=2 if pre071==2 replace ipk_wisGP2=3 if pre071==1 lab var ipk_wisGP2 "Political expertise: Second discussant" lab val ipk_wisGP2 ipk_wis_lb tab ipk_wisGP2 tab ipk_wisGP1 ipk_wisGP2, m *** Frequency of dissent / trustworthiness tab pre065 gen ipk_mverGP1=. replace ipk_mverGP1=0 if pre065==4 replace ipk_mverGP1=1 if pre065==3 replace ipk_mverGP1=2 if pre065==2 replace ipk_mverGP1=3 if pre065==1 lab var ipk_mverGP1 "Frequency of dissent: First discussant" tab ipk_mverGP1 tab pre072 gen ipk_mverGP2=. replace ipk_mverGP2=0 if pre072==4 replace ipk_mverGP2=1 if pre072==3 replace ipk_mverGP2=2 if pre072==2 replace ipk_mverGP2=3 if pre072==1 lab var ipk_mverGP2 "Frequency of dissent: Second discussant" tab ipk_mverGP2 lab def nieoft 0 "Never" 1 "Seldom" 2"Sometimes" 3"Often" lab val ipk_mverGP1 nieoft lab val ipk_mverGP2 nieoft tab ipk_mverGP1 ipk_mverGP2, m gen ipk_mvermax =. replace ipk_mvermax=max(ipk_mverGP1, ipk_mverGP2) tab ipk_mvermax gen ipk_verGP1 = 3-ipk_mverGP1 gen ipk_verGP2 = 3-ipk_mverGP2 label var ipk_verGP1 "Trustworthiness: First discussant" label var ipk_verGP2 "Trustworthiness: Seconc discussant" ** Effectiveness of communication: Response Latencies ** Step 1: Removing outliers ** Overall duration of interview rename pre_dauer dauer su dauer gen dauer_2std=dauer if abs(dauer-r(mean))<2*r(sd)&dauer>0 su dauer* ** Validation of time measurement by the interviewer foreach x in "pre005" "pre066" "pre073" "pre126" { gen `x'_rl_val=`x'_rl if `x'_t==1 } ** Outliers according to baseline speed foreach x in "pre005" "pre066" "pre073" "pre126" { su `x'_rl gen `x'_rl_2std=`x'_rl if abs(`x'_rl-r(mean))<2*r(sd)&`x'_rl>0 } ** Simulataneous cleansing foreach x in "pre005" "pre066" "pre073" "pre126" { gen `x'_rl_corr=`x'_rl replace `x'_rl_corr=. if `x'_rl_val==. replace `x'_rl_corr=. if `x'_rl_2std==. } ** Step 2: Standardization with baseline speed ("residual index") foreach x in "pre005" "pre066" "pre073" "pre126" { reg `x'_rl_corr dauer_2std predict `x'_rl_corr_resid, residuals } foreach x in "pre005" "pre066" "pre073" "pre126" { summ `x'_rl_corr `x'_rl_corr_resid } rename pre066_rl_corr_resid ipk_rl_corrGP1 rename pre073_rl_corr_resid ipk_rl_corrGP2 lab var ipk_rl_corrGP1 "Response latency: First discussant" lab var ipk_rl_corrGP2 "Response latency: Second discussant" summ ipk_rl_corrGP1 ipk_rl_corrGP2 ** Vote intention of discussants tab pre066 gen wabsGP1=pre066 replace wabsGP1=9 if pre066==98 replace wabsGP1=999 if pre061==9 tab pre073 gen wabsGP2=pre073 replace wabsGP2=9 if pre073==98 replace wabsGP2=999 if pre061==9 mvdecode wabsGP1 wabsGP2, mv (0=.a\99=.b\999=.c) lab def wahl 1 "CDU/CSU" 2"SPD" 3"FDP" 4"Greens" 5"Left" 6"Other" 7"Non-Voter" 8"Undecided" 9"Don't know" lab val wabsGP1 wahl lab val wabsGP2 wahl tab1 wabsGP1 wabsGP2 ** Vote intention of respondent (incl. postal voters) tab1 pre005 pre007 tab pre005 pre007 gen wabsEGO=. replace wabsEGO=1 if pre005==1|pre007==1 replace wabsEGO=2 if pre005==2|pre007==2 replace wabsEGO=3 if pre005==3|pre007==3 replace wabsEGO=4 if pre005==4|pre007==4 replace wabsEGO=5 if pre005==5|pre007==5 replace wabsEGO=6 if (pre005>5&pre005<11) | (pre007>5&pre007<11) replace wabsEGO=.a if pre005==98 replace wabsEGO=.b if pre003==4 | pre003==5 lab def wabsEGO_lb 1 "CDU/CSU" 2"SPD" 3"FDP" 4"Greens" 5"Left" 6"Other" .a "Don't know" .b "Non-voter" lab val wabsEGO wabsEGO_lb lab var wabsEGO "Vote intention of respondent (incl. postal voters; pre-election)" tab wabsEGO ** Agreement between respondent and discussants (on the basis of single parties) tab wabsEGO wabsGP1, mis tab wabsEGO wabsGP1 gen wabsEGO_GP1=. replace wabsEGO_GP1=1 if wabsEGO==wabsGP1 & wabsEGO<. & wabsGP1<7 replace wabsEGO_GP1=0 if wabsEGO!=wabsGP1 & wabsEGO<. & wabsGP1<7 replace wabsEGO_GP1=. if wabsEGO>=. | wabsGP1>=. | (wabsGP1>6 & wabsGP1<.) label var wabsEGO_GP1 "Agreement with first discussant (single parties)" tab wabsEGO_GP1 gen wabsEGO_GP2=. replace wabsEGO_GP2=1 if wabsEGO==wabsGP2 & wabsEGO<. & wabsGP2<7 replace wabsEGO_GP2=0 if wabsEGO!=wabsGP2 & wabsEGO<. & wabsGP2<7 replace wabsEGO_GP2=. if wabsEGO>=. | wabsGP2>=. | (wabsGP2>6 & wabsGP2<.) label var wabsEGO_GP2 "Agreement with second discussant (single parties)" tab wabsEGO_GP2 lab def agree 0 "NOT same party/camp" 1 "Same party/camp" lab val wabsEGO_GP1 agree lab val wabsEGO_GP2 agree ** Agreement between respondent and discussants (on the basis of ideological camps) recode wabsEGO (1=1) (3=1) (2=2) (4=2) (5=2) (6=3), gen(wabsLA2_EGO) lab def LA2 1"CDU/CSU-FDP" 2"SPD-Greens-Left" 3"Other" lab val wabsLA2_EGO LA2 tab wabsLA2_EGO recode wabsGP1 (1=1) (3=1) (2=2) (4=2) (5=2) (6=3) (else=.), gen(wabsLA2_GP1) lab val wabsLA2_GP1 LA2 tab wabsLA2_GP1 recode wabsGP2 (1=1) (3=1) (2=2) (4=2) (5=2) (6=3) (else=.), gen(wabsLA2_GP2) lab val wabsLA2_GP2 LA2 tab wabsLA2_GP2 tab wabsLA2_EGO wabsLA2_GP1 tab wabsLA2_EGO wabsLA2_GP2 gen wabsLA2EGO_GP1=. replace wabsLA2EGO_GP1=1 if wabsLA2_EGO==wabsLA2_GP1 & wabsEGO<. & wabsGP1<7 replace wabsLA2EGO_GP1=0 if wabsLA2_EGO!=wabsLA2_GP1 & wabsEGO<. & wabsGP1<7 replace wabsLA2EGO_GP1=. if wabsLA2_EGO>=. | wabsLA2_GP1>=. label var wabsLA2EGO_GP1 "Agreement with first discussant (ideological camps)" tab wabsLA2EGO_GP1 gen wabsLA2EGO_GP2=. replace wabsLA2EGO_GP2=1 if wabsLA2_EGO==wabsLA2_GP2 & wabsEGO<. & wabsGP2<7 replace wabsLA2EGO_GP2=0 if wabsLA2_EGO!=wabsLA2_GP2 & wabsEGO<. & wabsGP2<7 replace wabsLA2EGO_GP2=. if wabsLA2_EGO>=. | wabsLA2_GP2>=. label var wabsLA2EGO_GP2 "Agreement with second discussant (ideological camps)" tab wabsLA2EGO_GP2 lab val wabsLA2EGO_GP1 agree lab val wabsLA2EGO_GP2 agree tab1 wabsEGO_GP1 wabsLA2EGO_GP1 tab1 wabsEGO_GP2 wabsLA2EGO_GP2 ** Control variable for panel models: Agreement incl. uncdecided votes in the ref. cat. ** Trichotomous variable: 1 "agreement" 0 "undecided voter" -1 "disagreement" ** Single Parties gen panel_wabsEGO_GP1 = wabsEGO_GP1 replace panel_wabsEGO_GP1=2 if wabsEGO==.a & wabsGP1<7 recode panel_wabsEGO_GP1 (1=1) (0=-1) (2=0) tab panel_wabsEGO_GP1, gen(panel_wabsEGO_GP1_d) foreach num of numlist 1/3{ rename panel_wabsEGO_GP1_d`num' panel_wabsEGO_d`num'_GP1 } gen panel_wabsEGO_GP2 = wabsEGO_GP2 replace panel_wabsEGO_GP2=2 if wabsEGO==.a & wabsGP2<7 recode panel_wabsEGO_GP2 (1=1) (0=-1) (2=0) tab panel_wabsEGO_GP2, gen(panel_wabsEGO_GP2_d) foreach num of numlist 1/3{ rename panel_wabsEGO_GP2_d`num' panel_wabsEGO_d`num'_GP2 } ** Ideological camps gen panel_wabsLA2EGO_GP1 = wabsLA2EGO_GP1 replace panel_wabsLA2EGO_GP1=2 if wabsEGO==.a & wabsGP1<7 recode panel_wabsLA2EGO_GP1 (1=1) (0=-1) (2=0) tab panel_wabsLA2EGO_GP1, gen(panel_wabsLA2EGO_GP1_d) foreach num of numlist 1/3{ rename panel_wabsLA2EGO_GP1_d`num' panel_wabsLA2EGO_d`num'_GP1 } gen panel_wabsLA2EGO_GP2 = wabsLA2EGO_GP2 replace panel_wabsLA2EGO_GP2=2 if wabsEGO==.a & wabsGP2<7 recode panel_wabsLA2EGO_GP2 (1=1) (0=-1) (2=0) tab panel_wabsLA2EGO_GP2, gen(panel_wabsLA2EGO_GP2_d) foreach num of numlist 1/3{ rename panel_wabsLA2EGO_GP2_d`num' panel_wabsLA2EGO_d`num'_GP2 } ** Vote decision of respondent (post-election) tab pos004 gen vote =. replace vote=pos004 if pos004>0 & pos004 <6 replace vote =. if pos004==95 | pos004==98 | pos004==99 replace vote = 6 if pos004>5 & pos004<11 replace vote = 7 if pos004==0 lab val vote wahl tab vote recode vote (7=.), gen(voteEGO) lab var voteEGO "Vote decision (post-election)" lab val voteEGO wahl recode voteEGO (1=1) (3=1) (2=2) (4=2) (5=2) (6=3), gen(voteLA2_EGO) lab val voteLA2_EGO LA2 ** Agreement between respondent and discussants (post-election) ** Single Parties gen voteEGO_GP1=. replace voteEGO_GP1=1 if voteEGO==wabsGP1 & voteEGO<. & wabsGP1<7 replace voteEGO_GP1=0 if voteEGO!=wabsGP1 & voteEGO<. & wabsGP1<7 replace voteEGO_GP1=. if voteEGO==. | wabsGP1>. | (wabsGP1>6 & wabsGP1<.) gen voteEGO_GP2=. replace voteEGO_GP2=1 if voteEGO==wabsGP2 replace voteEGO_GP2=0 if voteEGO!=wabsGP2 replace voteEGO_GP2=. if voteEGO>=. | wabsGP2>. | (wabsGP2>6 & wabsGP2<.) ** Ideological camps gen voteLA2EGO_GP1=. replace voteLA2EGO_GP1=1 if voteLA2_EGO==wabsLA2_GP1 & voteEGO<. & wabsGP1<7 replace voteLA2EGO_GP1=0 if voteLA2_EGO!=wabsLA2_GP1 & voteEGO<. & wabsGP1<7 replace voteLA2EGO_GP1=. if voteLA2_EGO==. | wabsLA2_GP1==.| (wabsGP1>6 & wabsGP1<.) gen voteLA2EGO_GP2=. replace voteLA2EGO_GP2=1 if voteLA2_EGO==wabsLA2_GP2 replace voteLA2EGO_GP2=0 if voteLA2_EGO!=wabsLA2_GP2 replace voteLA2EGO_GP2=. if voteLA2_EGO==. | wabsLA2_GP2>=. ** Agreement on ideological camp and party within camp gen agree_camp_GP1 = wabsLA2EGO_GP1 lab var agree_camp_GP1 "Same camp: First discussant" gen agree_camp_GP2 = wabsLA2EGO_GP2 lab var agree_camp_GP2 "Same camp: Second discussant" gen agree_party_wcamp_GP1 = wabsEGO_GP1 if wabsLA2EGO_GP1==1 lab var agree_party_wcamp_GP1 "Same party within camp: First discussant" gen agree_party_wcamp_GP2 = wabsEGO_GP2 if wabsLA2EGO_GP2==1 lab var agree_party_wcamp_GP2 "Same party within camp: Second discussant" ** Agreement on ideological camp and party within camp (panel) gen pos_agree_camp_GP1 = voteLA2EGO_GP1 lab var pos_agree_camp_GP1 "Same camp: First discussant" gen pos_agree_camp_GP2 = voteLA2EGO_GP2 lab var agree_camp_GP2 "Same camp: Second discussant" gen pos_agree_party_wcamp_GP1 = voteEGO_GP1 if voteLA2EGO_GP1==1 lab var pos_agree_party_wcamp_GP1 "Same party within camp: First discussant" gen pos_agree_party_wcamp_GP2 = voteEGO_GP2 if voteLA2EGO_GP2==1 lab var pos_agree_party_wcamp_GP2 "Same party within camp: Second discussant" ** Age gen age=. replace age=2009-pre101 if pre101<9998 replace age=. if pre101>=9998 label var age "Age (in years)" sum age ** Sex gen male=. replace male=1 if pre102==1 replace male=0 if pre102==2 label var male "Sex: Male" tab male ** Education gen abi=. replace abi=1 if pre103==5 replace abi=0 if pre103 <5 | pre103==7 label var abi "Education: Baccalaureate" tab abi ** Party identification fre pre126 pos051 recode pre126 (2=1) (3=1) (4=2) (5=3) (6=4) (7=5) (8=6) (9=0) (98=0) (99=.), gen(pid) recode pos051 (2=1) (3=1) (4=2) (5=3) (6=4) (7=5) (8=6) (9=0) (98=0) (99=.), gen(pos_pid) lab def pid_lb 1 "CDU/CSU" 2 "SPD" 3"FDP" 4"Greens" 5"Left" 6"Other" 0 "No PID" lab val pid pid_lb lab val pos_pid pid_lb lab var pid "Party identification" lab var pos_pid "Party identification (post-election)" recode pre126 (2=1) (3=1) (4=1) (5=1) (6=1) (7=1) (8=1) (9=0) (98=0) (99=.), gen(pi) recode pid (1=1) (3=1) (2=2) (4=2) (5=3) (6=4), gen(pidLA1) copy recode pid (1=1) (3=1) (2=2) (4=2) (5=2) (6=3), gen(pidLA2) copy lab val pid wahl lab val pidLA1 LA1 lab val pidLA2 LA2 tab1 pid pidLA1 pidLA2 ** Party identification: Voting in accordance with PID lab def pid_d_lb 1 "Party preference equals PID" 2 "Party preference DOES NOT equal PID" 3 "No PID" gen pid_d=. replace pid_d=1 if pid==wabsEGO replace pid_d=2 if pid!=wabsEGO replace pid_d=3 if pid==0 replace pid_d=. if pid==. | wabsEGO>=. tab pid_d, gen (pid_d) lab var pid_d "Accordance party preference and PID: Single parties" lab val pid_d pid_d_lb gen pidLA2_d=. replace pidLA2_d=1 if pidLA2 ==wabsLA2_EGO replace pidLA2_d=2 if pidLA2!= wabsLA2_EGO replace pidLA2_d=3 if pidLA2 ==0 replace pidLA2_d=. if pidLA2 ==. | wabsLA2_EGO>=. tab pidLA2_d, gen (pidLA2_d) lab var pidLA2_d "Accordance party preference and PID: Ideological camps" lab val pidLA2_d pid_d_lb ** Party identification: Voting in accordance with PID (including undecided) tab pid_d1 pre005 gen pid_accord = pid_d1 replace pid_accord = 0 if pre005==98 tab1 pid_d1 pid_accord label var pid_accord "Voting in accordance with party identification (party version)" gen pidLA2_accord = pidLA2_d1 replace pidLA2_accord = 0 if pre005==98 tab1 pidLA2_d1 pidLA2_accord label var pidLA2_accord "Voting in accordance with party identification (camp version)" ** Party identification: Voting in accordance with PID (post-election) gen pid_v_d=. replace pid_v_d=1 if pid==voteEGO replace pid_v_d=2 if pid!=voteEGO replace pid_v_d=3 if pid==0 replace pid_v_d=. if pid==. | voteEGO==. tab pid_v_d, gen (pid_v_d) gen pidLA2_v_d=. replace pidLA2_v_d=1 if pid==voteLA2_EGO replace pidLA2_v_d=2 if pid!=voteLA2_EGO replace pidLA2_v_d=3 if pid==0 replace pidLA2_v_d=. if pid==. | voteLA2_EGO==. tab pidLA2_v_d, gen (pidLA2_v_d) ** Strength of partisanship tab1 pid pre127 gen pid_str=. replace pid_str= 0 if pid ==0 replace pid_str= 1 if pre127==5 replace pid_str= 2 if pre127==4 replace pid_str= 3 if pre127==3 replace pid_str= 4 if pre127==2 replace pid_str= 5 if pre127==1 tab pid_str ** Political interest ** General political interest recode pre001 (5=0) (4=1) (3=2) (2=3) (1=4) (else=.), gen (polint1) label var polint1 "Political interest" ** Interest in the election campaign recode pre002 (5=0) (4=1) (3=2) (2=3) (1=4) (else=.), gen (polint2) label var polint2 "Campaign interest" ** Importance of election outcome recode pre010 (5=0) (4=1) (3=2) (2=3) (1=4) (else=.), gen (polint3) label var polint3 "Interest in election outcome" lab def int 0"None" 4"Very strong" lab val polint? int tab1 polint? sum polint? *** Media use: Attention reading newspapers / watching television news tab1 pre047 pre057 recode pre047 (1=4) (2=3) (3=2) (4=1) (0=0) (else=.) , gen(presse) label var presse "Attention: reading newspaper" recode pre057 (1=4) (2=3) (3=2) (4=1) (0=0) (else=.) , gen(tv) label var tv "Attention: watching TV news" lab def mrezep 0"Not at all" 4"Very high" lab val presse mrezep lab val tv mrezep tab1 presse tv *** Media use: Quality newspaper / regional newspaper tab1 pre039 pre043 tab1 pre040 pre044 * mvdecode pre040 pre044, mv(0 98/99) * mvdecode pre039 pre043, mv(0 98/99) fre pre039 recode pre039 (1/6=1) (7/97=0) (98/99=.a), gen(type_taz1) fre type_taz1 fre pre043 recode pre043 (1/6=1) (7/97=0) (98/99=.a) (0=.), gen(type_taz2) fre type_taz2 recode pre040 (0=.) (8/9=0) (98/99=.a), gen(days_taz1) copy fre days_taz1 recode pre044(0=.) (8/9=0) (98/99=.a), gen(days_taz2) copy fre days_taz2 gen days_qualreg1 = days_taz1 if type_taz1==1 replace days_qualreg1 = 0 if type_taz1==0 gen days_qualreg2 = days_taz2 if type_taz2==1 replace days_qualreg2 = 0 if type_taz2==0 egen days_qualreg = rowtotal(days_taz1 days_taz2) replace days_qualreg = . if type_taz1==.a |type_taz2==.a |days_taz1==.a | days_taz2==.a recode days_qualreg (1/14=1) (0=0), gen(qualreg_d) label var days_qualreg "Quality newspaper / regional newspaper: frequency (1-14)" label var qualreg_d "Quality newspaper / regional newspaper: 0/1" ** Party dummies tab wabsEGO, gen(wabsEGOd) tab voteEGO, gen(voteEGOd) ** Other parties: Dummies gen wabs_sonstige_EGO = (wabsEGO==6) if wabsEGO<. gen wabs_sonstige_GP1 = (wabsGP1==6) if wabsGP1<. gen wabs_sonstige_GP2 = (wabsGP2==6) if wabsGP2<. ** Left right self placement (extremity) tab pos019 gen leftright_abs = abs(pos019-6) if pos019<98 *** Coalition preference: Grand coalition tab1 pre011_a pre011_b pre011_c pre011_d pre011_e pre011_f pre011_g mvdecode pre011_a pre011_b pre011_c pre011_d pre011_e pre011_f pre011_g, mv(97/99) egen koal_max = rowmax(pre011_a pre011_b pre011_c pre011_d pre011_e pre011_f pre011_g) gen koal_max_cduspd = (koal_max == pre011_a) if pre011_a<. gen gkoal = pre011_a label var gkoal "Scalometer: Grand coalition" recode gkoal (-5/-1=1) (0/5=0), gen(gkoal_neg) ** Day of interview summ pre_tag pwcorr pre011_a leftright_abs * ====================================================================================== * * Save prepared data file * ====================================================================================== * keep id welle pre005 pre003 pre_tag ipkd-voteEGOd6 /// wabs_sonstige_EGO-wabs_sonstige_GP2 koal_max_cduspd gkoal gkoal_neg pre_gbldtran /// agree_* pos_agree_* pid_accord - pidLA2_accord leftright_abs save rcs2009_ipk, replace exit