* SPSS Code for the British Election Study 2005 Rolling Campaign Panel Survey.

get file = 'C:\YGJUNS09.SAV'
	/keep = all.

frequencies variables = pre_resp
	cam_resp.

compute PRECAMPF = 0.
if (pre_resp >= DATE.DMY(15,03,2005) and pre_resp < DATE.DMY(05,04,2005)) PRECAMPF = 1.

compute PREELECF = 0.
if (cam_resp >= DATE.DMY(14,04,2005) and cam_resp < DATE.DMY(05,05,2005)) PREELECF = 1.

frequencies variables = PRECAMPF PREELECF.

frequencies variables = pre_q35 pre_q36 pre_q38
	cam_q24 cam_q25 cam_q27
	post_q19 post_q20 post_q22.

compute PRECAMP = $sysmis.
do if (pre_q35 = 1).
if (pre_q36 = 1) PRECAMP = 1.
if (pre_q36 >= 2 and pre_q36 <= 9) PRECAMP = 6.
else if (pre_q35 = 2).
if (pre_q38 = 1) PRECAMP = 2.
if (pre_q38 >= 2 and pre_q38 <= 9) PRECAMP = 5.
if (pre_q38 = 10) PRECAMP = 4.
else if (pre_q35 = 3).
compute PRECAMP = 3.
else if (pre_q35 = 4).
compute PRECAMP = 4.
end if.

value labels PRECAMP
	1 'Decided to vote for the Labour party'
	2 'Most likely to vote for the Labour party'
	3 'Will not vote'
	4 "Don't know"
	5 'Most likely to vote for a party other than Labour'
	6 'Decided to vote for a party other than Labour'.

frequencies variables = PRECAMP.

compute PREELEC = $sysmis.
do if (cam_q24 = 1).
if (cam_q25 = 1) PREELEC = 1.
if (cam_q25 >= 2 and cam_q25 <= 9) PREELEC = 6.
else if (cam_q24 = 2).
if (cam_q27 = 1) PREELEC = 2.
if (cam_q27 >= 2 and cam_q27 <= 9) PREELEC = 5.
if (cam_q27 = 10) PREELEC = 4.
else if (cam_q24 = 3).
compute PREELEC = 3.
else if (cam_q24 = 4).
if (cam_q27 = 1) PREELEC = 2.
if (cam_q27 >= 2 and cam_q27 <= 9) PREELEC = 5.
if (cam_q27 = 10) PREELEC = 4.
if (cam_q27 = 99) PREELEC = 4.
if (missing(cam_q27) = 1) PREELEC = 4.
end if.

value labels PREELEC
	1 'Decided to vote for the Labour party'
	2 'Most likely to vote for the Labour party'
	3 'Will not vote'
	4 "Don't know"
	5 'Most likely to vote for a party other than Labour'
	6 'Decided to vote for a party other than Labour'.

frequencies variables = PREELEC.

compute ELECTION = $sysmis.
do if (post_q19 = 1).
if (post_q20 = 1) ELECTION = 1.
if (post_q20 >= 2 and post_q20 <= 9) ELECTION = 4.
else if (post_q19 = 2).
compute ELECTION = 2.
else if (post_q19 = 3).
compute ELECTION = 3.
end if.

value labels ELECTION
	1 'Voted for the Labour party'
	2 'Did not vote'
	3 "Don't know/Refuse"
	4 'Voted for a party other than Labour'.

frequencies variables = ELECTION.

* Table 1.

compute PRECALAB = $sysmis.
if (PRECAMP = 1) PRECALAB = 1.
if (PRECAMP = 2) PRECALAB = 1.
if (PRECAMP = 3) PRECALAB = $sysmis.
if (PRECAMP = 4) PRECALAB = $sysmis.
if (PRECAMP = 5) PRECALAB = 0.
if (PRECAMP = 6) PRECALAB = 0.

compute PREELLAB = $sysmis.
if (PREELEC = 1) PREELLAB = 1.
if (PREELEC = 2) PREELLAB = 1.
if (PREELEC = 3) PREELLAB = $sysmis.
if (PREELEC = 4) PREELLAB = $sysmis.
if (PREELEC = 5) PREELLAB = 0.
if (PREELEC = 6) PREELLAB = 0.

weight by pre_w8.

filter by PRECAMPF.

frequencies variables = PRECALAB.

filter off.

weight off.

weight by w8_full.

filter by PREELECF.

frequencies variables = PREELLAB.

filter off.

weight off.

* Table 4.

compute PRECAMP2 = PRECAMP.
if (PRECAMP = 1) PRECAMP2 = 2.
if (PRECAMP = 3 or PRECAMP = 4) PRECAMP2 = 3.5.
if (PRECAMP = 6) PRECAMP2 = 5.

value labels PRECAMP2
	2 'Most likely to vote for the Labour party'
	3.5 "Will not vote/Don't know"
	5 'Most likely to vote for a party other than Labour'.

