'/Oil Curse table 3.3 /' wilcox.test(budget_open08~oil_gas_value100,data=x) library(dplyr) dem<-filter(x,democracy==1) aut<-filter(x,democracy==0) wilcox.test(budget_open08~oil_gas_value100,data=dem) wilcox.test(budget_open08~oil_gas_value100,data=aut)