***************************************************************** * SPSS command file for Nishizawa's "CSES0406 Economic Voting" paper. * * "cses0406Nishizawa_SPSSv1.sps" * * April 2004 * * Note: this is identical to "cses0404Nishizawa_SPSSV1.sps". * * Based on the earlier version: "cses0309Nishizawa_SPSSv1.sps". * Sections marked by "*+" are new in this file. * * Copyright (c) 2004. All Rights Reserved, Yoshitaka Nishizawa *****************************************************************. *****************************************************************. * To run this file, you need: * 1. "CSES_BERLIN.SAV" (a special version of CSES module 1 prepared * by Hand-Dieter Klingemann, Bernhard Wessels, and Hossein * Shahla at Social Science Research Center Berlin), and * 2. "q3jv020214.sav" (a supplemental file for the Japanese * respondents to add one of the independent variables. * * For the first file, the interested reader should contact * one of the researchers at the Center (http://www.wz-berlin.de/). * The second file can be downloaded from my website * (http://www1.doshisha.ac.jp/~ynishiza/pleasedownload.html) *****************************************************************. GET FILE='CSES_BERLIN.SAV'. **** Correction of the Spain 2000 data. * This section is provied by Juan Diez Nicolas, July 2002 ****************************************************. *** Correction of V117 Spain 2000!!. If (velecode=532000 & vrespid eq 842) V117=7. If (velecode=532000 & vrespid eq 1140)V117=7. comp v117_53=v117. recode v117_53(2=3)(3=4)(else=copy). If (velecode=532000 & V117_53=20) V117_53=70. If (velecode=532000 & V117_53=5 & v106=1) V117_53=12. If (velecode=532000 & V117_53=5 & v106=6) V117_53=18. If (velecode=532000 & V117_53=5 & v106=15) V117_53=11. If (velecode=532000 & V117_53=5 & v106=16 & v4=6) V117_53=70. If (velecode=532000 & V117_53=5 & v106=16) V117_53=6. If (velecode=532000 & V117_53=6 & v106=5) V117_53=20. *If (velecode=532000 & V117_53=6 & v106=16 & v4=16) V117_53=70. If (velecode=532000 & V117_53=6 & v106=11) V117_53=22. If (velecode=532000 & V117_53=6 & v106=3) V117_53=70. If (velecode=532000 & V117_53=6 & v106=8) V117_53=70. If (velecode=532000 & V117_53=5 & v106=3) V117_53=70. If (velecode=532000 & V117_53=5 & v106=8) V117_53=70. If (velecode=532000 & V117_53=6 & v106=9) V117_53=70. If (velecode=532000 & V117_53=5 & v106=17) V117_53=13. *** Recoding of v117 Sapin 2000 to WZB_vote!. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 = 7)v117_53 =70. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 =18)v117_53 =70. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 =11)v117_53 =70. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 =20)v117_53 =70. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 = 13)v117_53=70. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 = 3)v117_53 = 2. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 = 4)v117_53 = 3. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 = 5)v117_53 = 4. if (vcountry eq 53)and(vyear1 eq 2000)and( v117_53 = 6)v117_53 = 5. if (vcountry eq 53)and(vyear1 eq 2000)v117_WZB=v117_53. if (WZB_code= 5300012) WZB_VOTE=V117_WZB. execute. *temp. *sel if (wzb_code=5300012). *fre wzb_vote. ******************************************************************** Labels: A Partido Popular (PP) Leader: Jose' M^(a) Aznar B Partido Socialista Obrero Espan~ol (PSOE) Leader: Joaqui'n Almunia C Izquierda Unida (IU) Leader: Francisco Frutos D Convergencia i Unio' (CiU) Leader: Xavier Tri'as E Partido Nacionalista Vasco (PNV) Leader: In~aki Anasagasti ********************************************************************. ***** Preparation of the data set **********************************. *** selecting one data for each country or *** (deleting cases generated by WZB). select if (wzb_code eq 0309611 or wzb_code eq 0500121 or wzb_code eq 0619912 or wzb_code eq 0629912 or wzb_code eq 1019711 or wzb_code eq 1029711 or wzb_code eq 1100021 or wzb_code eq 1509612 or wzb_code eq 1609812 or wzb_code eq 2219811 or wzb_code eq 2229811 or wzb_code eq 2400012 or wzb_code eq 2409812 or wzb_code eq 2509811 or wzb_code eq 2809612 or wzb_code eq 3009611 or wzb_code eq 3100011 or wzb_code eq 3309821 or wzb_code eq 3500011 or wzb_code eq 3509711 or wzb_code eq 3709812 or wzb_code eq 3809611 or wzb_code eq 3909712 or wzb_code eq 4100021 or wzb_code eq 4309712 or wzb_code eq 4509612 or wzb_code eq 4609911 or wzb_code eq 4600021 or wzb_code eq 5109612 or wzb_code eq 5300012 or wzb_code eq 5309612 or wzb_code eq 5409812 or wzb_code eq 5509912 or wzb_code eq 5609611 or wzb_code eq 5909611 or wzb_code eq 6009811 or wzb_code eq 6119711 or wzb_code eq 6129711 or wzb_code eq 6500111). save outfile='temp1may04.sav'. ******************************************************** * Adding q3 information for the Japanese cases. ********************************************************. ********************************************************. * The following adds "close incumbent" for the Japanese * respondents. * The original data set jeds9698 is used for this operation. * The supplemental file that is prepared in this section, * 'q3jv020214.sav' can be downloaded from my website: * www1.doshisha.ac.jp/~ynishiza/pleasedownload.html ********************************************************. *GET FILE='jeds9698j2.sav'. *compute q3j=0. *if (b18s1ldp eq 1 or b18s1sdp eq 1 or b18s1nph eq 1) q3j=1. *execute. *rename variables (respid=vrespid). *compute velecode=301996. *execute. *save outfile='q3jv020214.sav' /keep velecode vrespid q3j. GET FILE='temp1may04.sav'. sort cases by velecode vrespid. match files file=* /file='q3jv020214.sav' /by velecode vrespid. execute. ********************************************************. * The following section is required to delete * cases that have no data. * q3jv020214 has 1535 cases, while the cses * data set has only 1327 cases for Japan. ********************************************************. recode vcountry (sysmis=0)(else=copy). execute. select if not vcountry=0. execute. ********************************************************. * Checking if all necessary variables are available for * each country. ********************************************************. *freq wzb_code. *crosstabs /tables= wzb_code by v1 v2 v4 v29 to v39 v47 to v50 v58. ******************************************************* * The following 6 counties (8 elections) are exclude, * 1) because one or more of the independent variables * are missing from the data set, or 2) because of an * irregular nature of the election (Hong Kong). * * Australia, Belguim, Belarus, Chile, Peru, Hong Kong, * Lithuania *******************************************************. select if (wzb_code eq 1019711 or wzb_code eq 1029711 or wzb_code eq 1509612 or wzb_code eq 1609812 or wzb_code eq 2219811 or wzb_code eq 2229811 or wzb_code eq 2509811 or wzb_code eq 2809612 or wzb_code eq 3009611 or wzb_code eq 3100011 or wzb_code eq 3500011 or wzb_code eq 3509711 or wzb_code eq 3709812 or wzb_code eq 3809611 or wzb_code eq 3909712 or wzb_code eq 4309712 or wzb_code eq 4509612 or wzb_code eq 4609911 or wzb_code eq 4600021 or wzb_code eq 5109612 or wzb_code eq 5300012 or wzb_code eq 5309612 or wzb_code eq 5409812 or wzb_code eq 5509912 or wzb_code eq 5609611 or wzb_code eq 5909611 or wzb_code eq 6009811 or wzb_code eq 6119711 or wzb_code eq 6129711 or wzb_code eq 6500111). compute myid=99. if (wzb_code eq 1019711) myid eq 2. if (wzb_code eq 1029711) myid eq 3. if (wzb_code eq 1509612) myid eq 4. if (wzb_code eq 1609812) myid eq 5. if (wzb_code eq 2219811) myid eq 6. if (wzb_code eq 2229811) myid eq 7. if (wzb_code eq 2509811) myid eq 8. if (wzb_code eq 2809612) myid eq 9. if (wzb_code eq 3009611) myid eq 10. if (wzb_code eq 3100011) myid eq 11. if (wzb_code eq 3500011) myid eq 13. if (wzb_code eq 3509711) myid eq 12. if (wzb_code eq 3709812) myid eq 14. if (wzb_code eq 3809611) myid eq 15. if (wzb_code eq 3909712) myid eq 16. if (wzb_code eq 4309712) myid eq 17. if (wzb_code eq 4509612) myid eq 18. if (wzb_code eq 4609911) myid eq 19. if (wzb_code eq 4600021) myid eq 20. if (wzb_code eq 5109612) myid eq 21. if (wzb_code eq 5300012) myid eq 23. if (wzb_code eq 5309612) myid eq 22. if (wzb_code eq 5409812) myid eq 24. if (wzb_code eq 5509912) myid eq 25. if (wzb_code eq 5609611) myid eq 26. if (wzb_code eq 5909611) myid eq 27. if (wzb_code eq 6009811) myid eq 28. if (wzb_code eq 6119711) myid eq 29. if (wzb_code eq 6129711) myid eq 30. if (wzb_code eq 6500111) myid eq 31. value labels myid 2 'canada97' 3 'quebec97' 4 'czech96' 5 'denmark98' 6 'w-germany98' 7 'e-germany98' 8 'hungary98' 9 'israel96' 10 'japan96' 11 'korea00' 12 'mexico97' 13 'mexico00' 14 'netherlands98' 15 'newzealand96' 16 'norway97' 17 'poland97' 18 'romania96' 19 'russia99' 20 'russia00' 21 'slovenia96' 22 'spain96' 23 'spain00' 24 'sweden98' 25 'switzerland99' 26 'taiwan96' 27 'usa96' 28 'ukraine98' 29 'uk97' 30 'scotland97' 31 'thailand01'. execute. *crosstabs tables=myid by wzb_code. ************************************************************ * Creating Dependent Variables (Incumbent Vote) ************************************************************. missing values v115 (). compute incVprty=9. compute incVcand=9. compute incVprsd=9. *Canada. *temporary. *select if (wzb_code eq 1019711). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 1019711 and v118 eq 1) incVcand=1. if (wzb_code eq 1019711 and (v118 eq 2 or v118 eq 3 or v118 eq 4)) incVcand=0. *Canada, Quebec. *temporary. *select if (wzb_code eq 1029711). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 1029711 and v118 eq 1) incVcand=1. if (wzb_code eq 1029711 and (v118 eq 2 or v118 eq 3 or v118 eq 5)) incVcand=0. *Czech. *temporary. *select if (wzb_code eq 1509612). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 1509612 and (v117 eq 2 or v117 eq 4 or v117 eq 5)) incVprty=1. if (wzb_code eq 1509612 and (v117 eq 1 or v117 eq 3 or (v117 ge 6 and v117 le 70))) incVprty=0. *Denmark. *temporary. *select if (wzb_code eq 1609812). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 1609812 and (v117 eq 1 or v117 eq 2)) incVprty=1. if (wzb_code eq 1609812 and (v117 ge 3 and v117 le 12)) incVprty=0. *Germany. *temporary. *select if (wzb_code eq 2219811). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 2219811 and (v117 eq 2 or v117 eq 3)) incVprty=1. if (wzb_code eq 2219811 and (v117 ge 4 and v117 le 10)) incVprty=0. if (wzb_code eq 2219811 and (v118 eq 2 or v118 eq 3)) incVcand=1. if (wzb_code eq 2219811 and (v118 ge 4 and v118 le 10)) incVcand=0. *Germany, East. *temporary. *select if (wzb_code eq 2229811). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 2229811 and (v117 eq 2 or v117 eq 3)) incVprty=1. if (wzb_code eq 2229811 and (v117 ge 4 and v117 le 10)) incVprty=0. if (wzb_code eq 2229811 and (v118 eq 2 or v118 eq 3)) incVcand=1. if (wzb_code eq 2229811 and (v118 ge 4 and v118 le 10)) incVcand=0. *Hungary. *temporary. *select if (wzb_code eq 2509811). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 2509811 and (v117 eq 5 or v117 eq 6)) incVprty=1. if (wzb_code eq 2509811 and ((v117 ge 1 and v117 le 4) or (v117 ge 7 and v117 le 70))) incVprty=0. if (wzb_code eq 2509811 and (v118 eq 5 or v118 eq 6)) incVcand=1. if (wzb_code eq 2509811 and ((v118 ge 1 and v118 le 4) or (v118 ge 7 and v118 le 70))) incVcand=0. *Israel. *temporary. *select if (wzb_code eq 2809612). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 2809612 and (v116 eq 2 or v116 eq 3 or v116 eq 5)) incVprsd=1. if (wzb_code eq 2809612 and (v116 eq 1 or v116 eq 4 or (v116 ge 6 and v116 le 21))) incVprsd=0. if (wzb_code eq 2809612 and (v117 eq 2 or v117 eq 3 or v117 eq 5)) incVprty=1. if (wzb_code eq 2809612 and (v117 eq 1 or v117 eq 4 or (v117 ge 6 and v117 le 21))) incVprty=0. if (wzb_code eq 2809612 and v115 eq 5) incVprsd=9. if (wzb_code eq 2809612 and v115 eq 5) incVprty=9. * The last two lines are required to exclude non-voters. *temporary. *select if (wzb_code eq 2809612). *crosstabs tables=v117 by incVprty. *temporary. *select if (wzb_code eq 2809612). *crosstabs tables=v116 by incVprsd. if (wzb_code eq 2809612 and (v115 eq 5 or v115 eq 9)) incVprsd=9. if (wzb_code eq 2809612 and (v115 eq 5 or v115 eq 9)) incVprty=9. * The last two lines are requiered because v116 and v117 for Israel have candidate and party choice for R who did not actually vote. *Japan. *temporary. *select if (wzb_code eq 3009611). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 3009611 and (v117 eq 1 or v117 eq 4 or v117 eq 6)) incVprty=1. if (wzb_code eq 3009611 and (v117 eq 2 or v117 eq 3 or v117 eq 5 or (v117 ge 7 and v117 le 11))) incVprty=0. if (wzb_code eq 3009611 and (v118 eq 1 or v118 eq 4 or v118 eq 6)) incVcand=1. if (wzb_code eq 3009611 and (v118 eq 2 or v118 eq 3 or v118 eq 5 or (v118 ge 7 and v118 le 11))) incVcand=0. *Korea. *temporary. *select if (wzb_code eq 3100011). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 3100011 and v118 eq 2) incVcand=1. if (wzb_code eq 3100011 and (v118 eq 1 or v118 eq 3 or v118 eq 4 or v118 eq 5 or v118 eq 6 or v118 eq 7))incVcand=0. if (wzb_code eq 3100011 and v115 eq 5) incVcand=9. * The last line is required to exclude non-voters. *temporary. *select if (wzb_code eq 3100011). *crosstabs tables=v118 by incvoteP incVcand. if (wzb_code eq 3100011 and v115 eq 5) incVcand=9. *Mexico 1997. *temporary. *select if (wzb_code eq 3509711). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 3509711 and v118 eq 2) incVcand=1. if (wzb_code eq 3509711 and (v118 eq 1 or v118 eq 3 or v118 eq 4 or v118 eq 5 or v118 eq 6 or v118 eq 7)) incVcand=0. *Mexico 2000. *temporary. *select if (wzb_code eq 3500011). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 3500011 and v116 eq 2) incVprsd=1. if (wzb_code eq 3500011 and (v116 ge 6 and v116 le 10)) incVprsd=0. if (wzb_code eq 3500011 and v118 eq 2) incVcand=1. if (wzb_code eq 3500011 and (v118 ge 6 and v118 le 10)) incVcand=0. *Netherland. *temporary. *select if (wzb_code eq 3709812). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 3709812 and (v117 eq 1 or v117 eq 3 or v117 eq 4)) incVprty=1. if (wzb_code eq 3709812 and (v117 eq 2 or (v117 ge 5 and v117 le 66))) incVprty=0. *New Zealand. *temporary. *select if (wzb_code eq 3809611). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 3809611 and v117 eq 2) incVprty=1. if (wzb_code eq 3809611 and (v117 eq 1 or (v117 ge 3 and v117 le 20))) incVprty=0. if (wzb_code eq 3809611 and v118 eq 2) incVcand=1. if (wzb_code eq 3809611 and (v118 eq 1 or (v118 ge 3 and v118 le 20))) incVcand=0. *Norway. *temporary. *select if (wzb_code eq 3909712). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 3909712 and v117 eq 3) incVprty=1. if (wzb_code eq 3909712 and (v117 eq 1 or v117 eq 2 or (v117 ge 4 and v117 le 10))) incVprty=0. if (wzb_code eq 3909712 and v115 eq 5) incVprty=9. *The last line is required to exclude non-voters. *Poland. *temporary. *select if (wzb_code eq 4309712). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 4309712 and (v117 eq 6 or v117 eq 7)) incVprty=1. if (wzb_code eq 4309712 and ((v117 ge 1 and v117 le 5) or (v117 ge 8 and v117 le 23))) incVprty=0. *Romania. *temporary. *select if (wzb_code eq 4509612). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 4509612 and v116 eq 2) incVprsd=1. if (wzb_code eq 4509612 and v116 eq 33) incVprsd=0. if (wzb_code eq 4509612 and (v117 eq 2 or v117 eq 6)) incVprty=1. if (wzb_code eq 4509612 and (v117 eq 5 or (v117 ge 9 and v117 le 20) or (v117 ge 28 and v117 le 34))) incVprty=0. if (wzb_code eq 4509612 and v115 eq 5) incVprsd=9. if (wzb_code eq 4509612 and v115 eq 5) incVprty=9. *The last 2 lines are required to exclude non-voters. *Russia 99. *temporary. *select if (wzb_code eq 4609911). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 4609911 and v117 eq 14) incVprty=1. if (wzb_code eq 4609911 and (v117 eq 1 or (v117 ge 2 and v117 le 13) or (v117 ge 15 and v117 le 28) or v117 eq 96)) incVprty=0. if (wzb_code eq 4609911 and v118 eq 14) incVcand=1. if (wzb_code eq 4609911 and (v118 eq 1 or (v118 ge 2 and v118 le 13) or (v118 ge 15 and v118 le 28) or v117 eq 96)) incVcand=0. * note: there are only 44 cases who voted for party14 for v118. *Russia 00. *temporary. *select if (wzb_code eq 4600021). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 4600021 and v116 eq 30) incVprsd=1. if (wzb_code eq 4600021 and (v116 eq 17 or v116 eq 18 or (v116 ge 31 and v116 le 37))) incVprsd=0. *Slovenia. *temporary. *select if (wzb_code eq 5109612). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 5109612 and (v117 eq 1 or v117 eq 5)) incVprty=1. if (wzb_code eq 5109612 and ((v117 ge 2 and v117 le 4) or (v117 ge 6 and v117 le 10))) incVprty=0. *Spain96. *temporary. *select if (wzb_code eq 5309612). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 5309612 and v117 eq 3) incVprty=1. if (wzb_code eq 5309612 and (v117 eq 1 or (v117 ge 4 and v117 le 96))) incVprty=0. if (wzb_code eq 5309612 and v115 eq 5) incVprty=9. *The last line is required to exclude non-voters. *Spain00. *temporary. *select if (wzb_code eq 5300012). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 5300012 and v117 eq 1) incVprty=1. if (wzb_code eq 5300012 and (v117 ge 2 and v117 le 20)) incVprty=0. *Sweden. *temporary. *select if (wzb_code eq 5409812). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 5409812 and v117 eq 2) incVprty=1. if (wzb_code eq 5409812 and (v117 eq 1 or (v117 ge 3 and v117 le 9))) incVprty=0. *Swizerland. *temporary. *select if (wzb_code eq 5509912). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 5509912 and (v117 eq 2 or v117 eq 3 or v117 eq 4)) incVprty=1. if (wzb_code eq 5509912 and (v117 eq 1 or (v117 ge 5 and v117 le 44))) incVprty=0. *Taiwan. *temporary. *select if (wzb_code eq 5609611). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 5609611 and v116 eq 1) incVprsd=1. if (wzb_code eq 5609611 and (v116 eq 2 or v116 eq 3 or v116 eq 8)) incVprsd=0. if (wzb_code eq 5609611 and v118 eq 1) incVcand=1. if (wzb_code eq 5609611 and (v118 ge 2 and v118 le 5)) incVcand=0. if (wzb_code eq 5609611 and v115 eq 5) incVcand=9. *The last line is required to exclude non-voters. *USA. *temporary. *select if (wzb_code eq 5909611). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 5909611 and v116 eq 1) incVprsd=1. if (wzb_code eq 5909611 and (v116 ge 3 and v116 le 7)) incVprsd=0. if (wzb_code eq 5909611 and v118 eq 1) incVcand=1. if (wzb_code eq 5909611 and (v118 ge 3 and v118 le 7)) incVcand=0. *Ulraine. *temporary. *select if (wzb_code eq 6009811). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 6009811 and (v117 eq 11 or v117 eq 29 or v117 eq 32)) incVprty=1. if (wzb_code eq 6009811 and ((v117 ge 1 and v117 le 10) or (v117 ge 12 and v117 le 28) or (v117 ge 30 and v117 le 31) or (v117 ge 33 and v117 le 49))) incVprty=0. *UK. *temporary. *select if (wzb_code eq 6119711). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 6119711 and v118 eq 1) incVcand=1. if (wzb_code eq 6119711 and (v118 eq 2 or v118 eq 3 or v118 eq 5 or v118 eq 7)) incVcand=0. *UK, Scotland. *temporary. *select if (wzb_code eq 6129711). *crosstabs tables=v116 v117 v118 by v115. if (wzb_code eq 6129711 and v118 eq 1) incVcand=1. if (wzb_code eq 6129711 and (v118 eq 2 or v118 eq 3 or v118 eq 4 or v118 eq 7)) incVcand=0. *Thailand. *temporary. *select if (wzb_code eq 6500111). *freq v116 v117 v118 v115. if (wzb_code eq 6500111 and (v117 eq 9 or v117 eq 13 or v117 eq 15 or v117 eq 16 or v117 eq 21)) incVprty=1. if (wzb_code eq 6500111 and (v117 eq 2 or v117 eq 5 or v117 eq 7 or v117 eq 11 or v117 eq 17 or v117 eq 18)) incVprty=0. if (wzb_code eq 6500111 and (v118 eq 9 or v118 eq 13 or v118 eq 15 or v118 eq 16 or v118 eq 21)) incVcand=1. if (wzb_code eq 6500111 and (v118 eq 2 or v118 eq 5 or v118 eq 7 or v118 eq 11 or v118 eq 17 or v118 eq 18)) incVcand=0. missing values incVprsd incVprty incVcand (9). execute. *crosstabs tables=myid by incVprsd incVprty incVcand /cells count row. *************************************************** * * Independent Variables * ***************************************************. ***** * satisfaction to Democracy. *****. *crosstabs tabels=myid by v1 v2 /cell count row. *v1 is 4-point scale; v2 is 5-point scale. recode v1 (1=1)(2=.67)(4=.33)(5=0)(else=9) into satisD. missing values satisD (9). ***** * economic evaluation. ***** *crosstabs tables=myid by v47 v48 v49 v50/cell row. recode v47 (1=1)(2=.75)(3=.5)(4=.25)(5=0)(else=9) into statofE. recode v48 (1=.75)(3=.5)(5=.25)(else=9) into betterE. if (v49 eq 1) betterE=1. if (v50 eq 5) betterE=0. missing values statofE betterE (9). execute. ***** * one feels close to the incumbent party *****. compute closeInc=0. if (myid eq 2 and (v4 eq 1 or v5 eq 1 or v6 eq 1)) closeInc=1. if (myid eq 3 and (v4 eq 1 or v5 eq 1 or v6 eq 1)) closeInc=1. if (myid eq 4 and ((v4 eq 2 or v5 eq 2 or v6 eq 2) or (v4 eq 4 or v5 eq 4 or v6 eq 4) or (v4 eq 5 or v5 eq 5 or v6 eq 5))) closeInc=1. if (myid eq 5 and (v4 eq 1 or v5 eq 1 or v6 eq 1) or (v4 eq 2 or v5 eq 2 or v6 eq 2)) closeInc=1. if (myid eq 6 and ((v4 eq 1 or v5 eq 1 or v6 eq 1) or (v4 eq 2 or v5 eq 2 or v6 eq 2) or (v4 eq 3 or v5 eq 3 or v6 eq 3))) closeInc=1. if (myid eq 7 and ((v4 eq 1 or v5 eq 1 or v6 eq 1) or (v4 eq 2 or v5 eq 2 or v6 eq 2) or (v4 eq 3 or v5 eq 3 or v6 eq 3))) closeInc=1. if (myid eq 8 and ((v4 eq 5 or v5 eq 5 or v6 eq 5) or (v4 eq 6 or v5 eq 6 or v6 eq 6))) closeInc=1. if (myid eq 9 and ((v4 eq 2 or v5 eq 2 or v6 eq 2 or v8 eq 2) or (v4 eq 3 or v5 eq 3 or v6 eq 3 or v8 eq 3) or (v4 eq 5 or v5 eq 5 or v6 eq 5 or v8 eq 5))) closeInc=1. if (myid eq 10) closeInc=Q3J. if (myid eq 11 and (v4 eq 2 or v5 eq 2 or v6 eq 2)) closeInc=1. if (myid eq 12 and (v4 eq 2 or v5 eq 2 or v6 eq 2)) closeInc=1. if (myid eq 13 and (v4 eq 2 or v5 eq 2 or v6 eq 2)) closeInc=1. if (myid eq 14 and ((v4 eq 1 or v5 eq 1 or v6 eq 1) or (v4 eq 3 or v5 eq 3 or v6 eq 3) or (v4 eq 4 or v5 eq 4 or v6 eq 4))) closeInc=1. if (myid eq 15 and (v4 eq 2 or v5 eq 2 or v6 eq 2)) closeInc=1. if (myid eq 16 and (v4 eq 3 or v5 eq 3 or v6 eq 3)) closeInc=1. if (myid eq 17 and ((v4 eq 6 or v5 eq 6 or v6 eq 6) or (v4 eq 7 or v5 eq 7 or v6 eq 7))) closeInc=1. if (myid eq 18 and ((v4 eq 1 or v5 eq 1 or v6 eq 1 or v8 eq 1 or v9 eq 1 or v10 eq 1) or (v4 eq 2 or v5 eq 2 or v6 eq 2 or v8 eq 2 or v9 eq 2 or v10 eq 2) or (v4 eq 3 or v5 eq 3 or v6 eq 3 or v8 eq 3 or v9 eq 3 or v10 eq 3) or (v4 eq 4 or v5 eq 4 or v6 eq 4 or v8 eq 4 or v9 eq 4 or v10 eq 4) or (v4 eq 6 or v5 eq 6 or v6 eq 6 or v8 eq 6 or v9 eq 6 or v10 eq 6) or (v4 eq 26 or v5 eq 26 or v6 eq 26 or v8 eq 26 or v9 eq 26 or v10 eq 26))) closeInc=1. if (myid eq 19 and (v4 eq 14 or v5 eq 14 or v6 eq 14)) closeInc=1. if (myid eq 20 and ((v4 eq 30 or v5 eq 30 or v6 eq 30) or (v4 eq 14 or v5 eq 14 or v6 eq 14))) closeInc=1. if (myid eq 21 and ((v4 eq 1 or v5 eq 1 or v6 eq 1) or (v4 eq 5 or v5 eq 5 or v6 eq 5))) closeInc=1. if (myid eq 22 and (v4 eq 3 or v5 eq 3 or v6 eq 3)) closeInc=1. if (myid eq 23 and (v4 eq 1 or v5 eq 1 or v6 eq 1)) closeInc=1. if (myid eq 24 and (v4 eq 2 or v5 eq 2 or v6 eq 2)) closeInc=1. if (myid eq 25 and ((v4 eq 2 or v5 eq 2 or v6 eq 2) or (v4 eq 3 or v5 eq 3 or v6 eq 3) or (v4 eq 4 or v5 eq 4 or v6 eq 4))) closeInc=1. if (myid eq 26 and (v4 eq 1 or v5 eq 1 or v6 eq 1)) closeInc=1. if (myid eq 27 and (v4 eq 1 or v5 eq 1 or v6 eq 1)) closeInc=1. if (myid eq 28 and ((v4 eq 11 or v5 eq 11 or v6 eq 11 or v8 eq 11 or v9 eq 11 or v10 eq 11) or (v4 eq 29 or v5 eq 29 or v6 eq 29 or v8 eq 29 or v9 eq 29 or v10 eq 29) or (v4 eq 32 or v5 eq 32 or v6 eq 32 or v8 eq 32 or v9 eq 32 or v10 eq 32))) closeInc=1. if (myid eq 29 and (v4 eq 1 or v5 eq 1 or v6 eq 1)) closeInc=1. if (myid eq 30 and (v4 eq 1 or v5 eq 1 or v6 eq 1)) closeInc=1. if (myid eq 31 and ((v4 eq 9 or v5 eq 9 or v6 eq 9) or (v4 eq 13 or v5 eq 13 or v6 eq 13) or (v4 eq 15 or v5 eq 15 or v6 eq 15) or (v4 eq 16 or v5 eq 16 or v6 eq 16) or (v4 eq 21 or v5 eq 21 or v6 eq 21))) closeInc=1. execute. ***** * Liking for the incumbent party *****. *********NOTE: Mexico97 and Mexico00 use the different number of parties in a different order. * Canada. if (myid eq 2) likeInc=v30. if (myid eq 2) likeOpp=mean(v32,v34,v36,v38). * Canada, Quebec. if (myid eq 3) likeInc=v30. if (myid eq 3) likeOpp=mean(v32,v34,v36,v38). * Czech. if (myid eq 4) likeInc=mean(v32,v36,v38). if (myid eq 4) likeOpp=mean(v30,v34,v40). * Denmark. if (myid eq 5) likeInc=v30. if (myid eq 5) likeOpp=mean(v32,v34,v36,v38,v40). * WGermany. if (myid eq 6) likeInc=mean(v32,v34). if (myid eq 6) likeOpp=mean(v30,v36,v38,v40). * EGermany. if (myid eq 7) likeInc=mean(v32,v34). if (myid eq 7) likeOpp=mean(v30,v36,v38,v40). * Hungary. if (myid eq 8) likeInc=mean(v30,v36). if (myid eq 8) likeOpp=mean(v32,v34,v38,v40). * Israel. if (myid eq 9) likeInc=mean(v30,v34,v38). if (myid eq 9) likeOpp=mean(v32,v36). * Japan. if (myid eq 10) likeInc=mean(v30,v38,v40). if (myid eq 10) likeOpp=mean(v32,v34,v36). * Korea. if (myid eq 11) likeInc=v32. if (myid eq 11) likeOpp=mean(v30,v34,v36,v38,v40). * Mexico97. if (myid eq 12) likeInc=v30. if (myid eq 12) likeOpp=mean(v32,v34,v36,v38). * Mexico00. if (myid eq 13) likeInc=v32. if (myid eq 13) likeOpp=mean(v30,v34,v36,v38,v40). * Netherlands. if (myid eq 14) likeInc=mean(v30,v32,v36). if (myid eq 14) likeOpp=mean(v34,v38,v40). * New Zealand. if (myid eq 15) likeInc=v30. if (myid eq 15) likeOpp=mean(v32,v34,v36,v38,v40). * Norway. if (myid eq 16) likeInc=v30. if (myid eq 16) likeOpp=mean(v32,v34,v36,v38,v40). * Poland. if (myid eq 17) likeInc=mean(v32,v36). if (myid eq 17) likeOpp=mean(v30,v34,v38,v40). * Romania. if (myid eq 18) likeInc=mean(v30,v32,v34,v36,v40). if (myid eq 18) likeOpp=v38. *No evaluation is provided for the only opposition (no 33). Evalution for the opposition (no 5) is subsitituted. * Russia1999. if (myid eq 19) likeInc=v32. if (myid eq 19) likeOpp=mean(v30,v34,v36,v38,v40). * Russia2000. if (myid eq 20) likeInc=v32. if (myid eq 20) likeOpp=mean(v30,v34,v36,v38,v40). * Slovenia. if (myid eq 21) likeInc=mean(v30,v36). if (myid eq 21) likeOpp=mean(v32,v34,v38,v40). * Spain1996. if (myid eq 22) likeInc=v32. if (myid eq 22) likeOpp=mean(v30,v34,v36,v38,v40). * Spain2000. if (myid eq 23) likeInc=v30. if (myid eq 23) likeOpp=mean(v32,v34,v36,v38). * Sweden. if (myid eq 24) likeInc=v30. if (myid eq 24) likeOpp=mean(v32,v34,v36,v38,v40). * Switzerland. if (myid eq 25) likeInc=mean(v30,v32,v36). if (myid eq 25) likeOpp=mean(v34,v38,v40). * Taiwan. if (myid eq 26) likeInc=v30. if (myid eq 26) likeOpp=mean(v32,v34). * USA. if (myid eq 27) likeInc=v30. if (myid eq 27) likeOpp=mean(v32,v34). * Ukraine. if (myid eq 28) likeInc=mean(v32,v38). if (myid eq 28) likeOpp=mean(v30,v34,v36,v40). * UK. if (myid eq 29) likeInc=v32. if (myid eq 29) likeOpp=mean(v30,v34,v36,v38). * UK, Scotland. if (myid eq 30) likeInc=v32. if (myid eq 30) likeOpp=mean(v30,v34,v36,v38). * Thailand. if (myid eq 31) likeInc=mean(v32,v36,v38,v40). if (myid eq 31) likeOpp=mean(v30,v34). compute likeIO=likeInc - likeOpp. *freq likeIO. recode likeInc likeOpp (sysmis=-1)(else=-2) into flagInc flagOpp. if (flagInc eq -1 and flagOpp eq -2) likeIO=0 - likeOpp. if (flagInc eq -2 and flagOpp eq -1) likeIO=likeInc. *freq likeIO. execute. save outfile='temp2may04.sav'. *************************************************** * * Institutional Dummy varialbes * ***************************************************. * Presidential vs Parliamentary. *crosstabs tables=myid by consys. *+ this section is edited May04. compute presid=0. if (myid eq 11 or myid eq 12 or myid eq 13 or myid eq 17 or myid eq 18 or myid eq 19 or myid eq 20 or myid eq 21 or myid eq 25 or myid eq 26 or myid eq 27 or myid eq 28) presid=1. compute parlia=0. if (presid eq 0) parlia=1. if (myid eq 19) presid=9. if (myid eq 19) parlia=9. missing values presid parlia (9). *** This above 3 lines are needed to exclude Russia99 in a comparison of presid vs parliament. *** As an consequence, Russia is included as a presidantial case. *** This is because Russia99 and Rossia00 are taken from the same panel dataset. *** This note is added on 030903. * Plurality vs pure PR vs mixed. **** 3 types of comparison are possible: **** **** A) large_pl includes pure plurality and MMM, and **** large_PR includes pure pr and MMP **** **** B) pure_pl includes pure plurality only, and **** mix_PR includes pure PR and MME **** **** C) mix_pl includes pure plurality and MME, and **** pure_PR includes pure PR only. * A) <--- large_pl ----><--- large_PR -----> B) <-- pure_pl --><------------ mix_PR --------> C) <------- mix_pl ------------><--- pure_PR -->. * <--- MME ----> pure_pl MMM MMP pure_PR 2 'canada97' x 3 'quebec97' x 4 'czech96' x 5 'denmark98' x 6 'w-germany98' x 7 'e-germany98' x 8 'hungary98' o 9 'israel96' x 10 'japan96' o 11 'korea00' o 12 'mexico97' o 13 'mexico00' o 14 'netherlands98' x 15 'newzealand96' x 16 'norway97' x 17 'poland97' x 18 'romania96' x 19 'russia99' o 20 'russia00' - - - - 21 'slovenia96' x 22 'spain96' x 23 'spain00' x 24 'sweden98' x 25 'switzerland99' x 26 'taiwan96' o 27 'usa96' x 28 'ukraine98' o 29 'uk97' x 30 'scotland97' x 31 'thailand01' o x: are defined in the spss program o: not expicilty defined, but as a result of the operation they are defined. compute large_PR=0. if (myid eq 4 or myid eq 5 or myid eq 6 or myid eq 7 or myid eq 9 or myid eq 14 or myid eq 15 or myid eq 16 or myid eq 17 or myid eq 18 or myid eq 21 or myid eq 22 or myid eq 23 or myid eq 24 or myid eq 25) large_PR=1. compute large_pl=0. if (large_PR eq 0) large_pl=1. compute pure_pl=0. if (myid eq 2 or myid eq 3 or myid eq 27 or myid eq 29 or myid eq 30) pure_pl=1. compute mix_PR=0. if (pure_pl eq 0) mix_PR=1. compute pure_PR=0. if (myid eq 4 or myid eq 5 or myid eq 9 or myid eq 14 or myid eq 16 or myid eq 17 or myid eq 18 or myid eq 21 or myid eq 22 or myid eq 23 or myid eq 24 or myid eq 25) pure_PR=1. compute mix_pl=0. if (pure_PR eq 0) mix_pl=1. if (myid eq 20) large_pl=9. if (myid eq 20) large_PR=9. if (myid eq 20) pure_pl=9. if (myid eq 20) mix_PR=9. if (myid eq 20) mix_pl=9. if (myid eq 20) pure_PR=9. missing values large_pl large_PR pure_pl mix_PR mix_pl pure_PR (9). execute. *** This above 6 lines of 'if's are needed to exclude Russia00 in a analysis. *** This is because Russia99 and Rossia00 are taken from the same panel dataset. *** This note is added on 030903. compute OECD=0. if (myid eq 2 or myid eq 3 or myid eq 4 or myid eq 5 or myid eq 6 or myid eq 7 or myid eq 8 or myid eq 10 or myid eq 11 or myid eq 12 or myid eq 13 or myid eq 14 or myid eq 15 or myid eq 16 or myid eq 17 or myid eq 22 or myid eq 23 or myid eq 24 or myid eq 25 or myid eq 27 or myid eq 29 or myid eq 30) OECD=1. compute OECDx=0. if (OECD eq 0) OECDx=1. compute oldOECD=0. if (myid eq 2 or myid eq 3 or myid eq 5 or myid eq 6 or myid eq 10 or myid eq 14 or myid eq 15 or myid eq 16 or myid eq 22 or myid eq 23 or myid eq 24 or myid eq 25 or myid eq 27 or myid eq 29 or myid eq 30) oldOECD=1. compute oldOECDx=0. if (oldOECD eq 0) oldOECDx=1. execute. *crosstabs tables=myid by large_pl large_PR pure_pl mix_PR mix_pl pure_PR OECD OECDx oldOECD oldOECDx. ******************************************** combining IncVotes ********************************************. ******************************************** Comparing party-list and candidate votes for mixed-member electoral systems. ********************************************. *temporary. *select if (myid eq 6). *crosstabs tables=v117 by v118. *temporary. *select if (myid eq 7). *crosstabs tables=v117 by v118. *temporary. *select if (myid eq 8). *crosstabs tables=v117 by v118. *temporary. *select if (myid eq 10). *crosstabs tables=v117 by v118. *temporary. *select if (myid eq 15). *crosstabs tables=v117 by v118. *temporary. *select if (myid eq 19). *crosstabs tables=v117 by v118. *temporary. *select if (myid eq 31). *crosstabs tables=v117 by v118. *compute samevote=0. *if (v117 eq v118) samevote=1. *temporary. *select if (myid eq 6 or myid eq 7 or myid eq 8 or myid eq 10 or myid eq 15 or myid eq 19 or myid eq 31). *crosstabs tabel=myid by samevote /cells count row. *temporary. *select if (myid eq 6 or myid eq 7 or myid eq 8 or myid eq 10 or myid eq 15 or myid eq 19 or myid eq 31). *crosstabs tabel=myid by incVprty incVcand /cells count row. *temporary. *select if (myid eq 6). *cor incVprty incVcand with betterE. *temporary. *select if (myid eq 7). *cor incVprty incVcand with betterE. *temporary. *select if (myid eq 8). *cor incVprty incVcand with betterE. *temporary. *select if (myid eq 10). *cor incVprty incVcand with betterE. *temporary. *select if (myid eq 15). *cor incVprty incVcand with betterE. *temporary. *select if (myid eq 19). *cor incVprty incVcand with betterE. *temporary. *select if (myid eq 31). *cor incVprty incVcand with betterE. **** For MME countries with two votes, **** vote with higher correlation with **** betterE is used. *** IVparl. if (pure_PR eq 1) IVparl=incVprty. if (pure_pl eq 1) IVparl=incVcand. *for mix with two votes. if (myid eq 6 or myid eq 7 or myid eq 10) IVparl=incVcand. if (myid eq 8 or myid eq 15 or myid eq 19 or myid eq 31) IVparl=incVprty. *for mix without two votes. if (myid eq 11 or myid eq 12 or myid eq 13 or myid eq 26) IVparl=incVcand. if (myid eq 28) IVparl=incVprty. if (myid eq 20) IVparl=9. *** This is because Russia99 and Rossia00 are taken from the same panel dataset. *** This note is added on 030903. *+ The following section assigns a) presidential vote to IVpres for the presidential countries and their presidential vote information is available, and b) parliamentary vote to IVpres for the presidential countries but their presidential vote infromation is not available, and c) parliamentary vote to IVpres for the parliamentary countries. *** IVpres. compute IVpres=IVparl. if (myid eq 9 or myid eq 13 or myid eq 18 or myid eq 20 or myid eq 26 or myid eq 27) IVpres=incVprsd. if (myid eq 19) IVpres=9. *** This is because Russia99 and Rossia00 are taken from the same panel dataset. *** This note is added on 030903. missing values IVpres IVparl (9). execute. *************************************** * Demographic variables ***************************************. *crosstabs tables velecode by v99 v88 v89 v90. recode v99 (1=0)(2=.25)(3=.5)(4=.75)(5=1)(else=9) into income. compute age=v88. compute female=v89. recode female (1=0)(2=1)(else=9). compute univ=v90. recode univ (1 thru 6=0)(7,8=1)(else=9). missing values female univ income (9). execute. *************************************** * weights ***************************************. if (myid eq 2) w=1500/2915. if (myid eq 3) w=1500/1034. if (myid eq 4) w=1500/1229. if (myid eq 5) w=1500/2001. if (myid eq 6) w=1500/978. if (myid eq 7) w=1500/1041. if (myid eq 8) w=1500/1525. if (myid eq 9) w=1500/1091. if (myid eq 10) w=1500/1327. if (myid eq 11) w=1500/1100. if (myid eq 12) w=1500/2033. if (myid eq 13) w=1500/1766. if (myid eq 14) w=1500/2101. if (myid eq 15) w=1500/4080. if (myid eq 16) w=1500/2055. if (myid eq 17) w=1500/2003. if (myid eq 18) w=1500/1175. if (myid eq 19) w=1500/1842. if (myid eq 20) w=1500/1748. if (myid eq 21) w=1500/2031. if (myid eq 22) w=1500/1212. if (myid eq 23) w=1500/1208. if (myid eq 24) w=1500/1157. if (myid eq 25) w=1500/2048. if (myid eq 26) w=1500/1200. if (myid eq 27) w=1500/1534. if (myid eq 28) w=1500/1148. if (myid eq 29) w=1500/2201. if (myid eq 30) w=1500/730. if (myid eq 31) w=1500/1081. execute. *crosstabls tables=myid by w. compute w2=w. if (myid eq 2) w2=1500*(2915/(2915+1034))/2915. if (myid eq 3) w2=1500*(1034/(2915+1034))/1034. if (myid eq 6) w2=1500*(978/(978+1041))/978. if (myid eq 7) w2=1500*(1041/(978+1041))/1041. if (myid eq 29) w2=1500*(2201/(2201+730))/2201. if (myid eq 30) w2=1500*(730/(2201+730))/730. execute. *** w2 should be used; This will treat Canada, Gernamy and UK as one country instead of two countries. save outfile='temp3may04.sav'. ************************************************************* ************************************************************* ************************************************************* ************************************************************* ************************************************************* ************************************************************* ***************************** checking the data. *************************************************************. set length = none. weight by w2. *freq var IVpres IVparl satisD statofE betterE closeInc likeIO income age female univ. compute missing=0. missing values satisD statofE betterE closeInc income female univ (). recode IVpres IVparl (sysmis=-9)(else=copy) into IVpresms IVparlms. if (IVpresms eq -9) missing=1. if (IVparlms eq -9) missing=1. if (satisD eq 9) missing=1. if (statofE eq 9) missing=1. if (betterE eq 9) missing=1. recode likeIO (sysmis=999)(else=copy) into likeIOms. if (likeIOms eq 999) missing=1. recode income (sysmis=999)(else=copy) into incomems. if (incomems eq 999) missing=1. recode age (sysmis=999)(else=copy) into agems. if (agems eq 999) missing=1. if (female eq 9) missing=1. if (univ eq 9) missing=1. crosstabs tables=myid by missing /cell count row. missing values satisD statofE betterE closeInc income female univ (9). execute. *+ On average 65% cases will be included in the analysis. *+ For some reason, only a 1/3 of its samples is included for Canada. ************************************************************ * Creating interaction terms ************************************************************. compute pres_beE=presid * betterE. compute parl_beE=parlia * betterE. compute lpl_beE=large_pl * betterE. compute lPR_beE=large_PR * betterE. compute ppl_beE=pure_pl * betterE. compute mPR_beE=mix_PR * betterE. compute mpl_beE=mix_pl * betterE. compute pPR_beE=pure_PR * betterE. compute OEC_beE=OECD * betterE. compute OEx_beE=OECDx * betterE. compute oOE_beE=oldOECD * betterE. compute oOx_beE=oldOECDx * betterE. execute. ************************************************************ * Creating country dummies ************************************************************. *crosstabs tables myid by IVparl /cells row. *descriptives IVparl. ****************************************. * Because overall mean for IVpar is * 37.8% and W-Germany (37.5%) is the * closest to it, I will use W-Germany * as a referrence point. ****************************************. compute can=0. if (myid eq 2) can=1. compute que=0. if (myid eq 3) que=1. compute cze=0. if (myid eq 4) cze=1. compute den=0. if (myid eq 5) den=1. ** e-gernamy is used as base ***. compute ege=0. if (myid eq 7) ege=1. compute hug=0. if (myid eq 8) hug=1. compute isr=0. if (myid eq 9) isr=1. compute jap=0. if (myid eq 10) jap=1. compute kor=0. if (myid eq 11) kor=1. compute me7=0. if (myid eq 12) me7=1. compute me0=0. if (myid eq 13) me0=1. compute net=0. if (myid eq 14) net=1. compute new=0. if (myid eq 15) new=1. compute nor=0. if (myid eq 16) nor=1. compute pol=0. if (myid eq 17) pol=1. compute rom=0. if (myid eq 18) rom=1. compute ru9=0. if (myid eq 19) ru9=1. compute ru0=0. if (myid eq 20) ru0=1. compute slo=0. if (myid eq 21) slo=1. compute sp6=0. if (myid eq 22) sp6=1. compute sp0=0. if (myid eq 23) sp0=1. compute swe=0. if (myid eq 24) swe=1. compute swi=0. if (myid eq 25) swi=1. compute tai=0. if (myid eq 26) tai=1. compute usa=0. if (myid eq 27) usa=1. compute ukr=0. if (myid eq 28) ukr=1. compute uk7=0. if (myid eq 29) uk7=1. compute sco=0. if (myid eq 30) sco=1. compute tha=0. if (myid eq 31) tha=1. execute. *crosstabs tables myid by can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha. save outfile='cses_berlin2may04.sav'. *****************************************************. *****************************************************. *****************************************************. *****************************************************. *****************************************************. * analyses begin here. *****************************************************. get file='cses_berlin2may04.sav'. weight by w2. crosstabs tables myid by ivpres ivparl /cells count row. breakdown bettere by myid. *****************************************************. ** Base models with country dummies. *****************************************************. logistic regression IVpres with satisD statofE betterE closeInc likeIO income univ can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha /enter /external. logistic regression IVparl with satisD statofE betterE closeInc likeIO income univ can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha /enter /external. *****************************************************. ** Base models with interaction terms. *****************************************************. ** IVpres- pres_beE vs parl_beE. logistic regression IVpres with satisD statofE betterE closeInc likeIO income univ pres_beE can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha /enter /external. logistic regression IVpres with satisD statofE betterE closeInc likeIO income univ parl_beE can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha /enter /external. ** IVparl- lpl_beE vs lPR_beE. logistic regression IVparl with satisD statofE betterE closeInc likeIO income univ lpl_beE can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha /enter /external. logistic regression IVparl with satisD statofE betterE closeInc likeIO income univ lPR_beE can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha /enter /external. ** IVparl- OEC_beE vs OEx_beE. logistic regression IVparl with satisD statofE betterE closeInc likeIO income univ OEC_beE can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha /enter /external. logistic regression IVparl with satisD statofE betterE closeInc likeIO income univ OEx_beE can que cze den ege hug isr jap kor me7 me0 net new nor pol rom ru9 ru0 slo sp6 sp0 swe swi tai usa ukr uk7 sco tha /enter /external. *****************************************************. * post-estimation simulation * * NOTE: use different dummy for Russia: * when DV is IVpres, use rus0; * when DV is IVparl, use rus9. *****************************************************. ** Base model: IVpres sg=.000. compute BE=0.0. compute varY= SATISD * .328 + STATOFE * .591 + BE * .783 + CLOSEINC * 1.064 + LIKEIO * .480 + INCOME * .057 - UNIV * .222 - can * .689 - que * .231 + cze * .210 - den * .537 - ege * .120 + hug * .102 + isr * 1.649 + jap * 1.088 + kor * .085 + me7 * .104 - me0 * .468 + net * 1.314 - new * .674 - nor * .950 + pol * .629 - rom * .435 + ru0 * 1.757 + slo * 1.175 + sp6 * .105 - sp0 * .111 - swe * .319 + swi * 1.792 + tai * 1.417 + usa * .886 - ukr * .699 + uk7 * .286 - sco * .928 + tha * 1.459 - 2.324. compute Evar00=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.25. compute varY= SATISD * .328 + STATOFE * .591 + BE * .783 + CLOSEINC * 1.064 + LIKEIO * .480 + INCOME * .057 - UNIV * .222 - can * .689 - que * .231 + cze * .210 - den * .537 - ege * .120 + hug * .102 + isr * 1.649 + jap * 1.088 + kor * .085 + me7 * .104 - me0 * .468 + net * 1.314 - new * .674 - nor * .950 + pol * .629 - rom * .435 + ru0 * 1.757 + slo * 1.175 + sp6 * .105 - sp0 * .111 - swe * .319 + swi * 1.792 + tai * 1.417 + usa * .886 - ukr * .699 + uk7 * .286 - sco * .928 + tha * 1.459 - 2.324. compute Evar25=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.50. compute varY= SATISD * .328 + STATOFE * .591 + BE * .783 + CLOSEINC * 1.064 + LIKEIO * .480 + INCOME * .057 - UNIV * .222 - can * .689 - que * .231 + cze * .210 - den * .537 - ege * .120 + hug * .102 + isr * 1.649 + jap * 1.088 + kor * .085 + me7 * .104 - me0 * .468 + net * 1.314 - new * .674 - nor * .950 + pol * .629 - rom * .435 + ru0 * 1.757 + slo * 1.175 + sp6 * .105 - sp0 * .111 - swe * .319 + swi * 1.792 + tai * 1.417 + usa * .886 - ukr * .699 + uk7 * .286 - sco * .928 + tha * 1.459 - 2.324. compute Evar50=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.75. compute varY= SATISD * .328 + STATOFE * .591 + BE * .783 + CLOSEINC * 1.064 + LIKEIO * .480 + INCOME * .057 - UNIV * .222 - can * .689 - que * .231 + cze * .210 - den * .537 - ege * .120 + hug * .102 + isr * 1.649 + jap * 1.088 + kor * .085 + me7 * .104 - me0 * .468 + net * 1.314 - new * .674 - nor * .950 + pol * .629 - rom * .435 + ru0 * 1.757 + slo * 1.175 + sp6 * .105 - sp0 * .111 - swe * .319 + swi * 1.792 + tai * 1.417 + usa * .886 - ukr * .699 + uk7 * .286 - sco * .928 + tha * 1.459 - 2.324. compute Evar75=rnd(exp(varY)/(1 + exp(varY))). compute BE=1.0. compute varY= SATISD * .328 + STATOFE * .591 + BE * .783 + CLOSEINC * 1.064 + LIKEIO * .480 + INCOME * .057 - UNIV * .222 - can * .689 - que * .231 + cze * .210 - den * .537 - ege * .120 + hug * .102 + isr * 1.649 + jap * 1.088 + kor * .085 + me7 * .104 - me0 * .468 + net * 1.314 - new * .674 - nor * .950 + pol * .629 - rom * .435 + ru0 * 1.757 + slo * 1.175 + sp6 * .105 - sp0 * .111 - swe * .319 + swi * 1.792 + tai * 1.417 + usa * .886 - ukr * .699 + uk7 * .286 - sco * .928 + tha * 1.459 - 2.324. compute Evar10=rnd(exp(varY)/(1 + exp(varY))). descriptives var Evar00 Evar25 Evar50 Evar75 Evar10. ** Base model: IVparl sg=.000. compute BE=0.0. compute varY= SATISD * .251 + STATOFE * .477 + BE * .552 + CLOSEINC * 1.022 + LIKEIO * .473 + INCOME * .059 - UNIV * .237 - can * .646 - que * .207 + cze * .199 - den * .485 - ege * .144 + hug * .085 + isr * .384 + jap * 1.048 + kor * .050 + me7 * .064 - me0 * .268 + net * 1.360 - new * .622 - nor * .851 + pol * .619 - rom * .576 - ru9 * 1.109 + slo * 1.107 + sp6 * .081 - sp0 * .059 - swe * .294 + swi * 1.818 + tai * .822 + usa * .538 - ukr * .796 + uk7 * .318 - sco * .881 + tha * 1.393 - 2.075. compute Evar00=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.25. compute varY= SATISD * .251 + STATOFE * .477 + BE * .552 + CLOSEINC * 1.022 + LIKEIO * .473 + INCOME * .059 - UNIV * .237 - can * .646 - que * .207 + cze * .199 - den * .485 - ege * .144 + hug * .085 + isr * .384 + jap * 1.048 + kor * .050 + me7 * .064 - me0 * .268 + net * 1.360 - new * .622 - nor * .851 + pol * .619 - rom * .576 - ru9 * 1.109 + slo * 1.107 + sp6 * .081 - sp0 * .059 - swe * .294 + swi * 1.818 + tai * .822 + usa * .538 - ukr * .796 + uk7 * .318 - sco * .881 + tha * 1.393 - 2.075. compute Evar25=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.50. compute varY= SATISD * .251 + STATOFE * .477 + BE * .552 + CLOSEINC * 1.022 + LIKEIO * .473 + INCOME * .059 - UNIV * .237 - can * .646 - que * .207 + cze * .199 - den * .485 - ege * .144 + hug * .085 + isr * .384 + jap * 1.048 + kor * .050 + me7 * .064 - me0 * .268 + net * 1.360 - new * .622 - nor * .851 + pol * .619 - rom * .576 - ru9 * 1.109 + slo * 1.107 + sp6 * .081 - sp0 * .059 - swe * .294 + swi * 1.818 + tai * .822 + usa * .538 - ukr * .796 + uk7 * .318 - sco * .881 + tha * 1.393 - 2.075. compute Evar50=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.75. compute varY= SATISD * .251 + STATOFE * .477 + BE * .552 + CLOSEINC * 1.022 + LIKEIO * .473 + INCOME * .059 - UNIV * .237 - can * .646 - que * .207 + cze * .199 - den * .485 - ege * .144 + hug * .085 + isr * .384 + jap * 1.048 + kor * .050 + me7 * .064 - me0 * .268 + net * 1.360 - new * .622 - nor * .851 + pol * .619 - rom * .576 - ru9 * 1.109 + slo * 1.107 + sp6 * .081 - sp0 * .059 - swe * .294 + swi * 1.818 + tai * .822 + usa * .538 - ukr * .796 + uk7 * .318 - sco * .881 + tha * 1.393 - 2.075. compute Evar75=rnd(exp(varY)/(1 + exp(varY))). compute BE=1.0. compute varY= SATISD * .251 + STATOFE * .477 + BE * .552 + CLOSEINC * 1.022 + LIKEIO * .473 + INCOME * .059 - UNIV * .237 - can * .646 - que * .207 + cze * .199 - den * .485 - ege * .144 + hug * .085 + isr * .384 + jap * 1.048 + kor * .050 + me7 * .064 - me0 * .268 + net * 1.360 - new * .622 - nor * .851 + pol * .619 - rom * .576 - ru9 * 1.109 + slo * 1.107 + sp6 * .081 - sp0 * .059 - swe * .294 + swi * 1.818 + tai * .822 + usa * .538 - ukr * .796 + uk7 * .318 - sco * .881 + tha * 1.393 - 2.075. compute Evar10=rnd(exp(varY)/(1 + exp(varY))). descriptives var Evar00 Evar25 Evar50 Evar75 Evar10. *+ the following 2 simulations are new that reflect corrections in classification of "presidental" countries. ** Interaction model: IVpres with Pres_bee sg:BE=.000, IA=.007. compute BE=0.0. compute varY= SATISD * .319 + STATOFE * .592 + BE * .601 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 + Pres_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar00=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.25. compute varY= SATISD * .319 + STATOFE * .592 + BE * .601 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 + Pres_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar25=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.50. compute varY= SATISD * .319 + STATOFE * .592 + BE * .601 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 + Pres_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar50=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.75. compute varY= SATISD * .319 + STATOFE * .592 + BE * .601 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 + Pres_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar75=rnd(exp(varY)/(1 + exp(varY))). compute BE=1.0. compute varY= SATISD * .319 + STATOFE * .592 + BE * .601 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 + Pres_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar10=rnd(exp(varY)/(1 + exp(varY))). descriptives var Evar00 Evar25 Evar50 Evar75 Evar10. ** Interaction model: IVpres with Parl_bee sg:BE=.000, IA=.007. compute BE=0.0. compute varY= SATISD * .319 + STATOFE * .592 + BE * 1.054 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 - Parl_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar00=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.25. compute varY= SATISD * .319 + STATOFE * .592 + BE * 1.054 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 - Parl_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar25=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.50. compute varY= SATISD * .319 + STATOFE * .592 + BE * 1.054 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 - Parl_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar50=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.75. compute varY= SATISD * .319 + STATOFE * .592 + BE * 1.054 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 - Parl_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar75=rnd(exp(varY)/(1 + exp(varY))). compute BE=1.0. compute varY= SATISD * .319 + STATOFE * .592 + BE * 1.054 + CLOSEINC * 1.064 + LIKEIO * .481 + INCOME * .058 - UNIV * .218 - Parl_bee * .453 - can * .675 - que * .221 + cze * .200 - den * .531 - ege * .133 + hug * .096 + isr * 1.637 + jap * 1.085 - kor * .152 - me7 * .123 - me0 * .699 + net * 1.334 - new * .664 - nor * .927 + pol * .391 - rom * .634 + ru0 * 1.517 + slo * .968 + sp6 * .092 - sp0 * .095 - swe * .310 + swi * 1.524 + tai * 1.250 + usa * .641 - ukr * .889 + uk7 * .300 - sco * .912 + tha * 1.437 - 2.225. compute Evar10=rnd(exp(varY)/(1 + exp(varY))). descriptives var Evar00 Evar25 Evar50 Evar75 Evar10. ** Interaction model: IVparl with lPL_bee sg:BE=.000, IA=.015. compute BE=0.0. compute varY= SATISD * .251 + STATOFE * .481 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 - lPL_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar00=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.25. compute varY= SATISD * .251 + STATOFE * .481 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 - lPL_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar25=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.50. compute varY= SATISD * .251 + STATOFE * .481 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 - lPL_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar50=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.75. compute varY= SATISD * .251 + STATOFE * .481 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 - lPL_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar75=rnd(exp(varY)/(1 + exp(varY))). compute BE=1.0. compute varY= SATISD * .251 + STATOFE * .481 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 - lPL_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar10=rnd(exp(varY)/(1 + exp(varY))). descriptives var Evar00 Evar25 Evar50 Evar75 Evar10. ** Interaction model: IVparl with lPR_bee sg:BE=.007, IA=.015. compute BE=0.0. compute varY= SATISD * .251 + STATOFE * .481 + BE * .335 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 + lPR_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar00=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.25. compute varY= SATISD * .251 + STATOFE * .481 + BE * .335 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 + lPR_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar25=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.50. compute varY= SATISD * .251 + STATOFE * .481 + BE * .335 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 + lPR_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar50=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.75. compute varY= SATISD * .251 + STATOFE * .481 + BE * .335 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 + lPR_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar75=rnd(exp(varY)/(1 + exp(varY))). compute BE=1.0. compute varY= SATISD * .251 + STATOFE * .481 + BE * .335 + CLOSEINC * 1.021 + LIKEIO * .473 + INCOME * .058 - UNIV * .237 + lPR_bee * .393 - can * .417 + que * .017 + cze * .208 - den * .492 - ege * .132 + hug * .292 + isr * .393 + jap * 1.255 + kor * .254 + me7 * .260 - me0 * .069 + net * 1.342 - new * .633 - nor * .875 + pol * .621 - rom * .543 - ru9 * .906 + slo * 1.131 + sp6 * .094 - sp0 * .074 - swe * .304 + swi * 1.800 + tai * .977 + usa * .751 - ukr * .631 + uk7 * .543 - sco * .652 + tha * 1.574 - 2.171. compute Evar10=rnd(exp(varY)/(1 + exp(varY))). descriptives var Evar00 Evar25 Evar50 Evar75 Evar10. ** Interaction model: IVparl with OEC_bee sg:BE=.111, IA=.003. compute BE=0.0. compute varY= SATISD * .254 + STATOFE * .471 + BE * .224 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 + OEC_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar00=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.25. compute varY= SATISD * .254 + STATOFE * .471 + BE * .224 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 + OEC_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar25=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.50. compute varY= SATISD * .254 + STATOFE * .471 + BE * .224 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 + OEC_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar50=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.75. compute varY= SATISD * .254 + STATOFE * .471 + BE * .224 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 + OEC_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar75=rnd(exp(varY)/(1 + exp(varY))). compute BE=1.0. compute varY= SATISD * .254 + STATOFE * .471 + BE * .224 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 + OEC_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar10=rnd(exp(varY)/(1 + exp(varY))). descriptives var Evar00 Evar25 Evar50 Evar75 Evar10. ** Interaction model: IVparl with OEx_bee sg:BE=.000, IA=.003. compute BE=0.0. compute varY= SATISD * .254 + STATOFE * .471 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 - OEx_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar00=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.25. compute varY= SATISD * .254 + STATOFE * .471 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 - OEx_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar25=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.50. compute varY= SATISD * .254 + STATOFE * .471 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 - OEx_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar50=rnd(exp(varY)/(1 + exp(varY))). compute BE=0.75. compute varY= SATISD * .254 + STATOFE * .471 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 - OEx_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar75=rnd(exp(varY)/(1 + exp(varY))). compute BE=1.0. compute varY= SATISD * .254 + STATOFE * .471 + BE * .728 + CLOSEINC * 1.021 + LIKEIO * .471 + INCOME * .052 - UNIV * .242 - OEx_bee * .504 - can * .657 - que * .217 + cze * .208 - den * .489 - ege * .133 + hug * .090 + isr * .640 + jap * 1.050 + kor * .055 + me7 * .075 - me0 * .258 + net * 1.342 - new * .630 - nor * .870 + pol * .620 - rom * .365 - ru9 * .851 + slo * 1.332 + sp6 * .093 - sp0 * .073 - swe * .303 + swi * 1.798 + tai * 1.005 + usa * .539 - ukr * .597 + uk7 * .304 - sco * .896 + tha * 1.613 - 2.162. compute Evar10=rnd(exp(varY)/(1 + exp(varY))). descriptives var Evar00 Evar25 Evar50 Evar75 Evar10. ****************************************************** end of the file ******************************************************.