compute PREELEC2 = PREELEC.
if (PREELEC = 1) PREELEC2 = 2.
if (PREELEC = 3 or PREELEC = 4) PREELEC2 = 3.5.
if (PREELEC = 6) PREELEC2 = 5.

value labels PREELEC2
	2 'Most likely to vote for the Labour party'
	3.5 "Will not vote/Don't know"
	5 'Most likely to vote for a party other than Labour'.

compute ELECTIO2 = ELECTION.
if (ELECTION = 3) ELECTIO2 = $sysmis.

value labels ELECTIO2
	1 'Voted for the Labour party'
	2 'Did not vote'
	4 'Voted for a party other than Labour'.

frequencies variables = PRECAMP2 PREELEC2 ELECTIO2.

compute CEVI = $sysmis.
if (PRECAMP2 = 2 and PREELEC2 = 2 and ELECTIO2 = 1) CEVI = 1.
if (PRECAMP2 = 2 and PREELEC2 = 2 and ELECTIO2 = 2) CEVI = 1.
if (PRECAMP2 = 2 and PREELEC2 = 2 and ELECTIO2 = 4) CEVI = 1.
if (PRECAMP2 = 2 and PREELEC2 = 3.5 and ELECTIO2 = 1) CEVI = 3.
if (PRECAMP2 = 2 and PREELEC2 = 3.5 and ELECTIO2 = 2) CEVI = 2.
if (PRECAMP2 = 2 and PREELEC2 = 3.5 and ELECTIO2 = 4) CEVI = 2.
if (PRECAMP2 = 2 and PREELEC2 = 5 and ELECTIO2 = 1) CEVI = 3.
if (PRECAMP2 = 2 and PREELEC2 = 5 and ELECTIO2 = 2) CEVI = 3.
if (PRECAMP2 = 2 and PREELEC2 = 5 and ELECTIO2 = 4) CEVI = 2.
if (PRECAMP2 = 3.5 and PREELEC2 = 2 and ELECTIO2 = 1) CEVI = 2.
if (PRECAMP2 = 3.5 and PREELEC2 = 2 and ELECTIO2 = 2) CEVI = 3.
if (PRECAMP2 = 3.5 and PREELEC2 = 2 and ELECTIO2 = 4) CEVI = 3.
if (PRECAMP2 = 3.5 and PREELEC2 = 3.5 and ELECTIO2 = 1) CEVI = 1.
if (PRECAMP2 = 3.5 and PREELEC2 = 3.5 and ELECTIO2 = 2) CEVI = 1.
if (PRECAMP2 = 3.5 and PREELEC2 = 3.5 and ELECTIO2 = 4) CEVI = 1.
if (PRECAMP2 = 3.5 and PREELEC2 = 5 and ELECTIO2 = 1) CEVI = 3.
if (PRECAMP2 = 3.5 and PREELEC2 = 5 and ELECTIO2 = 2) CEVI = 3.
if (PRECAMP2 = 3.5 and PREELEC2 = 5 and ELECTIO2 = 4) CEVI = 2.
if (PRECAMP2 = 5 and PREELEC2 = 2 and ELECTIO2 = 1) CEVI = 2.
if (PRECAMP2 = 5 and PREELEC2 = 2 and ELECTIO2 = 2) CEVI = 3.
if (PRECAMP2 = 5 and PREELEC2 = 2 and ELECTIO2 = 4) CEVI = 3.
if (PRECAMP2 = 5 and PREELEC2 = 3.5 and ELECTIO2 = 1) CEVI = 2.
if (PRECAMP2 = 5 and PREELEC2 = 3.5 and ELECTIO2 = 2) CEVI = 2.
if (PRECAMP2 = 5 and PREELEC2 = 3.5 and ELECTIO2 = 4) CEVI = 3.
if (PRECAMP2 = 5 and PREELEC2 = 5 and ELECTIO2 = 1) CEVI = 1.
if (PRECAMP2 = 5 and PREELEC2 = 5 and ELECTIO2 = 2) CEVI = 1.
if (PRECAMP2 = 5 and PREELEC2 = 5 and ELECTIO2 = 4) CEVI = 1.

compute VOTE = $sysmis.
if (ELECTIO2 = 1 or ELECTIO2 = 4) VOTE = 1.
if (ELECTIO2 = 2) VOTE = 2.

frequencies variables = CEVI VOTE.

select if (PRECAMPF = 1 and PREELECF = 1).

select if (missing(CEVI) <> 1 and missing(VOTE) <> 1).

frequencies variables = CEVI VOTE.

weight by post_w8.

frequencies variables = CEVI VOTE.

weight off.

compute WT = post_w8 * 2935 / 2971.726483643.

weight by WT.

frequencies variables = CEVI VOTE.

weight off.

weight by WT.

crosstabs table = VOTE by CEVI
	/cells = count column.

weight off.