postscript(file="fig2a.eps",family="NimbusSan",width=7,height=6, horiz=F,pointsize=18,paper="special")
plot(1:2,c(-1.4,11),ylim=c(-2,12),t="b",xaxt="n",lwd=2,
           xlab="Affect",ylab="Disapproval")
lines(1:2,c(-1.8,8.6),t="b",lty=2,lwd=2)
mtext(c("Low","High"),at=c(1,2),side=1,line=1)
legend(1,10,lty=c(1,2),legend=c("Low cognition","High cognition"),lwd=2,bty="n")
dev.off()

postscript(file="fig2b.eps",family="NimbusSan",width=7,height=6, horiz=F,pointsize=18,paper="special")
plot(1:2,c(3.5,9.64),ylim=c(-2,12),t="b",xaxt="n",lwd=2,
           xlab="Affect",ylab="Disapproval")
lines(1:2,c(2.93,5.8),t="b",lty=2,lwd=2)
mtext(c("Low","High"),at=c(1,2),side=1,line=1)
legend(1,12,lty=c(1,2),legend=c("Low cognition","High cognition"),lwd=2,bty="n")
dev.off()


postscript(file="fig4a.eps",family="NimbusSan",width=7,height=6, horiz=F,pointsize=18,paper="special")
plot(1:2,c(.2875,.5425),ylim=c(0,1),t="b",xaxt="n",lwd=2,
           xlab="Affect",ylab="Proportion protest responses",main="Highway")
lines(1:2,c(.3025,.4675),t="b",lty=2,lwd=2)
mtext(c("Low","High"),at=c(1,2),side=1,line=1)
legend(1.5,1,lty=c(1,2),legend=c("Low cognition","High cognition"),lwd=2,bty="n")
dev.off()

postscript(file="fig4b.eps",family="NimbusSan",width=7,height=6, horiz=F,pointsize=18,paper="special")
plot(1:2,c(.245,.515),ylim=c(0,1),t="b",xaxt="n",lwd=2,
           xlab="Affect",ylab="Proportion protest responses",main="Terrorism")
lines(1:2,c(.275,.365),t="b",lty=2,lwd=2)
mtext(c("Low","High"),at=c(1,2),side=1,line=1)
legend(1.5,1,lty=c(1,2),legend=c("Low cognition","High cognition"),lwd=2,bty="n")
dev.off()

postscript(file="fig4c.eps",family="NimbusSan",width=7,height=6, horiz=F,pointsize=18,paper="special")
plot(1:2,c(.4225,.7075),ylim=c(0,1),t="b",xaxt="n",lwd=2,
           xlab="Affect",ylab="Proportion protest responses",main="Animals")
lines(1:2,c(.2575,.4525),t="b",lty=2,lwd=2)
mtext(c("Low","High"),at=c(1,2),side=1,line=1)
legend(1.5,1,lty=c(1,2),legend=c("Low cognition","High cognition"),lwd=2,bty="n")
dev.off()